Class TDataThrd (unit CDataThrd)

Inherits from

TThread

Constructors


constructor Create(PortNo : Integer; FileName : String);

TDataThrd


Functions

procedure Execute;

Execute the data transfer in the background .

procedure GetFile;

Retrieve the file .

procedure OnDataThrdDone(Sender : TObject);


procedure Update;

Create a new file for writing

Properties

Events

Variables

DataAddr : TSockAddrIn;


Msg : String;


NewFileName : String;


sktData : TSocket;


sktListenData : TSocket;

Private declarations


Constructors


constructor Create(PortNo : Integer; FileName : String);

TDataThrd


Functions


procedure Execute;

Execute the data transfer in the background ...


procedure GetFile;

Retrieve the file ...


procedure OnDataThrdDone(Sender : TObject);


procedure Update;

Create a new file for writing


Properties


Events


Variables


DataAddr : TSockAddrIn;


Msg : String;


NewFileName : String;


sktData : TSocket;


sktListenData : TSocket;

Private declarations