unit Ftptst2;

interface

uses
  WinTypes, WinProcs, Messages, SysUtils, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;

type
  TDirectoryForm = class(TForm)
    DirListBox: TListBox;
  private
    { D閏larations priv閑s }
  public
    { D閏larations publiques }
  end;

var
  DirectoryForm: TDirectoryForm;

implementation

{$R *.DFM}

end.