Hi.
I discovered weird bug in ftpsend. When FTP directory contain file
named "442052.xml" or "442053.xml" or several others (e.g.
"442000.xml", but 440000.xml seems to be ok) after list, it doesn't
contain propper file names, only extensions (.xml). Other files and
directories are listed OK.
Code:
var FFTPSend : TFTPSend;
root : string;
i : integer;
begin
FFTPSend := TFTPSend.Create;
FFTPSend.AutoTLS := true;
FFTPSend.Logout;
FFTPSend.TargetHost := '192.168.160.177';
FFTPSend.UserName := 'username';
FFTPSend.Password := 'password';
FFTPSend.TargetPort := '21';
FFTPSend.AutoTLS := true;
if FFTPSend.Login then
begin
root := FFTPSend.GetCurrentDir;
FFtpSend.List(root,false);
for i := 0 to FFTPSend.FtpList.List.Count-1 do
Memo1.Lines.Add(FFTPSend.FtpList.Items[i].FileName);
end;
FFtpSend.Logout;
FFtpSend.Free;
end;
I just tested both Synapse 39 and trunk on Delphi 7, Windows 7 64bit.
It does not work properly in either version.
Thanks for any advice.
------------------------------------------------------------------------------
Keep Your Developer Skills Current with LearnDevNow!
The most comprehensive online learning library for Microsoft developers
is just $99.99! Visual Studio, SharePoint, SQL - plus HTML5, CSS3, MVC3,
Metro Style Apps, more. Free future releases when you subscribe now!
http://p.sf.net/sfu/learndevnow-d2d
_______________________________________________
synalist-public mailing list
synalist-public@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/synalist-public
