📄 main.pas

📁 灰鸽子2007VIP版源码
💻 PAS
📖 第 1 页 / 共 2 页
字号:
上一页 12
    Ipname2: N.A.;
    Ipname6: N.A.;
    Ipname5: N.A.;
    Ipname3: N.A.;
    Ipname4: N.A.;
    Memo4: N.A.;
    spSkinScrollBar21: N.A.;
    Panel6: N.A.;
    CmdButton18: N.A.;
    CmdButton19: N.A.;
    CmdButton20: N.A.;
    CmdButton21: N.A.;
    N1: TMenuItem;
    N3: TMenuItem;
    N21: N.A.;
    N24: N.A.;
    N36: N.A.;
    N37: N.A.;
    SXRadioBox4: N.A.;
    N38: N.A.;
    N7: TMenuItem;
    EditGroup: N.A.;
    N41: N.A.;
    N42: N.A.;
    SkinInputDialog1: N.A.;
    N43: N.A.;
    N44: N.A.;
    Process_imglist: N.A.;
    SkinMessage1: N.A.;
    spSkinTabSheet5: N.A.;
    spSkinStdLabel3: N.A.;
    spSkinEdit1: N.A.;
    spSkinButton1: N.A.;
    spSkinStdLabel4: N.A.;
    spSkinComboBox1: N.A.;
    IsPRadioBox: N.A.;
    spSkinStdLabel5: N.A.;
    spSkinEdit2: N.A.;
    spSkinTabSheet6: N.A.;
    spSkinPanel5: N.A.;
    spSkinButton2: N.A.;
    spSkinButton3: N.A.;
    spSkinButton4: N.A.;
    spSkinButton5: N.A.;
    spSkinPanel4: N.A.;
    spSkinGroupBox1: N.A.;
    spSkinScrollBar10: N.A.;
    PlugListView: N.A.;
    spSkinScrollBar12: N.A.;
    spSkinGroupBox3: N.A.;
    PlugMemo1: N.A.;
    spSkinScrollBar13: N.A.;
    spSkinPanel6: N.A.;
    spSkinScrollBar5: N.A.;
    spSkinScrollBar4: N.A.;
    Serveronlinelist: N.A.;
    procedure DSFChangeSkinData(Sender : TObject);
    procedure N32Click(Sender : TObject);
    procedure Close2Click(Sender : TObject);
    procedure dggdfgdfgfgfdg1Click(Sender : TObject);
    procedure dfgfgdfg1Click(Sender : TObject);
    procedure DSFSkinMenuOpen(Sender : TObject);
    procedure DSFSkinMenuClose(Sender : TObject);
    procedure toolbutton4Click(Sender : TObject);
    procedure toolbutton2Click(Sender : TObject);
    procedure Loadskin1Click(Sender : TObject);
    procedure About1Click(Sender : TObject);
    procedure Storedskin1Click(Sender : TObject);
    procedure FormCreate(Sender : TObject);
    procedure FormShow(Sender : TObject);
    procedure GetComputer(Sender : TObject);
    procedure GetDrivernum(Sender : TObject);
    procedure DiskInDrive(Sender : TObject);
    procedure ListView1CustomDrawItem(Sender : TObject);
    procedure ToolButton9Click(Sender : TObject);
    procedure ToolButton8Click(Sender : TObject);
    procedure TreeView1Expanding(Sender : TObject);
    procedure ListView1ColumnClick(Sender : TObject);
    procedure ListView1DblClick(Sender : TObject);
    procedure FileToolButton1Click(Sender : TObject);
    procedure PageControl1Change(Sender : TObject);
    procedure Button7Click(Sender : TObject);
    procedure CopyobClick(Sender : TObject);
    procedure CopytoClick(Sender : TObject);
    procedure DelToClick(Sender : TObject);
    procedure NonerunClick(Sender : TObject);
    procedure RenClick(Sender : TObject);
    procedure HiderunClick(Sender : TObject);
    procedure MinrunClick(Sender : TObject);
    procedure MaxrunClick(Sender : TObject);
    procedure RunzClick(Sender : TObject);
    procedure QviweClick(Sender : TObject);
    procedure N16Click(Sender : TObject);
    procedure N17Click(Sender : TObject);
    procedure N18Click(Sender : TObject);
    procedure N19Click(Sender : TObject);
    procedure FileToolButton10Click(Sender : TObject);
    procedure LoadINIFile(Sender : TObject);
    procedure TreeView1MouseDown(Sender : TObject);
    procedure ListView1MouseDown(Sender : TObject);
    procedure FileViewMenuPopup(Sender : TObject);
    procedure FileToolButton9Click(Sender : TObject);
    procedure ListView1Edited(Sender : TObject);
    procedure ListView1Editing(Sender : TObject);
    procedure PcnametEditKeyPress(Sender : TObject);
    procedure TreeView1MouseMove(Sender : TObject);
    procedure TreeView1Change(Sender : TObject);
    procedure FormResize(Sender : TObject);
    procedure OnServerClientDisconnect(Sender : TObject);
    procedure OnServerClientError(Sender : TObject);
    procedure OnServerClientRead(Sender : TObject);
    procedure FormDestroy(Sender : TObject);
    procedure TreeView1CustomDrawItem(Sender : TObject);
    procedure CmdButton6Click(Sender : TObject);
    procedure CmdButton7Click(Sender : TObject);
    procedure CmdButton34Click(Sender : TObject);
    procedure CmdButton35Click(Sender : TObject);
    procedure ToolButton7Click(Sender : TObject);
    procedure ClientSocket4Error(Sender : TObject);
    procedure RadioBox8Click(Sender : TObject);
    procedure GjButton40Click(Sender : TObject);
    procedure CqButton41Click(Sender : TObject);
    procedure XzButton42Click(Sender : TObject);
    procedure GIFAnimatorClick(Sender : TObject);
    procedure N55Click(Sender : TObject);
    procedure HotKeySpy1HotKeys(Sender : TObject);
    procedure CtrlF121Click(Sender : TObject);
    procedure N9Click(Sender : TObject);
    procedure Button44Click(Sender : TObject);
    procedure ServeronlinelistColumnClick(Sender : TObject);
    procedure ServeronlinelistCompare(Sender : TObject);
    procedure Timer4Timer(Sender : TObject);
    procedure N23Click(Sender : TObject);
    procedure N65Click(Sender : TObject);
    procedure N68Click(Sender : TObject);
    procedure N69Click(Sender : TObject);
    procedure Button33Click(Sender : TObject);
    procedure IP1Click(Sender : TObject);
    procedure SelfAV1CRCError(Sender : TObject);
    procedure ControlBar2Resize(Sender : TObject);
    procedure ServeronlinelistCustomDrawItem(Sender : TObject);
    procedure ServeronlinelistInsert(Sender : TObject);
    procedure ServeronlinelistDeletion(Sender : TObject);
    procedure NewOtClick(Sender : TObject);
    procedure FileToolButton5Click(Sender : TObject);
    procedure ListView2CustomDrawItem(Sender : TObject);
    procedure ACMIn1Data(Sender : TObject);
    procedure FileToolButton6Click(Sender : TObject);
    procedure N78Click(Sender : TObject);
    procedure N2Click(Sender : TObject);
    procedure N6Click(Sender : TObject);
    procedure N8Click(Sender : TObject);
    procedure ToolButton3Click(Sender : TObject);
    procedure Button2Click(Sender : TObject);
    procedure N10Click(Sender : TObject);
    procedure TreeView3Change(Sender : TObject);
    procedure TreeView3Expanding(Sender : TObject);
    procedure TreeView3MouseDown(Sender : TObject);
    procedure MenuItem1Click(Sender : TObject);
    procedure N34Click(Sender : TObject);
    procedure N11Click(Sender : TObject);
    procedure DWORD1Click(Sender : TObject);
    procedure N14Click(Sender : TObject);
    procedure N25Click(Sender : TObject);
    procedure N26Click(Sender : TObject);
    procedure MenuItem8Click(Sender : TObject);
    procedure MenuItem9Click(Sender : TObject);
    procedure ToolButton5Click(Sender : TObject);
    procedure Button1Click(Sender : TObject);
    procedure CmdButton1Click(Sender : TObject);
    procedure CmdButton3Click(Sender : TObject);
    procedure CmdButton5Click(Sender : TObject);
    procedure CmdButton4Click(Sender : TObject);
    procedure CmdButton8Click(Sender : TObject);
    procedure CmdButton9Click(Sender : TObject);
    procedure CmdButton10Click(Sender : TObject);
    procedure CmdButton11Click(Sender : TObject);
    procedure CmdButton12Click(Sender : TObject);
    procedure CmdButton13Click(Sender : TObject);
    procedure CmdButton22Click(Sender : TObject);
    procedure ListView5Click(Sender : TObject);
    procedure CmdButton23Click(Sender : TObject);
    procedure CmdButton24Click(Sender : TObject);
    procedure CmdButton26Click(Sender : TObject);
    procedure CmdButton29Click(Sender : TObject);
    procedure CmdButton27Click(Sender : TObject);
    procedure CmdButton28Click(Sender : TObject);
    procedure CmdButton30Click(Sender : TObject);
    procedure CmdButton31Click(Sender : TObject);
    procedure CmdButton32Click(Sender : TObject);
    procedure CmdButton33Click(Sender : TObject);
    procedure OnServerClientConnect(Sender : TObject);
    procedure EXE1Click(Sender : TObject);
    procedure Ftp1Click(Sender : TObject);
    procedure Web1Click(Sender : TObject);
    procedure N30Click(Sender : TObject);
    procedure CmdButton227Click(Sender : TObject);
    procedure SpeedButton6Click(Sender : TObject);
    procedure SpeedButton5Click(Sender : TObject);
    procedure SXRadioBox1Click(Sender : TObject);
    procedure SXRadioBox2Click(Sender : TObject);
    procedure SXRadioBox3Click(Sender : TObject);
    procedure SXGBButton1Click(Sender : TObject);
    procedure RadioBox10Click(Sender : TObject);
    procedure RadioBox11Click(Sender : TObject);
    procedure BZButtonClick(Sender : TObject);
    procedure TreeView1DblClick(Sender : TObject);
    procedure PcName1Click(Sender : TObject);
    procedure CmdButton18Click(Sender : TObject);
    procedure CmdButton19Click(Sender : TObject);
    procedure CmdButton20Click(Sender : TObject);
    procedure CmdButton21Click(Sender : TObject);
    procedure N3Click(Sender : TObject);
    procedure N21Click(Sender : TObject);
    procedure N37Click(Sender : TObject);
    procedure SXRadioBox4Click(Sender : TObject);
    procedure TreeView1AdvancedCustomDrawItem(Sender : TObject);
    procedure ViewPopupMenuPopup(Sender : TObject);
    procedure N42Click(Sender : TObject);
    procedure ToolButton1Click(Sender : TObject);
    procedure N44Click(Sender : TObject);
    procedure OnServerAccept(Sender : TObject);
    procedure spSkinButton1Click(Sender : TObject);
    procedure spSkinButton2Click(Sender : TObject);
    procedure spSkinButton4Click(Sender : TObject);
    procedure spSkinButton3Click(Sender : TObject);
    procedure spSkinButton5Click(Sender : TObject);
    procedure _PROC_005B41D4(Sender : TObject);
    procedure _PROC_005B4489(Sender : TObject);
    procedure _PROC_005B4599(Sender : TObject);
    procedure _PROC_005B4660(Sender : TObject);
    procedure _PROC_005B4825(Sender : TObject);
    procedure _PROC_005B4834(Sender : TObject);
    procedure _PROC_005B4945(Sender : TObject);
    procedure _PROC_005B4AF5(Sender : TObject);
    procedure _PROC_005B4C6D(Sender : TObject);
    procedure _PROC_005B4D19(Sender : TObject);
    procedure _PROC_005B581D(Sender : TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end ;

var
  MainForm: TMainForm;

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

implementation

{$R *.DFM}

procedure TMainForm.DSFChangeSkinData(Sender : TObject);
begin
(*
005B55DC   8B8014030000           mov     eax, [eax+$0314]

* Possible String Reference to: 'Skin technology'
|
005B55E2   B9FC555B00             mov     ecx, $005B55FC

* Possible String Reference to: 'Caption2'
|
005B55E7   BA14565B00             mov     edx, $005B5614

* Reference to : TspSkinMDITabsBar._PROC_004E3980()
|
005B55EC   E88FE3F2FF             call    004E3980
005B55F1   C3                     ret

*)
end;

procedure TMainForm.N32Click(Sender : TObject);
begin
(*

* Reference to: Forms.TCustomForm.Close(TCustomForm);
|
005B5620   E8C3E9ECFF             call    00483FE8
005B5625   C3                     ret

*)
end;

procedure TMainForm.Close2Click(Sender : TObject);
begin
(*

* Reference to: Forms.TCustomForm.Close(TCustomForm);
|
005B5628   E8BBE9ECFF             call    00483FE8
005B562D   C3                     ret

*)
end;

procedure TMainForm.dggdfgdfgfgfdg1Click(Sender : TObject);
begin
(*

* Reference to: Forms.TCustomForm.Close(TCustomForm);
|
005B5630   E8B3E9ECFF             call    00483FE8
005B5635   C3                     ret

*)
end;

procedure TMainForm.dfgfgdfg1Click(Sender : TObject);
begin
(*
005B5638   55                     push    ebp
005B5639   8BEC                   mov     ebp, esp
005B563B   6A00                   push    $00
005B563D   53                     push    ebx
005B563E   8BD8                   mov     ebx, eax
005B5640   33C0                   xor     eax, eax
005B5642   55                     push    ebp

* Possible String Reference to: '辄熹
上一页 12
💿 文件大小 1094 K
👤 上传用户 harveywang
📂 所属分类 Internet/网络编程
🏷️ 相关标签

#2007 #VIP #源码
⌨️ 快捷键说明

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