문제

누구든지 Delphi CGI를 사용하여 파일을 업로드하는 방법에 대한 예제를 제시 할 수 있습니까?

나는 Googled를 가지고 있었지만 지금까지는 운이 없었습니다.

이것이 제가 시도한 것이지만 액세스 위반을 받고 있습니다.

procedure TWebModule1.WebModule1WebActionItem1Action(Sender: TObject;
  Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
var
  lFileName   : string;
  lFileStream : TFileStream;
begin
  lFileName   := Request.Files[0].FileName;
  lFileStream := TFileStream.Create(lFileName, fmCreate);
  try
    lFileStream.CopyFrom(Request.Files[0].Stream, Request.Files[0].Stream.Size);
  finally
    lFileStream.Free;
  end;
end;

올바른 솔루션이 없습니다

다른 팁

다음에서 찾을 수있는 Idrunner 구성 요소를 사용하십시오.

http://www.vclcomponents.com/delphi/winsock___internet/idrunner-info.html

무료이며 소스 코드를 포함하므로 적응할 수 있습니다.

다음 링크의 코드를 사용하여 웹 브로커 재료를 (멀티) 파일 업로드로 만들었습니다.

http://exposureroom.com/members/skumar.aspx/tutorials/post/18

이 사이트에는 웹 브로커 기술로 작업을 수행하는 방법에 대한 많은 정보가 있습니다.

라이센스 : CC-BY-SA ~와 함께 속성
제휴하지 않습니다 StackOverflow
scroll top