Newsgroups : Borland : borland.public.delphi.internet.winsock : 2008 Jun : idftpserver checksum change

www.cryer.info
Managed Newsgroup Archive

idftpserver checksum change

Subject:idftpserver checksum change
Posted by:"API" (ari.pikivir..@kolumbus.fi)
Date:Sat, 21 Jun 2008 21:03:18

procedure
TIdFTPServer.CommandCheckSum(ASender:
TIdCommand);
..
       if Pos('"', LBuf) > 0 then {do
not localize}
       begin
         Fetch(LBuf, '"'); {do not localize}
         LFileName := Fetch(LBuf, '"');
{do not localize}
       end else begin
         //LFileName := Fetch(LBuf);
         LFileName := LBuf; // 21062008!
       end;
..

Above change will help with lot of ftp
clients that wants to checksum but
doesn't do " marks..

kind regards

Replies:

www.cryer.info
Managed Newsgroup Archive