| Class TFTPForm (unit Ftp) |
TForm
| Constructors |
| Functions |
procedure CancelMNUClick(Sender: TObject);
procedure ChDirMNUClick(Sender: TObject);
procedure ConnectMNUClick(Sender: TObject);
procedure DeleteMNUClick(Sender: TObject);
procedure DirMNUClick(Sender: TObject);
procedure DirSepMNUClick(Sender: TObject);
procedure EditorMNUClick(Sender: TObject);
procedure EnableDisableMenus;
procedure ExitMNUClick(Sender: TObject);
procedure FormCreate(Sender: TObject);
procedure GetMNUClick(Sender: TObject);
procedure HelpMNUClick(Sender: TObject);
procedure MkDirMNUClick(Sender: TObject);
procedure ParentMNUClick(Sender: TObject);
procedure PutMNUClick(Sender: TObject);
procedure PwdMNUClick(Sender: TObject);
procedure QuitMNUClick(Sender: TObject);
procedure QuoteMNUClick(Sender: TObject);
procedure RenameMNUClick(Sender: TObject);
procedure RmDirMNUClick(Sender: TObject);
procedure Sockets1ErrorOccurred(Sender: TObject; Socket: integer; Error: Integer;
Msg: String);
procedure ViewMNUClick(Sender: TObject);
procedure ViewSepMNUClick(Sender: TObject);
procedure CancelGauge;
function command(fmt: string; const args: array of const): integer;
procedure DoAddLine(Buff: string);
function DoDirList(cmd: string;const args: array of const): integer;
procedure DoPrintf(line: string; const args: array of const);
function GetFTPListenPort: integer;
function getreply(cmdstring: string): integer;
function GetTotalRetrieveSize: longint;
procedure ImBusy;
procedure ImFree;
function ReadDisplayLine: integer;
procedure RetrieveFile(cmd: string;LocalName: string; rtype: string);
function TimedOut: Boolean;
procedure UpdateGauge(BytesWritten,TotalTransferSize: longint);| Properties |
| Events |
| Variables |
CancelMNU : TMenuItem;
ChDirMNU : TMenuItem;
ConnectMNU : TMenuItem;
DeleteMNU : TMenuItem;
DirCommandMNU : TMenuItem;
DirMNU : TMenuItem;
DirSepMNU : TMenuItem;
EditorMNU : TMenuItem;
ExitMNU : TMenuItem;
FileMNU : TMenuItem;
FileTransMNU : TMenuItem;
GetMNU : TMenuItem;
HelpMNU : TMenuItem;
MainMenu1 : TMainMenu;
Memo1 : TMemo;
MiscCommMNU : TMenuItem;
MkDirMNU : TMenuItem;
N1 : TMenuItem;
OptionsMNU : TMenuItem;
ParentMNU : TMenuItem;
PutMNU : TMenuItem;
PwdMNU : TMenuItem;
QuitMNU : TMenuItem;
QuoteMNU : TMenuItem;
RenameMNU : TMenuItem;
RmDirMNU : TMenuItem;
Sockets1 : TSockets;
Sockets2 : TSockets;
ViewMNU : TMenuItem;
ViewSepMNU : TMenuItem;| Constructors |
| Functions |
procedure CancelMNUClick(Sender: TObject);
procedure ChDirMNUClick(Sender: TObject);
procedure ConnectMNUClick(Sender: TObject);continuation ?
procedure DeleteMNUClick(Sender: TObject);
procedure DirMNUClick(Sender: TObject);
procedure DirSepMNUClick(Sender: TObject);
procedure EditorMNUClick(Sender: TObject);
procedure EnableDisableMenus;
procedure ExitMNUClick(Sender: TObject);
procedure FormCreate(Sender: TObject);
procedure GetMNUClick(Sender: TObject);
procedure HelpMNUClick(Sender: TObject);
procedure MkDirMNUClick(Sender: TObject);
procedure ParentMNUClick(Sender: TObject);
procedure PutMNUClick(Sender: TObject);
procedure PwdMNUClick(Sender: TObject);
procedure QuitMNUClick(Sender: TObject);
procedure QuoteMNUClick(Sender: TObject);
procedure RenameMNUClick(Sender: TObject);
procedure RmDirMNUClick(Sender: TObject);
procedure Sockets1ErrorOccurred(Sender: TObject; Socket: integer; Error: Integer;
Msg: String);
procedure ViewMNUClick(Sender: TObject);
procedure ViewSepMNUClick(Sender: TObject);
procedure CancelGauge;
function command(fmt: string; const args: array of const): integer;
procedure DoAddLine(Buff: string);
function DoDirList(cmd: string;const args: array of const): integer;
procedure DoPrintf(line: string; const args: array of const);
function GetFTPListenPort: integer;infinite timeout
function getreply(cmdstring: string): integer;
function GetTotalRetrieveSize: longint;
procedure ImBusy;
procedure ImFree;
function ReadDisplayLine: integer;
procedure RetrieveFile(cmd: string;LocalName: string; rtype: string);
function TimedOut: Boolean;
procedure UpdateGauge(BytesWritten,TotalTransferSize: longint);| Properties |
| Events |
| Variables |
CancelMNU : TMenuItem;
ChDirMNU : TMenuItem;
ConnectMNU : TMenuItem;
DeleteMNU : TMenuItem;
DirCommandMNU : TMenuItem;
DirMNU : TMenuItem;
DirSepMNU : TMenuItem;
EditorMNU : TMenuItem;
ExitMNU : TMenuItem;
FileMNU : TMenuItem;
FileTransMNU : TMenuItem;
GetMNU : TMenuItem;
HelpMNU : TMenuItem;
MainMenu1 : TMainMenu;
Memo1 : TMemo;
MiscCommMNU : TMenuItem;
MkDirMNU : TMenuItem;
N1 : TMenuItem;
OptionsMNU : TMenuItem;
ParentMNU : TMenuItem;
PutMNU : TMenuItem;
PwdMNU : TMenuItem;
QuitMNU : TMenuItem;
QuoteMNU : TMenuItem;
RenameMNU : TMenuItem;
RmDirMNU : TMenuItem;
Sockets1 : TSockets;
Sockets2 : TSockets;
ViewMNU : TMenuItem;
ViewSepMNU : TMenuItem;