⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 udplstn1.h

📁 文件名称:新曦 我的资源 搜索软件 源程序(Borland Delphi 7)说明
💻 H
字号:
//---------------------------------------------------------------------------
#ifndef udplstn1H
#define udplstn1H
//---------------------------------------------------------------------------
#include <vcl\Classes.hpp>
#include <vcl\Controls.hpp>
#include <vcl\StdCtrls.hpp>
#include <vcl\Forms.hpp>
#include "WSocket.hpp"
//---------------------------------------------------------------------------
class TMainForm : public TForm
{
__published:	// IDE-managed Components
    TLabel *DataAvailableLabel;
    TLabel *InfoLabel;
    TLabel *Label1;
    TLabel *Label2;
    TButton *StartButton;
    TButton *StopButton;
    TEdit *PortEdit;
    TEdit *ServerEdit;
    TCheckBox *AnyServerCheckBox;
    TWSocket *WSocket;
    void __fastcall FormShow(TObject *Sender);
    void __fastcall FormCloseQuery(TObject *Sender, bool &CanClose);
    void __fastcall StartButtonClick(TObject *Sender);
    void __fastcall StopButtonClick(TObject *Sender);
    void __fastcall WSocketSessionConnected(TObject *Sender, WORD Error);
    void __fastcall WSocketSessionClosed(TObject *Sender, WORD Error);
    void __fastcall WSocketDataAvailable(TObject *Sender, WORD Error);
    void __fastcall AnyServerCheckBoxClick(TObject *Sender);
    void __fastcall ServerEditChange(TObject *Sender);
private:	// User declarations
    AnsiString   FIniFileName;
    AnsiString   FSectionName;
    AnsiString   FKeyName;
    TInAddr      FServerAddr;
public:		// User declarations
    __fastcall TMainForm(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern TMainForm *MainForm;
//---------------------------------------------------------------------------
#endif

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -