TvsFtpClient

type TvsFtpClient = class(TComponent)

public

  constructor Create(); override;

  destructor Destroy; override;

  function Connect;

  procedure Disconnect;

  procedure Cancel;

  function GetCurrentDir;

  function DirExists();

  function ChangeDir();

  function MakeDir();

  function RemoveDir();

  function FileDelete();

  function FileExists();

  function FileRename();

  function FileSize();

  function FileDate();

  function FilePut();

  function FileGet();

  function FileList();

  function FindFirst();

  function FindNext();

  property Connected: Boolean; [rw]

  property Host: string; [rw]

  property Port: Word; [rw]

  property UserName: string; [rw]

  property Password: string; [rw]

  property OnCommand: TTextEvent; [rw]

  property OnResponse: TTextEvent; [rw]

end;

TvsFtpClient

TObject