Newsgroups : Borland : borland.public.delphi.internet.winsock : 2006 May : New LargeStream problem
| Subject: | New LargeStream problem |
| Posted by: | "RGreen" (rgreen@nospam.kemi.umu.se) |
| Date: | Wed, 24 May 2006 13:29:33 |
Hello!
I want to transfer larger files (> "Gb) to the ftp. To do that, I must set
the LargeStream property to true.
All well. I do:
procedure TFTP.OnDataChannelCreate(ASender: TObject;
ADataChannel: TIdTCPConnection);
var
Throttle: TIdInterceptThrottler;
begin
ADataChannel.IOHandler:= TIdIOHandlerStack(FStackHandler);
FStackHandler.LargeStream:= true;
end;
(FStackHandler is created in the constructor and destroyed in the
destructor);
All well. The transfer begins and it goes well up to 2Gb. Then the program
exploits with a Range Check Error. I wonder is it is not
procedure OnWork(ASender: TObject; AWorkMode: TWorkMode; AWorkCount:
Integer);
which is causing this since AWorkCount is an integer. Is this right?
Sometimes Indy feels like a big hack ....