Newsgroups : Borland : borland.public.delphi.internet.winsock : 2008 Jun : 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