Class TTFTPSend

Unit

ftptsend

Declaration

type TTFTPSend = class(TSynaClient)

Description

Implementation of TFTP client and server

Note: Are you missing properties for specify server address and port? Look to parent TSynaClient too!

Hierarchy

• TObject
• TSynaClient
• TTFTPSend

Overview

Methods

	constructor Create;
	destructor Destroy; override;
	function SendFile(const Filename: string): Boolean;
	function RecvFile(const Filename: string): Boolean;
	function WaitForRequest(var Req: word; var filename: string): Boolean;
	procedure ReplyError(Error: word; Description: string);
	function ReplyRecv: Boolean;
	function ReplySend: Boolean;

Properties

	property ErrorCode: integer read FErrorCode;
	property ErrorString: string read FErrorString;
	property Data: TMemoryStream read FData;
	property RequestIP: string read FRequestIP write FRequestIP;
	property RequestPort: string read FRequestPort write FRequestPort;

Description

Methods

constructor Create;

destructor Destroy; override;

function SendFile(const Filename: string): Boolean;

Upload Data as file to TFTP server.

function RecvFile(const Filename: string): Boolean;

Download file from TFTP server to Data.

function WaitForRequest(var Req: word; var filename: string): Boolean;

Acts as TFTP server and wait for client request. When some request incoming within Timeout, result is True and parametres is filled with information from request. You must handle this request, validate it, and call ReplyError, ReplyRecv or ReplySend for send reply to TFTP Client.

procedure ReplyError(Error: word; Description: string);

send error to TFTP client, when you acts as TFTP server.

function ReplyRecv: Boolean;

Accept uploaded file from TFTP client to Data, when you acts as TFTP server.

function ReplySend: Boolean;

Accept download request file from TFTP client and send content of Data, when you acts as TFTP server.

Properties

property ErrorCode: integer read FErrorCode;

Code of TFTP error.

property ErrorString: string read FErrorString;

Human readable decription of TFTP error. (if is sended by remote side)

property Data: TMemoryStream read FData;

MemoryStream with datas for sending or receiving

property RequestIP: string read FRequestIP write FRequestIP;

Address of TFTP remote side.

property RequestPort: string read FRequestPort write FRequestPort;

Port of TFTP remote side.