Newsgroups : Borland : borland.public.delphi.internet.winsock : 2007 Feb : TidFTPServer download onWork?
| Subject: | TidFTPServer download onWork? |
| Posted by: | "Frankie" (frankjohnsson20..@yahoo.se) |
| Date: | Wed, 28 Feb 2007 13:50:42 |
Hi!
Playing around with code to understand Indy better...so itīs not
"production code stable".
Here a thread asks to download a file:
procedure TfrmMain.ftpserverRetrieveFile(ASender: TIdFTPServerContext;
const AFileName: String; var VStream: TStream);
begin
try
VStream := TFileStream.Create(AppDir+'\'+AFilename,fmOpenRead and
fmShareDenyWrite);
except
raise exception.Create( 'File not available '+AFilename);
end;
end;
Checked my FTP Client log and i couldnīt see any "Download finshed"
message sent to the server. So how does TidFTPServer know that the
thread has finsihed itīs download?
How do i look for that? Would be great if i could from my server detect
how much percent it is to download from that thread...like an OnWork
event or something?
Can someone please show me some code or demo so i can examine it?
Thanx in advance
Frankie