?? frmconfig.pas
字號:
unit frmConfig;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics,
Controls, Forms, Dialogs, StdCtrls
type
TfrmSetup=class(TForm)
PageControl1: TPageControl;
TabSheet1: TTabSheet;
TabSheet2: TTabSheet;
Label7: TLabel;
ListBoxFilterText: TListBox;
ButtonAdd: TButton;
ButtonMod: TButton;
ButtonDel: TButton;
btnDSave: TButton;
CheckBoxAllowClientDelChr: TCheckBox;
SpinEditAllowDelChrLvl: TSpinEdit;
CheckBoxAllowGetBackDelChr: TCheckBox;
CheckBoxgUseSpecChar: TCheckBox;
btnGSave: TButton;
Label1: TLabel;
CheckBoxAllowCreateCharOpt1: TCheckBox;
procedure SpinEditAllowDelChrLvlChange(Sender : TObject);
procedure CheckBoxAllowGetBackDelChrClick(Sender : TObject);
procedure CheckBoxAllowClientDelChrClick(Sender : TObject);
procedure CheckBoxgUseSpecCharClick(Sender : TObject);
procedure btnGSaveClick(Sender : TObject);
procedure ButtonAddClick(Sender : TObject);
procedure ButtonDelClick(Sender : TObject);
procedure ButtonModClick(Sender : TObject);
procedure ListBoxFilterTextClick(Sender : TObject);
procedure ListBoxFilterTextDblClick(Sender : TObject);
procedure btnDSaveClick(Sender : TObject);
procedure CheckBoxAllowCreateCharOpt1Click(Sender : TObject);
procedure _PROC_004DA7AC(Sender : TObject);
procedure _PROC_004DA7CC(Sender : TObject);
procedure _PROC_004DA9F5(Sender : TObject);
procedure _PROC_004DAE40(Sender : TObject);
procedure _PROC_004DAE70(Sender : TObject);
procedure _PROC_004DAE78(Sender : TObject);
procedure _PROC_004DAEDD(Sender : TObject);
procedure _PROC_004DAFAD(Sender : TObject);
procedure _PROC_004DB0A5(Sender : TObject);
procedure _PROC_004DB0D4(Sender : TObject);
procedure _PROC_004DB0DC(Sender : TObject);
procedure _PROC_004DB162(Sender : TObject);
procedure _PROC_004DB2D6(Sender : TObject);
procedure _PROC_004DB3AF(Sender : TObject);
procedure _PROC_004DB483(Sender : TObject);
private
{ Private declarations }
public
{ Public declarations }
end ;
var
frmSetup: TfrmSetup;
{This file is generated by DaRk Ver 3.50.04 Copyright (c) 1999-2002 DaFixer}
implementation
{$R *.DFM}
procedure TfrmSetup.SpinEditAllowDelChrLvlChange(Sender : TObject);
begin
(*
004DA7EC 53 push ebx
004DA7ED 8BD8 mov ebx, eax
004DA7EF 8B8320030000 mov eax, [ebx+$0320]
* Reference to : TTimerSpeedButton._PROC_004960DC()
|
004DA7F5 E8E2B8FBFF call 004960DC
004DA7FA 8B15107F4E00 mov edx, [$004E7F10]
004DA800 8902 mov [edx], eax
004DA802 A1107F4E00 mov eax, dword ptr [$004E7F10]
004DA807 8138FFFF0000 cmp dword ptr [eax], $0000FFFF
004DA80D 7E1E jle 004DA82D
004DA80F A1107F4E00 mov eax, dword ptr [$004E7F10]
004DA814 C700FFFF0000 mov dword ptr [eax], $0000FFFF
004DA81A 8B15107F4E00 mov edx, [$004E7F10]
004DA820 8B12 mov edx, [edx]
004DA822 8B8320030000 mov eax, [ebx+$0320]
* Reference to : TTimerSpeedButton._PROC_00496194()
|
004DA828 E867B9FBFF call 00496194
004DA82D A1107F4E00 mov eax, dword ptr [$004E7F10]
004DA832 833801 cmp dword ptr [eax], +$01
004DA835 7D1E jnl 004DA855
004DA837 A1107F4E00 mov eax, dword ptr [$004E7F10]
004DA83C C70001000000 mov dword ptr [eax], $00000001
004DA842 8B15107F4E00 mov edx, [$004E7F10]
004DA848 8B12 mov edx, [edx]
004DA84A 8B8320030000 mov eax, [ebx+$0320]
* Reference to : TTimerSpeedButton._PROC_00496194()
|
004DA850 E83FB9FBFF call 00496194
004DA855 8BC3 mov eax, ebx
* Reference to : TfrmSetup._PROC_004DA7AC()
|
004DA857 E850FFFFFF call 004DA7AC
004DA85C 5B pop ebx
004DA85D C3 ret
*)
end;
procedure TfrmSetup.CheckBoxAllowGetBackDelChrClick(Sender : TObject);
begin
(*
004DA860 53 push ebx
004DA861 8BD8 mov ebx, eax
004DA863 8B8324030000 mov eax, [ebx+$0324]
004DA869 8B10 mov edx, [eax]
004DA86B FF92C8000000 call dword ptr [edx+$00C8]
004DA871 8B1508834E00 mov edx, [$004E8308]
004DA877 8802 mov [edx], al
004DA879 8BC3 mov eax, ebx
* Reference to : TfrmSetup._PROC_004DA7AC()
|
004DA87B E82CFFFFFF call 004DA7AC
004DA880 5B pop ebx
004DA881 C3 ret
*)
end;
procedure TfrmSetup.CheckBoxAllowClientDelChrClick(Sender : TObject);
begin
(*
004DA884 53 push ebx
004DA885 8BD8 mov ebx, eax
004DA887 8B831C030000 mov eax, [ebx+$031C]
004DA88D 8B10 mov edx, [eax]
004DA88F FF92C8000000 call dword ptr [edx+$00C8]
004DA895 8B15747F4E00 mov edx, [$004E7F74]
004DA89B 8802 mov [edx], al
004DA89D 8B15747F4E00 mov edx, [$004E7F74]
004DA8A3 8A12 mov dl, byte ptr [edx]
004DA8A5 8B8320030000 mov eax, [ebx+$0320]
004DA8AB 8B08 mov ecx, [eax]
004DA8AD FF5164 call dword ptr [ecx+$64]
004DA8B0 8BC3 mov eax, ebx
* Reference to : TfrmSetup._PROC_004DA7AC()
|
004DA8B2 E8F5FEFFFF call 004DA7AC
004DA8B7 5B pop ebx
004DA8B8 C3 ret
*)
end;
procedure TfrmSetup.CheckBoxgUseSpecCharClick(Sender : TObject);
begin
(*
004DA8BC 53 push ebx
004DA8BD 8BD8 mov ebx, eax
004DA8BF 8B8328030000 mov eax, [ebx+$0328]
004DA8C5 8B10 mov edx, [eax]
004DA8C7 FF92C8000000 call dword ptr [edx+$00C8]
004DA8CD 8B1590824E00 mov edx, [$004E8290]
004DA8D3 8802 mov [edx], al
004DA8D5 8BC3 mov eax, ebx
* Reference to : TfrmSetup._PROC_004DA7AC()
|
004DA8D7 E8D0FEFFFF call 004DA7AC
004DA8DC 5B pop ebx
004DA8DD C3 ret
*)
end;
procedure TfrmSetup.btnGSaveClick(Sender : TObject);
begin
(*
004DA8E0 53 push ebx
004DA8E1 56 push esi
004DA8E2 8BD8 mov ebx, eax
004DA8E4 A1DC7E4E00 mov eax, dword ptr [$004E7EDC]
004DA8E9 833800 cmp dword ptr [eax], +$00
004DA8EC 0F849D000000 jz 004DA98F
004DA8F2 A1107F4E00 mov eax, dword ptr [$004E7F10]
004DA8F7 8B00 mov eax, [eax]
004DA8F9 50 push eax
004DA8FA A1DC7E4E00 mov eax, dword ptr [$004E7EDC]
004DA8FF 8B00 mov eax, [eax]
* Possible String Reference to: 'AllowDelChrLvl'
|
004DA901 B99CA94D00 mov ecx, $004DA99C
* Possible String Reference to: 'Setup'
|
004DA906 BAB4A94D00 mov edx, $004DA9B4
004DA90B 8B30 mov esi, [eax]
004DA90D FF560C call dword ptr [esi+$0C]
004DA910 A108834E00 mov eax, dword ptr [$004E8308]
004DA915 8A00 mov al, byte ptr [eax]
004DA917 50 push eax
004DA918 A1DC7E4E00 mov eax, dword ptr [$004E7EDC]
004DA91D 8B00 mov eax, [eax]
* Possible String Reference to: 'AllowGetBackDelChr'
|
004DA91F B9C4A94D00 mov ecx, $004DA9C4
* Possible String Reference to: 'Setup'
|
004DA924 BAB4A94D00 mov edx, $004DA9B4
004DA929 8B30 mov esi, [eax]
004DA92B FF5614 call dword ptr [esi+$14]
004DA92E A1747F4E00 mov eax, dword ptr [$004E7F74]
004DA933 8A00 mov al, byte ptr [eax]
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -