Class TForm1 (unit Ftpmain)

Inherits from

TForm

Constructors



Functions

procedure Button10Click(Sender: TObject);


procedure Button11Click(Sender: TObject);


procedure Button12Click(Sender: TObject);


procedure Button13Click(Sender: TObject);


procedure Button14Click(Sender: TObject);


procedure Button15Click(Sender: TObject);


procedure Button2Click(Sender: TObject);


procedure Button3Click(Sender: TObject);


procedure Button4Click(Sender: TObject);


procedure Button6Click(Sender: TObject);


procedure Button7Click(Sender: TObject);


procedure Button8Click(Sender: TObject);


procedure Button9Click(Sender: TObject);


procedure ConnectBtnClick(Sender: TObject);


procedure FormCloseQuery(Sender: TObject; var CanClose: Boolean);


procedure Ftp1FileReceived(Sender: TObject);


procedure Ftp1FileStored(Sender: TObject);


procedure Ftp1FtpError(Sender: TObject; error: FtpError; addinfo: string);


procedure Ftp1FtpInfo(Sender: TObject; info: FtpInfo; addinfo: String);


procedure Ftp1FtpNeedInfo(Sender: TObject; need: TFtpInfoNeeded; var value: string);


procedure Ftp1FtpQuit(Sender: TObject);


procedure Ftp1ListingDone(Sender: TObject);


procedure ListBox1DblClick(Sender: TObject);


procedure MkDirFTPBtnClick(Sender: TObject);


procedure NeedNewFTPListing(Sender: TObject);


procedure RmDirFTPBtnClick(Sender: TObject);


procedure SpeedButton1Click(Sender: TObject);


procedure SpeedButton2Click(Sender: TObject);


Properties

Events

Variables

Button10 : TButton;


Button11 : TButton;


Button12 : TButton;


Button13 : TButton;


Button14 : TButton;


Button15 : TButton;


Button2 : TButton;


Button3 : TButton;


Button4 : TButton;


Button6 : TButton;


Button7 : TButton;


Button8 : TButton;


Button9 : TButton;


ByteCounter : TLabel;


ConnectBtn : TButton;


DirectoryListBox1 : TDirectoryListBox;


DriveComboBox1 : TDriveComboBox;


FileListBox1 : TFileListBox;


Ftp1 : TStarFtp;


ListBox1 : TListBox;


ListBox2 : TListBox;


Log : TMemo;


MkDirFTPBtn : TButton;


Panel1 : TPanel;


Panel2 : TPanel;


RmDirFTPBtn : TButton;


SpeedButton1 : TSpeedButton;


SpeedButton2 : TSpeedButton;


Closing : Boolean;



Constructors


Functions


procedure Button10Click(Sender: TObject);


procedure Button11Click(Sender: TObject);


procedure Button12Click(Sender: TObject);


procedure Button13Click(Sender: TObject);


procedure Button14Click(Sender: TObject);


procedure Button15Click(Sender: TObject);


procedure Button2Click(Sender: TObject);


procedure Button3Click(Sender: TObject);


procedure Button4Click(Sender: TObject);


procedure Button6Click(Sender: TObject);


procedure Button7Click(Sender: TObject);


procedure Button8Click(Sender: TObject);


procedure Button9Click(Sender: TObject);


procedure ConnectBtnClick(Sender: TObject);


procedure FormCloseQuery(Sender: TObject; var CanClose: Boolean);


procedure Ftp1FileReceived(Sender: TObject);


procedure Ftp1FileStored(Sender: TObject);


procedure Ftp1FtpError(Sender: TObject; error: FtpError; addinfo: string);


procedure Ftp1FtpInfo(Sender: TObject; info: FtpInfo; addinfo: String);


procedure Ftp1FtpNeedInfo(Sender: TObject; need: TFtpInfoNeeded; var value: string);


procedure Ftp1FtpQuit(Sender: TObject);


procedure Ftp1ListingDone(Sender: TObject);


procedure ListBox1DblClick(Sender: TObject);


procedure MkDirFTPBtnClick(Sender: TObject);


procedure NeedNewFTPListing(Sender: TObject);


procedure RmDirFTPBtnClick(Sender: TObject);


procedure SpeedButton1Click(Sender: TObject);


procedure SpeedButton2Click(Sender: TObject);


Properties


Events


Variables


Button10 : TButton;


Button11 : TButton;


Button12 : TButton;


Button13 : TButton;


Button14 : TButton;


Button15 : TButton;


Button2 : TButton;


Button3 : TButton;


Button4 : TButton;


Button6 : TButton;


Button7 : TButton;


Button8 : TButton;


Button9 : TButton;


ByteCounter : TLabel;


ConnectBtn : TButton;


DirectoryListBox1 : TDirectoryListBox;


DriveComboBox1 : TDriveComboBox;


FileListBox1 : TFileListBox;


Ftp1 : TStarFtp;


ListBox1 : TListBox;


ListBox2 : TListBox;


Log : TMemo;


MkDirFTPBtn : TButton;


Panel1 : TPanel;


Panel2 : TPanel;


RmDirFTPBtn : TButton;


SpeedButton1 : TSpeedButton;


SpeedButton2 : TSpeedButton;


Closing : Boolean;