Delphi ActiveX Requires Chilkat v11.0.0+

Transition from SFtp.ReadDir to SFtp.ReadDirListing

Provides instructions for replacing deprecated ReadDir method calls with ReadDirListing. Delphi ActiveX

var
success: Integer;
sftp: TChilkatSFtp;
handle: WideString;
dirObj: IChilkatSFtpDir;
dirOut: TChilkatSFtpDir;

begin
success := 0;

sftp := TChilkatSFtp.Create(Self);

//  ...
//  ...

handle := sftp.OpenDir('.');
//  ...
//  ...

//  ------------------------------------------------------------------------
//  The ReadDir method is deprecated:

dirObj := sftp.ReadDir(handle);
if (sftp.LastMethodSuccess = 0) then
  begin
    Memo1.Lines.Add(sftp.LastErrorText);
    Exit;
  end;

//  ...
//  ...

//  ------------------------------------------------------------------------
//  Do the equivalent using ReadDirListing.
//  Your application creates a new, empty SFtpDir object which is passed 
//  in the last argument and filled upon success.

dirOut := TChilkatSFtpDir.Create(Self);
success := sftp.ReadDirListing(handle,dirOut.ControlInterface);
if (success = 0) then
  begin
    Memo1.Lines.Add(sftp.LastErrorText);
    Exit;
  end;

//  ...
//  ...

sftp.CloseHandle(handle);