www.pudn.com > 一个利用VC Socket进行文件传输的例子.rar > Unit1.h
//--------------------------------------------------------------------------- #ifndef Unit1H #define Unit1H //--------------------------------------------------------------------------- #include#include #include #include #include #include #include #include #include //--------------------------------------------------------------------------- // 通讯类型 enum TMessageType { mtRequestTransmission = 1, // 请求文件传输 mtConfirmRequestTransmission = 2, // 确认请求文件传输 mtTransmissionCompleted = 5 // 传输文件完毕 }; class TForm1 : public TForm { __published: // IDE-managed Components TEdit *edTo; TLabel *Label2; TButton *btnStartupMessage; TStatusBar *StatusBar1; TServerSocket *ssTransmission; TServerSocket *ssMessage; TEdit *edPort; TLabel *Label1; TEdit *edPort2; TLabel *Label3; void __fastcall btnStartupMessageClick(TObject *Sender); void __fastcall ssMessageListen(TObject *Sender, TCustomWinSocket *Socket); void __fastcall ssMessageClientRead(TObject *Sender, TCustomWinSocket *Socket); void __fastcall ssMessageClientError(TObject *Sender, TCustomWinSocket *Socket, TErrorEvent ErrorEvent, int &ErrorCode); void __fastcall ssTransmissionListen(TObject *Sender, TCustomWinSocket *Socket); void __fastcall ssTransmissionClientRead(TObject *Sender, TCustomWinSocket *Socket); void __fastcall FormCloseQuery(TObject *Sender, bool &CanClose); private: // User declarations TFileStream *ReceiveFileStream; int ReceiveLen; __int64 ReceiveFileSize; AnsiString ReceiveFileName; public: // User declarations __fastcall TForm1(TComponent* Owner); }; //--------------------------------------------------------------------------- extern PACKAGE TForm1 *Form1; //--------------------------------------------------------------------------- #endif