eric
/
mysticbbs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

test

This commit is contained in:
mysticbbs 2013-09-07 17:56:12 -04:00
parent a099bd46bc
commit c12aa847be
2 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
mdl/m_tcp_client.pas
View File

@ -17,9 +17,9 @@ Type
ResponseData : TStringList; ResponseData : TStringList;
NetInterface : String; NetInterface : String;
Constructor Create (NetI: String); Virtual; Constructor Create (NetI: String); Virtual;
Destructor Destroy; Override; Destructor Destroy; Override;
Function Connect (Address: String; Port: Word) : Boolean; Virtual; Function Connect (Address: String; Port: Word) : Boolean; Virtual;
Function SendCommand (Str: String) : Integer; Function SendCommand (Str: String) : Integer;
Function GetResponse : Integer; Function GetResponse : Integer;
End; End;

2
mdl/m_tcp_client_ftp.pas
View File

@ -5,7 +5,7 @@ Unit m_Tcp_Client_FTP;
Interface Interface
Uses Uses
SysUtils, // wordrec get rid of it SysUtils, // replace wordrec and remove
m_io_Sockets, m_io_Sockets,
m_Tcp_Client; m_Tcp_Client;