configserverunit.pas

灰鸽子2007VIP版源码

unit ConfigServerUnit;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics,
  Controls, Forms, Dialogs, StdCtrls
type
  TConfigServer=class(TForm)
    spDynamicSkinForm1: TspDynamicSkinForm;
    SaveDialog1: TSaveDialog;
    PageControl6: TspSkinPageControl;
    TabSheet1: TspSkinTabSheet;
    Label1: TspSkinStdLabel;
    com126Edit: TspSkinEdit;
    TabSheet4: TspSkinTabSheet;
    Panel1: TspSkinPanel;
    Label26: TspSkinStdLabel;
    OpenDialog1: TOpenDialog;
    CheckBox3: TspSkinCheckRadioBox;
    CheckBox4: TspSkinCheckRadioBox;
    Label14: TspSkinStdLabel;
    ServerView: TspSkinEdit;
    Label15: TspSkinStdLabel;
    ServerName: TspSkinEdit;
    Label16: TspSkinStdLabel;
    ServerText: TspSkinEdit;
    Panel2: TspSkinPanel;
    Label2: TspSkinStdLabel;
    OverEdit: TspSkinEdit;
    NextButton: TspSkinButton;
    Edit_UserName: TspSkinEdit;
    spSkinStdLabel3: TspSkinStdLabel;
    PasswordEdit: TspSkinPasswordEdit;
    spSkinTabSheet1: TspSkinTabSheet;
    spSkinGroupBox1: TspSkinGroupBox;
    Label20: TspSkinStdLabel;
    HttpCheck: TspSkinCheckRadioBox;
    Httpport: TspSkinEdit;
    spSkinGroupBox2: TspSkinGroupBox;
    Label17: TspSkinStdLabel;
    Label18: TspSkinStdLabel;
    Label19: TspSkinStdLabel;
    Sock5Check: TspSkinCheckRadioBox;
    Socks5port: TspSkinEdit;
    Socks5User: TspSkinEdit;
    Socks5pass: TspSkinEdit;
    Label21: TspSkinStdLabel;
    Gauge1: TspSkinGauge;
    Label22: TspSkinStdLabel;
    spSkinTabSheet2: TspSkinTabSheet;
    CheckBox1: TspSkinCheckRadioBox;
    CheckBox2: TspSkinCheckRadioBox;
    spSkinStdLabel2: TspSkinStdLabel;
    IdHTTP1: TIdHTTP;
    SmButton1: TspSkinButton;
    SmButton2: TspSkinButton;
    spSkinTabSheet3: TspSkinTabSheet;
    spSkinTabSheet4: TspSkinTabSheet;
    ImageList1: TImageList;
    spSkinPanel1: TspSkinPanel;
    Label10: TspSkinStdLabel;
    Image1: TImage;
    Button1: TspSkinButton;
    spSkinPanel2: TspSkinPanel;
    ListView1: TspSkinListView;
    spSkinScrollBar4: TspSkinScrollBar;
    CheckBox5: TspSkinCheckRadioBox;
    IdAntiFreeze1: TIdAntiFreeze;
    CheckRadioBox2: TspSkinCheckRadioBox;
    Setup_Label2: TspSkinStdLabel;
    UpDown1: TspSkinUpDown;
    Image2: TImage;
    Setup_Label3: TspSkinStdLabel;
    GrEdit3: TspSkinEdit;
    Setup_Label4: TspSkinStdLabel;
    BeizhuEdit: TspSkinEdit;
    Setup_Label1: TspSkinStdLabel;
    SetupEdit: TspSkinComboBox;
    SmButton3: TspSkinButton;
    spSkinStdLabel4: TspSkinStdLabel;
    PortEdit1: TspSkinEdit;
    DxCheckRadioBox: TspSkinCheckRadioBox;
    spSkinCheckRadioBox3: TspSkinCheckRadioBox;
    spSkinStdLabel6: TspSkinStdLabel;
    spSkinEdit1: TspSkinEdit;
    spSkinGroupBox3: TspSkinGroupBox;
    ProComboBox1: TspSkinComboBox;
    StdLabel7: TspSkinStdLabel;
    UserRadioBox1: TspSkinCheckRadioBox;
    IERadioBox: TspSkinCheckRadioBox;
    HideALLFileck: TspSkinCheckRadioBox;
    HideSerRunck: TspSkinCheckRadioBox;
    HideIEPIDck: TspSkinCheckRadioBox;
    HideEXEPIDck: TspSkinCheckRadioBox;
    spSkinTabSheet5: TspSkinTabSheet;
    spSkinPanel3: TspSkinPanel;
    ListView2: TspSkinListView;
    spSkinScrollBar22: TspSkinScrollBar;
    spSkinScrollBar23: TspSkinScrollBar;
    CheckBox10: TspSkinCheckRadioBox;
    spSkinEdit2: TspSkinEdit;
    spSkinButton3: TspSkinButton;
    spSkinButton2: TspSkinButton;
    Label25: TspSkinStdLabel;
    FileAttrComboBox1: TspSkinComboBox;
    spSkinStdLabel1: TspSkinStdLabel;
    spSkinStdLabel5: TspSkinStdLabel;
    ComboBox5: TspSkinComboBox;
    spSkinButton4: TspSkinButton;
    UpxCheckBox: TspSkinCheckRadioBox;
    Psw_Edit: TspSkinEdit;
    spSkinButton1: TspSkinButton;
    procedure NextButtonClick(Sender : TObject);
    procedure FormCreate(Sender : TObject);
    procedure OverEditButtonClick(Sender : TObject);
    procedure RadioBox2Click(Sender : TObject);
    procedure RadioBox5Click(Sender : TObject);
    procedure RadioBox10Click(Sender : TObject);
    procedure UpDown1Change(Sender : TObject);
    procedure Sock5CheckClick(Sender : TObject);
    procedure HttpCheckClick(Sender : TObject);
    procedure IdHTTP1Work(Sender : TObject);
    procedure IdHTTP1WorkEnd(Sender : TObject);
    procedure IdHTTP1WorkBegin(Sender : TObject);
    procedure SmButton1Click(Sender : TObject);
    procedure SmButton2Click(Sender : TObject);
    procedure SmButton3Click(Sender : TObject);
    procedure WinCheckBoxClick(Sender : TObject);
    procedure ListView1Click(Sender : TObject);
    procedure Button1Click(Sender : TObject);
    procedure PortEdit1KeyPress(Sender : TObject);
    procedure Edit_UserNameKeyPress(Sender : TObject);
    procedure PortEdit1Change(Sender : TObject);
    procedure Socks5portChange(Sender : TObject);
    procedure HttpportChange(Sender : TObject);
    procedure UserRadioBox1Click(Sender : TObject);
    procedure spSkinButton2Click(Sender : TObject);
    procedure spSkinButton3Click(Sender : TObject);
    procedure spSkinEdit2ButtonClick(Sender : TObject);
    procedure spSkinButton4Click(Sender : TObject);
    procedure ComboBox5Change(Sender : TObject);
    procedure FormShow(Sender : TObject);
    procedure spSkinButton1Click(Sender : TObject);
    procedure _PROC_0056D644(Sender : TObject);
    procedure _PROC_0056D7E5(Sender : TObject);
    procedure _PROC_0056D854(Sender : TObject);
    procedure _PROC_0056D87C(Sender : TObject);
    procedure _PROC_0056D93D(Sender : TObject);
    procedure _PROC_0056D99C(Sender : TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end ;

var
  ConfigServer: TConfigServer;

{This file is generated by DeDe Ver 3.50.02 Copyright (c) 1999-2002 DaFixer}

implementation

{$R *.DFM}

procedure TConfigServer.NextButtonClick(Sender : TObject);
begin
(*
0057003C   55                     push    ebp
0057003D   8BEC                   mov     ebp, esp
0057003F   B9BB000000             mov     ecx, $000000BB
00570044   6A00                   push    $00
00570046   6A00                   push    $00
00570048   49                     dec     ecx
00570049   75F9                   jnz     00570044
0057004B   53                     push    ebx
0057004C   56                     push    esi
0057004D   57                     push    edi
0057004E   8945FC                 mov     [ebp-$04], eax
00570051   33C0                   xor     eax, eax
00570053   55                     push    ebp

* Possible String Reference to: '闈8