I recently upgraded my computer to an AMD64 and put my hands on an ftp server I 
had worked on some time ago, to find out it wasn't sending the ftp client the 
files list. After some debugging I located the problem here:

in FtpSrv.pas, at procedure TFtpServer.BuildDirectory

    if Params = '' then
        Path := Client.Directory + '*.*'
        if (UpperCase(Params) = '-LA') or (UpperCase(Params)='-AL') then begin
            ListHidden := TRUE;
            Path       := Client.Directory + '*.*';
        Path := BuildFilePath(Client, Client.Directory, Params);

My ftp client sends "list -latr" and "-latr" is the content of PATH after 
processing for Params, so the problem seems to be in BuildFilePath.

Any come across this problem and knows what's wrong ?
To unsubscribe or change your settings for TWSocket mailing list
please goto http://www.elists.org/mailman/listinfo/twsocket
Visit our website at http://www.overbyte.be

Reply via email to