📄 labeltab.pas
字号:
|
00749924 E8FF54CDFF call 0041EE28
00749929 682000CC00 push $00CC0020
* Reference to pointer to GlobalVar_007991D8
|
0074992E A1A0D37700 mov eax, dword ptr [$0077D3A0]
00749933 8B00 mov eax, [eax]
* Reference to field GlobalVar_007991D8.OFFS_0058
|
00749935 8B4058 mov eax, [eax+$58]
00749938 50 push eax
00749939 6A00 push $00
* Reference to field TfrmLabelTab.OFFS_02D8
|
0074993B 8B83D8020000 mov eax, [ebx+$02D8]
* Reference to: graphics.TBitmap.GetCanvas(TBitmap):TCanvas;
|
00749941 E806A9CDFF call 0042424C
* Reference to: graphics.TCanvas.GetHandle(TCanvas):HDC;
|
00749946 E8FD5ACDFF call 0041F448
0074994B 50 push eax
* Reference to field TfrmLabelTab.OFFS_02DC
|
0074994C 8B83DC020000 mov eax, [ebx+$02DC]
00749952 8B10 mov edx, [eax]
00749954 FF5220 call dword ptr [edx+$20]
00749957 50 push eax
* Reference to field TfrmLabelTab.OFFS_02DC
|
00749958 8B83DC020000 mov eax, [ebx+$02DC]
0074995E 8B10 mov edx, [eax]
00749960 FF522C call dword ptr [edx+$2C]
00749963 50 push eax
* Reference to pointer to GlobalVar_007991D8
|
00749964 A1A0D37700 mov eax, dword ptr [$0077D3A0]
00749969 8B00 mov eax, [eax]
* Reference to field GlobalVar_007991D8.OFFS_0058
|
0074996B 8B4058 mov eax, [eax+$58]
0074996E 50 push eax
0074996F 6A00 push $00
* Reference to field TfrmLabelTab.OFFS_02DC
|
00749971 8B83DC020000 mov eax, [ebx+$02DC]
* Reference to: graphics.TBitmap.GetCanvas(TBitmap):TCanvas;
|
00749977 E8D0A8CDFF call 0042424C
* Reference to: graphics.TCanvas.GetHandle(TCanvas):HDC;
|
0074997C E8C75ACDFF call 0041F448
00749981 50 push eax
* Reference to: gdi32.BitBlt()
|
00749982 E839EACBFF call 004083C0
00749987 33C0 xor eax, eax
* Reference to field TfrmLabelTab.OFFS_02D4
|
00749989 8983D4020000 mov [ebx+$02D4], eax
0074998F 83C414 add esp, +$14
00749992 5D pop ebp
00749993 5F pop edi
00749994 5E pop esi
00749995 5B pop ebx
00749996 C3 ret
*)
end;
procedure TfrmLabelTab.FormShow(Sender : TObject);
begin
(*
007499A8 C3 ret
*)
end;
procedure TfrmLabelTab.FormDestroy(Sender : TObject);
begin
(*
007499AC 53 push ebx
007499AD 56 push esi
007499AE 8BF0 mov esi, eax
007499B0 33DB xor ebx, ebx
007499B2 8B849EE4020000 mov eax, [esi+ebx*4+$02E4]
007499B9 85C0 test eax, eax
007499BB 7405 jz 007499C2
* Reference to: system.TObject.Free(TObject);
|
007499BD E80A99CBFF call 004032CC
007499C2 43 inc ebx
007499C3 83FB03 cmp ebx, +$03
007499C6 75EA jnz 007499B2
* Reference to field TfrmLabelTab.OFFS_02D4
|
007499C8 8B86D4020000 mov eax, [esi+$02D4]
007499CE 50 push eax
* Reference to: gdi32.DeleteObject()
|
007499CF E8D4EACBFF call 004084A8
* Reference to field TfrmLabelTab.OFFS_02D8
|
007499D4 8B86D8020000 mov eax, [esi+$02D8]
* Reference to: system.TObject.Free(TObject);
|
007499DA E8ED98CBFF call 004032CC
007499DF 5E pop esi
007499E0 5B pop ebx
007499E1 C3 ret
*)
end;
procedure TfrmLabelTab.FormPaint(Sender : TObject);
begin
(*
007499E4 53 push ebx
007499E5 8BD8 mov ebx, eax
007499E7 682000CC00 push $00CC0020
007499EC 6A00 push $00
007499EE 6A00 push $00
* Reference to field TfrmLabelTab.OFFS_02D8
|
007499F0 8B83D8020000 mov eax, [ebx+$02D8]
* Reference to: graphics.TBitmap.GetCanvas(TBitmap):TCanvas;
|
007499F6 E851A8CDFF call 0042424C
* Reference to: graphics.TCanvas.GetHandle(TCanvas):HDC;
|
007499FB E8485ACDFF call 0041F448
00749A00 50 push eax
* Reference to pointer to GlobalVar_007991D8
|
00749A01 A1A0D37700 mov eax, dword ptr [$0077D3A0]
00749A06 8B00 mov eax, [eax]
* Reference to field GlobalVar_007991D8.OFFS_0050
|
00749A08 8B4050 mov eax, [eax+$50]
00749A0B 50 push eax
00749A0C 6A12 push $12
00749A0E 6A00 push $00
00749A10 6A00 push $00
00749A12 8BC3 mov eax, ebx
* Reference to: forms.TCustomForm.GetCanvas(TCustomForm):TCanvas;
|
00749A14 E807A1D0FF call 00453B20
* Reference to: graphics.TCanvas.GetHandle(TCanvas):HDC;
|
00749A19 E82A5ACDFF call 0041F448
00749A1E 50 push eax
* Reference to: gdi32.BitBlt()
|
00749A1F E89CE9CBFF call 004083C0
00749A24 5B pop ebx
00749A25 C3 ret
*)
end;
procedure TfrmLabelTab.FormMouseMove(Sender : TObject);
begin
(*
00749A28 55 push ebp
00749A29 8BEC mov ebp, esp
00749A2B 33C0 xor eax, eax
00749A2D 55 push ebp
00749A2E 68479A7400 push $00749A47
***** TRY
|
00749A33 64FF30 push dword ptr fs:[eax]
00749A36 648920 mov fs:[eax], esp
00749A39 33C0 xor eax, eax
00749A3B 5A pop edx
00749A3C 59 pop ecx
00749A3D 59 pop ecx
00749A3E 648910 mov fs:[eax], edx
****** FINALLY
|
00749A41 684E9A7400 push $00749A4E
00749A46 C3 ret
* Reference to: system.@HandleFinally;
|
00749A47 E9E09FCBFF jmp 00403A2C
00749A4C EBF8 jmp 00749A46
****** END
|
00749A4E 5D pop ebp
00749A4F C20800 ret $0008
*)
end;
procedure TfrmLabelTab.FormMouseDown(Sender : TObject);
begin
(*
00749A54 55 push ebp
00749A55 8BEC mov ebp, esp
00749A57 6A00 push $00
00749A59 53 push ebx
00749A5A 8B5508 mov edx, [ebp+$08]
00749A5D 33C0 xor eax, eax
00749A5F 55 push ebp
00749A60 68B99A7400 push $00749AB9
***** TRY
|
00749A65 64FF30 push dword ptr fs:[eax]
00749A68 648920 mov fs:[eax], esp
00749A6B 33DB xor ebx, ebx
00749A6D 33C0 xor eax, eax
* Reference to pointer to GlobalVar_007991D8
|
00749A6F 8B0DA0D37700 mov ecx, [$0077D3A0]
00749A75 8B09 mov ecx, [ecx]
00749A77 3B548158 cmp edx, [ecx+eax*4+$58]
00749A7B 7F04 jnle 00749A81
00749A7D 8BD8 mov ebx, eax
00749A7F EB06 jmp 00749A87
00749A81 40 inc eax
00749A82 83F803 cmp eax, +$03
00749A85 75E8 jnz 00749A6F
00749A87 8D45FC lea eax, [ebp-$04]
* Reference to pointer to GlobalVar_007991D8
|
00749A8A 8B15A0D37700 mov edx, [$0077D3A0]
00749A90 8B12 mov edx, [edx]
00749A92 8B54DA68 mov edx, [edx+ebx*8+$68]
* Reference to: system.@LStrLAsg;
|
00749A96 E8F1A6CBFF call 0040418C
00749A9B 8B45FC mov eax, [ebp-$04]
* Reference to: Unit_00651A88.Proc_006543DC
|
00749A9E E839A9F0FF call 006543DC
00749AA3 33C0 xor eax, eax
00749AA5 5A pop edx
00749AA6 59 pop ecx
00749AA7 59 pop ecx
00749AA8 648910 mov fs:[eax], edx
****** FINALLY
|
00749AAB 68C09A7400 push $00749AC0
00749AB0 8D45FC lea eax, [ebp-$04]
* Reference to: system.@LStrClr(String;String);
|
00749AB3 E83CA6CBFF call 004040F4
00749AB8 C3 ret
* Reference to: system.@HandleFinally;
|
00749AB9 E96E9FCBFF jmp 00403A2C
00749ABE EBF0 jmp 00749AB0
****** END
|
00749AC0 5B pop ebx
00749AC1 59 pop ecx
00749AC2 5D pop ebp
00749AC3 C20C00 ret $000C
*)
end;
procedure TfrmLabelTab.LabelClick(Sender : TObject);
begin
(*
00749AC8 55 push ebp
00749AC9 8BEC mov ebp, esp
00749ACB 6A00 push $00
00749ACD 53 push ebx
00749ACE 8BDA mov ebx, edx
00749AD0 33C0 xor eax, eax
00749AD2 55 push ebp
00749AD3 68209B7400 push $00749B20
***** TRY
|
00749AD8 64FF30 push dword ptr fs:[eax]
00749ADB 648920 mov fs:[eax], esp
00749ADE 8BC3 mov eax, ebx
* Reference to class TLabel
|
00749AE0 8B1560984200 mov edx, [$00429860]
* Reference to: system.@AsClass;
|
00749AE6 E87199CBFF call 0040345C
00749AEB 8B400C mov eax, [eax+$0C]
* Reference to pointer to GlobalVar_007991D8
|
00749AEE 8B15A0D37700 mov edx, [$0077D3A0]
00749AF4 8B12 mov edx, [edx]
00749AF6 8B54C268 mov edx, [edx+eax*8+$68]
00749AFA 8D45FC lea eax, [ebp-$04]
* Reference to: system.@LStrLAsg;
|
00749AFD E88AA6CBFF call 0040418C
00749B02 8B45FC mov eax, [ebp-$04]
* Reference to: Unit_00651A88.Proc_006543DC
|
00749B05 E8D2A8F0FF call 006543DC
00749B0A 33C0 xor eax, eax
00749B0C 5A pop edx
00749B0D 59 pop ecx
00749B0E 59 pop ecx
00749B0F 648910 mov fs:[eax], edx
****** FINALLY
|
* Possible String Reference to: '[Y]脨U嬱3繳hQ泃'
|
00749B12 68279B7400 push $00749B27
00749B17 8D45FC lea eax, [ebp-$04]
* Reference to: system.@LStrClr(String;String);
|
00749B1A E8D5A5CBFF call 004040F4
00749B1F C3 ret
* Reference to: system.@HandleFinally;
|
00749B20 E9079FCBFF jmp 00403A2C
00749B25 EBF0 jmp 00749B17
****** END
|
00749B27 5B pop ebx
00749B28 59 pop ecx
00749B29 5D pop ebp
00749B2A C3 ret
*)
end;
procedure TfrmLabelTab._PROC_00749B2C(Sender : TObject);
begin
(*
00749B2C 55 push ebp
00749B2D 8BEC mov ebp, esp
00749B2F 33C0 xor eax, eax
00749B31 55 push ebp
* Possible String Reference to: '橹炈
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -