📄 aswin.pas
字号:
|
0063FE7F 89B318040000 mov [ebx+$0418], esi
* Reference to control TAlysWin.mLeftPanel : TPanel
|
0063FE85 8B9344030000 mov edx, [ebx+$0344]
0063FE8B 8BC6 mov eax, esi
0063FE8D 8B08 mov ecx, [eax]
* Possible reference to virtual method TVertPan.OFFS_60
|
0063FE8F FF5160 call dword ptr [ecx+$60]
0063FE92 8BD3 mov edx, ebx
0063FE94 8BC6 mov eax, esi
* Reference to : TVertPan._PROC_006C08E0()
|
0063FE96 E8450A0800 call 006C08E0
0063FE9B 33D2 xor edx, edx
0063FE9D 8BC6 mov eax, esi
* Reference to: controls.TControl.SetLeft(TControl;Integer);
|
0063FE9F E8A093DFFF call 00439244
0063FEA4 33D2 xor edx, edx
0063FEA6 8BC6 mov eax, esi
* Reference to: controls.TControl.SetColor(TControl;TColor);
|
0063FEA8 E82F9DDFFF call 00439BDC
0063FEAD BA3C000000 mov edx, $0000003C
0063FEB2 8BC6 mov eax, esi
* Reference to: controls.TControl.SetWidth(TControl;Integer);
|
0063FEB4 E8CF93DFFF call 00439288
* Reference to field TAlysWin.OFFS_0439 : Byte
|
0063FEB9 80BB3904000000 cmp byte ptr [ebx+$0439], $00
0063FEC0 740B jz 0063FECD
0063FEC2 B203 mov dl, $03
0063FEC4 8BC6 mov eax, esi
* Reference to: controls.TControl.SetAlign(TControl;TAlign);
|
0063FEC6 E87191DFFF call 0043903C
0063FECB EB09 jmp 0063FED6
0063FECD B204 mov dl, $04
0063FECF 8BC6 mov eax, esi
* Reference to: controls.TControl.SetAlign(TControl;TAlign);
|
0063FED1 E86691DFFF call 0043903C
* Reference to control TAlysWin.mLeftPanel : TPanel
|
0063FED6 8B8B44030000 mov ecx, [ebx+$0344]
0063FEDC B201 mov dl, $01
* Reference to class TPanel
|
0063FEDE A12CBC4500 mov eax, dword ptr [$0045BC2C]
* Reference to: extctrls.TCustomPanel.Create(TCustomPanel;boolean;TComponent);
|
0063FEE3 E834F6E1FF call 0045F51C
0063FEE8 8BF0 mov esi, eax
* Reference to field TAlysWin.OFFS_042C
|
0063FEEA 89B32C040000 mov [ebx+$042C], esi
0063FEF0 33D2 xor edx, edx
0063FEF2 8BC6 mov eax, esi
* Reference to: extctrls.TCustomPanel.SetBevelInner(TCustomPanel;TBevelCut);
|
0063FEF4 E82FFAE1FF call 0045F928
0063FEF9 33D2 xor edx, edx
0063FEFB 8BC6 mov eax, esi
* Reference to: controls.TControl.SetColor(TControl;TColor);
|
0063FEFD E8DA9CDFFF call 00439BDC
* Reference to control TAlysWin.mLeftPanel : TPanel
|
0063FF02 8B9344030000 mov edx, [ebx+$0344]
0063FF08 8BC6 mov eax, esi
0063FF0A 8B08 mov ecx, [eax]
* Reference to method TPanel.SetParent(TWinControl)
|
0063FF0C FF5160 call dword ptr [ecx+$60]
* Reference to field TPanel.OFFS_00E4
|
0063FF0F 899EE4000000 mov [esi+$00E4], ebx
* Reference to field TPanel.OnResize : TNotifyEvent
|
0063FF15 C786E000000080416400 mov dword ptr [esi+$00E0], $00644180
0063FF1F B205 mov dl, $05
0063FF21 8BC6 mov eax, esi
* Reference to: controls.TControl.SetAlign(TControl;TAlign);
|
0063FF23 E81491DFFF call 0043903C
0063FF28 8BC3 mov eax, ebx
0063FF2A 8B10 mov edx, [eax]
* Possible reference to virtual method TAlysWin.OFFS_01E8
|
0063FF2C FF92E8010000 call dword ptr [edx+$01E8]
0063FF32 8BC3 mov eax, ebx
0063FF34 8B10 mov edx, [eax]
* Possible reference to virtual method TAlysWin.OFFS_0178
|
0063FF36 FF9278010000 call dword ptr [edx+$0178]
0063FF3C 5E pop esi
0063FF3D 5B pop ebx
0063FF3E C3 ret
*)
end;
procedure TAlysWin.FormResize(Sender : TObject);
begin
(*
006427E0 53 push ebx
006427E1 56 push esi
006427E2 83C4D0 add esp, -$30
006427E5 8BD8 mov ebx, eax
006427E7 54 push esp
* Reference to THJ32Main instance
|
006427E8 A158D37700 mov eax, dword ptr [$0077D358]
006427ED 8B00 mov eax, [eax]
* Reference to field THJ32Main.ClientHandle : HWND
|
006427EF 8B803C020000 mov eax, [eax+$023C]
006427F5 50 push eax
* Reference to: user32.GetClientRect()
|
006427F6 E8A561DCFF call 004089A0
006427FB 8D542410 lea edx, [esp+$10]
006427FF 8BC3 mov eax, ebx
00642801 8B08 mov ecx, [eax]
* Reference to method TAlysWin.GetClientRect()
|
00642803 FF5140 call dword ptr [ecx+$40]
00642806 8B442418 mov eax, [esp+$18]
0064280A 3B442408 cmp eax, [esp+$08]
0064280E 0F859F000000 jnz 006428B3
00642814 8D542420 lea edx, [esp+$20]
00642818 8BC3 mov eax, ebx
0064281A 8B08 mov ecx, [eax]
* Reference to method TAlysWin.GetClientRect()
|
0064281C FF5140 call dword ptr [ecx+$40]
0064281F 8B44242C mov eax, [esp+$2C]
00642823 3B44240C cmp eax, [esp+$0C]
00642827 0F8586000000 jnz 006428B3
* Reference to field TAlysWin.Height : Integer
|
0064282D 8B433C mov eax, [ebx+$3C]
00642830 50 push eax
* Reference to field TAlysWin.Width : Integer
|
00642831 8B4B38 mov ecx, [ebx+$38]
00642834 33D2 xor edx, edx
00642836 33C0 xor eax, eax
* Reference to : TInfoMxDlg.Proc_0065FDDC()
|
00642838 E89FD50100 call 0065FDDC
* Reference to field TAlysWin.OFFS_0364 : Byte
|
0064283D 80BB6403000000 cmp byte ptr [ebx+$0364], $00
00642844 746D jz 006428B3
* Reference to field TAlysWin.OFFS_056C
|
00642846 8B836C050000 mov eax, [ebx+$056C]
0064284C 85C0 test eax, eax
0064284E 7452 jz 006428A2
00642850 8BF0 mov esi, eax
00642852 33D2 xor edx, edx
00642854 8BC6 mov eax, esi
* Reference to: controls.TControl.SetTop(TControl;Integer);
|
00642856 E8096ADFFF call 00439264
0064285B 8BC3 mov eax, ebx
* Reference to: controls.TControl.GetClientHeight(TControl):Integer;
|
0064285D E8966CDFFF call 004394F8
00642862 B906000000 mov ecx, $00000006
00642867 99 cdq
00642868 F7F9 idiv ecx
0064286A 8BD0 mov edx, eax
0064286C 8BC6 mov eax, esi
* Reference to: controls.TControl.SetLeft(TControl;Integer);
|
0064286E E8D169DFFF call 00439244
00642873 8BC3 mov eax, ebx
* Reference to: controls.TControl.GetClientHeight(TControl):Integer;
|
00642875 E87E6CDFFF call 004394F8
0064287A 8BD0 mov edx, eax
0064287C 8BC6 mov eax, esi
* Reference to: controls.TControl.SetHeight(TControl;Integer);
|
0064287E E8256ADFFF call 004392A8
* Reference to control TAlysWin.mLeftPanel : TPanel
|
00642883 8B8344030000 mov eax, [ebx+$0344]
* Reference to: controls.TControl.GetClientWidth(TControl):Integer;
|
00642889 E8266CDFFF call 004394B4
0064288E 85C0 test eax, eax
00642890 7903 jns 00642895
00642892 83C003 add eax, +$03
00642895 C1F802 sar eax, $02
00642898 8D1440 lea edx, [eax+eax*2]
0064289B 8BC6 mov eax, esi
* Reference to: controls.TControl.SetWidth(TControl;Integer);
|
0064289D E8E669DFFF call 00439288
006428A2 8BC3 mov eax, ebx
006428A4 8B10 mov edx, [eax]
* Possible reference to virtual method TAlysWin.OFFS_020C
|
006428A6 FF920C020000 call dword ptr [edx+$020C]
006428AC 8BC3 mov eax, ebx
* Reference to : TAlysWin._PROC_00640E58()
|
006428AE E8A5E5FFFF call 00640E58
006428B3 83C430 add esp, +$30
006428B6 5E pop esi
006428B7 5B pop ebx
006428B8 C3 ret
*)
end;
procedure TAlysWin.FormActivate(Sender : TObject);
begin
(*
006428BC B202 mov dl, $02
* Reference to: forms.TCustomForm.SetWindowState(TCustomForm;TWindowState);
|
006428BE E80D17E1FF call 00453FD0
006428C3 C3 ret
*)
end;
procedure TAlysWin.FormKeyDown(Sender : TObject);
begin
(*
0064322C 55 push ebp
0064322D 8BEC mov ebp, esp
0064322F 83C4F8 add esp, -$08
00643232 53 push ebx
00643233 56 push esi
00643234 57 push edi
00643235 8BF9 mov edi, ecx
00643237 8955FC mov [ebp-$04], edx
0064323A 8BF0 mov esi, eax
0064323C 66833F25 cmp word ptr [edi], +$25
00643240 7412 jz 00643254
00643242 66833F27 cmp word ptr [edi], +$27
00643246 740C jz 00643254
00643248 66833F26 cmp word ptr [edi], +$26
0064324C 7406 jz 00643254
0064324E 66833F28 cmp word ptr [edi], +$28
00643252 7525 jnz 00643279
* Reference to field TAlysWin.OFFS_03DC
|
00643254 8B86DC030000 mov eax, [esi+$03DC]
0064325A 8B8030110000 mov eax, [eax+$1130]
00643260 85C0 test eax, eax
00643262 7415 jz 00643279
00643264 8078290B cmp byte ptr [eax+$29], $0B
00643268 750F jnz 00643279
0064326A 668B17 mov dx, word ptr [edi]
0064326D 8BC6 mov eax, esi
* Reference to : TAlysWin.Proc_00647500()
|
0064326F E88C420000 call 00647500
00643274 E9BF090000 jmp 00643C38
00643279 F6450804 test byte ptr [ebp+$08], $04
0064327D 745E jz 006432DD
0064327F 0FB707 movzx eax, word ptr [edi]
00643282 83F844 cmp eax, +$44
00643285 7F11 jnle 00643298
00643287 7433 jz 006432BC
00643289 83C0CE add eax, -$32
0064328C 83E807 sub eax, +$07
0064328F 7211 jb 006432A2
00643291 83E80A sub eax, +$0A
00643294 7432 jz 006432C8
00643296 EB45 jmp 006432DD
00643298 83E863 sub eax, +$63
0064329B 742B jz 006432C8
0064329D 48 dec eax
0064329E 741C jz 006432BC
006432A0 EB3B jmp 006432DD
* Reference to field TAlysWin.OFFS_0321 : Byte
|
006432A2 80BE2103000000 cmp byte ptr [esi+$0321], $00
006432A9 7532 jnz 006432DD
006432AB 0FB717 movzx edx, word ptr [edi]
006432AE 83EA30 sub edx, +$30
006432B1 33C9 xor ecx, ecx
006432B3 8BC6 mov eax, esi
* Reference to : TAlysWin.Proc_00640130()
|
006432B5 E876CEFFFF call 00640130
006432BA EB21 jmp 006432DD
006432BC 8BC6 mov eax, esi
006432BE 8B10 mov edx, [eax]
* Possible reference to virtual method TAlysWin.OFFS_01BC
|
006432C0 FF92BC010000 call dword ptr [edx+$01BC]
006432C6 EB15 jmp 006432DD
* Reference to field TAlysWin.OFFS_0570 : Byte
|
006432C8 80BE7005000000 cmp byte ptr [esi+$0570], $00
006432CF 750C jnz 006432DD
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -