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

📄 socks1.h

📁 文件名称:新曦 我的资源 搜索软件 源程序(Borland Delphi 7)说明
💻 H
字号:
//---------------------------------------------------------------------------
#ifndef Socks1H
#define Socks1H
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include "WSocket.hpp"
#include <ExtCtrls.hpp>
//---------------------------------------------------------------------------
class TSocksTestForm : public TForm
{
__published:	// IDE-managed Components
    TMemo *DisplayMemo;
    TPanel *Panel1;
    TLabel *Label1;
    TLabel *Label2;
    TButton *ConnectButton;
    TButton *DisconnectButton;
    TEdit *TargetHostEdit;
    TEdit *TargetPortEdit;
    TEdit *SocksServerEdit;
    TEdit *SocksPortEdit;
    TEdit *SocksUsercodeEdit;
    TEdit *SocksPasswordEdit;
    TButton *ClearButton;
    TWSocket *WSocket1;
    TLabel *Label6;
    TLabel *Label5;
    TLabel *Label4;
    TLabel *Label3;
    TCheckBox *SocksAuthCheckBox;
    TRadioButton *Socks5RadioButton;
    TRadioButton *Socks4RadioButton;
    void __fastcall FormShow(TObject *Sender);
    void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
    void __fastcall ConnectButtonClick(TObject *Sender);
    void __fastcall DisconnectButtonClick(TObject *Sender);
    void __fastcall WSocket1SessionConnected(TObject *Sender, WORD Error);
    void __fastcall WSocket1SocksConnected(TObject *Sender, WORD Error);
    void __fastcall WSocket1SocksAuthState(TObject *Sender,
          TSocksAuthState AuthState);
    void __fastcall WSocket1SessionClosed(TObject *Sender, WORD Error);
    void __fastcall WSocket1DataAvailable(TObject *Sender, WORD Error);
    void __fastcall WSocket1SocksError(TObject *Sender, int Error,
          AnsiString Msg);
    void __fastcall ClearButtonClick(TObject *Sender);
private:	// User declarations
    AnsiString FIniFileName;
    BOOL       FInitialized;
    char       FRcvBuf[2048];
    int        FRcvCnt;
    void __fastcall DisplayMsg(TObject *Sender, AnsiString &Msg);
public:		// User declarations
    __fastcall TSocksTestForm(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern TSocksTestForm *SocksTestForm;
//---------------------------------------------------------------------------
#endif

⌨️ 快捷键说明

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