Hi,
die Funktion FtpFindFirstFile() will einen fullname:
Delphi-Quellcode:
...
var
ftpFullName: string;
...
if (ftpDir = '') or (ftpDir[Length(ftpDir)] <> '/') then
ftpDir := ftpDir + '/';
ftpFullName := ftpDir + ftpFile;
if FTPFindFirstFile(hFTP, PChar(ftpFullName), sRec, 0, 0) <> nil then
...
Grüße vom marabu