⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 viewlevel.pas

📁 大名鼎鼎的BLUE M2源码,非了好大的劲搞来的,修改日期是080514,需要的朋友可以拿去研究,呵呵,M2界的领头老大.
💻 PAS
📖 第 1 页 / 共 3 页
字号:
00544955   8B8000030000           mov     eax, [eax+$0300]

* Reference to : TTimerSpeedButton._PROC_0051A218()
|
0054495B   E8B858FDFF             call    0051A218
00544960   8B45FC                 mov     eax, [ebp-$04]
00544963   8B8000030000           mov     eax, [eax+$0300]

* Reference to : TTimerSpeedButton._PROC_0051A158()
|
00544969   E8EA57FDFF             call    0051A158
0054496E   8B55FC                 mov     edx, [ebp-$04]
00544971   8B9218030000           mov     edx, [edx+$0318]
00544977   6689424C               mov     [edx+$4C], ax
0054497B   8B45FC                 mov     eax, [ebp-$04]

* Reference to : TfrmViewLevel._PROC_00544494()
|
0054497E   E811FBFFFF             call    00544494
00544983   59                     pop     ecx
00544984   59                     pop     ecx
00544985   5D                     pop     ebp
00544986   C3                     ret

*)
end;

procedure TfrmViewLevel.ComboBoxJobChange(Sender : TObject);
begin
(*
00544988   55                     push    ebp
00544989   8BEC                   mov     ebp, esp
0054498B   83C4F8                 add     esp, -$08
0054498E   8955F8                 mov     [ebp-$08], edx
00544991   8945FC                 mov     [ebp-$04], eax
00544994   8B45FC                 mov     eax, [ebp-$04]
00544997   8B800C030000           mov     eax, [eax+$030C]
0054499D   8B10                   mov     edx, [eax]
0054499F   FF92CC000000           call    dword ptr [edx+$00CC]
005449A5   8B55FC                 mov     edx, [ebp-$04]
005449A8   8B9218030000           mov     edx, [edx+$0318]
005449AE   884244                 mov     [edx+$44], al
005449B1   8B45FC                 mov     eax, [ebp-$04]

* Reference to : TfrmViewLevel._PROC_00544494()
|
005449B4   E8DBFAFFFF             call    00544494
005449B9   59                     pop     ecx
005449BA   59                     pop     ecx
005449BB   5D                     pop     ebp
005449BC   C3                     ret

*)
end;

procedure TfrmViewLevel._PROC_0054445D(Sender : TObject);
begin
(*
0054445D   8BEC                   mov     ebp, esp
0054445F   51                     push    ecx
00544460   8945FC                 mov     [ebp-$04], eax
00544463   8B45FC                 mov     eax, [ebp-$04]
00544466   8B8018030000           mov     eax, [eax+$0318]

|
0054446C   E873630A00             call    005EA7E4
00544471   33D2                   xor     edx, edx
00544473   8B45FC                 mov     eax, [ebp-$04]
00544476   8B8018030000           mov     eax, [eax+$0318]
0054447C   8B08                   mov     ecx, [eax]
0054447E   FF513C                 call    dword ptr [ecx+$3C]
00544481   8B45FC                 mov     eax, [ebp-$04]
00544484   8B8018030000           mov     eax, [eax+$0318]

|
0054448A   E819690A00             call    005EADA8
0054448F   59                     pop     ecx
00544490   5D                     pop     ebp
00544491   C3                     ret

*)
end;

procedure TfrmViewLevel._PROC_00544494(Sender : TObject);
begin
(*
00544494   55                     push    ebp
00544495   8BEC                   mov     ebp, esp
00544497   B910000000             mov     ecx, $00000010
0054449C   6A00                   push    $00
0054449E   6A00                   push    $00
005444A0   49                     dec     ecx
005444A1   75F9                   jnz     0054449C
005444A3   8945FC                 mov     [ebp-$04], eax
005444A6   33C0                   xor     eax, eax
005444A8   55                     push    ebp

* Possible String Reference to: '閉'
|
005444A9   6816495400             push    $00544916

***** TRY
|
005444AE   64FF30                 push    dword ptr fs:[eax]
005444B1   648920                 mov     fs:[eax], esp
005444B4   8B45FC                 mov     eax, [ebp-$04]

|
005444B7   E8A0FFFFFF             call    0054445C
005444BC   8B45FC                 mov     eax, [ebp-$04]
005444BF   8B8018030000           mov     eax, [eax+$0318]
005444C5   8B406E                 mov     eax, [eax+$6E]
005444C8   33D2                   xor     edx, edx
005444CA   52                     push    edx
005444CB   50                     push    eax
005444CC   8D45F8                 lea     eax, [ebp-$08]

|
005444CF   E89070ECFF             call    0040B564
005444D4   8B45F8                 mov     eax, [ebp-$08]
005444D7   50                     push    eax
005444D8   B901000000             mov     ecx, $00000001
005444DD   BA01000000             mov     edx, $00000001
005444E2   8B45FC                 mov     eax, [ebp-$04]
005444E5   8B8010030000           mov     eax, [eax+$0310]

* Reference to: Grids.TStringGrid.SetCells(TStringGrid;Integer;Integer;AnsiString);
|
005444EB   E87829FDFF             call    00516E68
005444F0   8D55F0                 lea     edx, [ebp-$10]
005444F3   8B45FC                 mov     eax, [ebp-$04]
005444F6   8B8018030000           mov     eax, [eax+$0318]
005444FC   0FB7806E050000         movzx   eax, word ptr [eax+$056E]

* Reference to: SysUtils.IntToStr(Integer):AnsiString;overload;
|
00544503   E8706FECFF             call    0040B478
00544508   FF75F0                 push    dword ptr [ebp-$10]
0054450B   682C495400             push    $0054492C
00544510   8B45FC                 mov     eax, [ebp-$04]
00544513   8B8018030000           mov     eax, [eax+$0318]
00544519   8B806E050000           mov     eax, [eax+$056E]

|
0054451F   E8243DECFF             call    00408248
00544524   0FB7C0                 movzx   eax, ax
00544527   8D55EC                 lea     edx, [ebp-$14]

* Reference to: SysUtils.IntToStr(Integer):AnsiString;overload;
|
0054452A   E8496FECFF             call    0040B478
0054452F   FF75EC                 push    dword ptr [ebp-$14]
00544532   8D45F4                 lea     eax, [ebp-$0C]
00544535   BA03000000             mov     edx, $00000003

* Reference to: System.@LStrCatN;
|
0054453A   E8610EECFF             call    004053A0
0054453F   8B45F4                 mov     eax, [ebp-$0C]
00544542   50                     push    eax
00544543   B902000000             mov     ecx, $00000002
00544548   BA01000000             mov     edx, $00000001
0054454D   8B45FC                 mov     eax, [ebp-$04]
00544550   8B8010030000           mov     eax, [eax+$0310]

* Reference to: Grids.TStringGrid.SetCells(TStringGrid;Integer;Integer;AnsiString);
|
00544556   E80D29FDFF             call    00516E68
0054455B   8D55E4                 lea     edx, [ebp-$1C]
0054455E   8B45FC                 mov     eax, [ebp-$04]
00544561   8B8018030000           mov     eax, [eax+$0318]
00544567   0FB78072050000         movzx   eax, word ptr [eax+$0572]

* Reference to: SysUtils.IntToStr(Integer):AnsiString;overload;
|
0054456E   E8056FECFF             call    0040B478
00544573   FF75E4                 push    dword ptr [ebp-$1C]
00544576   682C495400             push    $0054492C
0054457B   8B45FC                 mov     eax, [ebp-$04]
0054457E   8B8018030000           mov     eax, [eax+$0318]
00544584   8B8072050000           mov     eax, [eax+$0572]

|
0054458A   E8B93CECFF             call    00408248
0054458F   0FB7C0                 movzx   eax, ax
00544592   8D55E0                 lea     edx, [ebp-$20]

* Reference to: SysUtils.IntToStr(Integer):AnsiString;overload;
|
00544595   E8DE6EECFF             call    0040B478
0054459A   FF75E0                 push    dword ptr [ebp-$20]
0054459D   8D45E8                 lea     eax, [ebp-$18]
005445A0   BA03000000             mov     edx, $00000003

* Reference to: System.@LStrCatN;
|
005445A5   E8F60DECFF             call    004053A0
005445AA   8B45E8                 mov     eax, [ebp-$18]
005445AD   50                     push    eax
005445AE   B903000000             mov     ecx, $00000003
005445B3   BA01000000             mov     edx, $00000001
005445B8   8B45FC                 mov     eax, [ebp-$04]
005445BB   8B8010030000           mov     eax, [eax+$0310]

* Reference to: Grids.TStringGrid.SetCells(TStringGrid;Integer;Integer;AnsiString);
|
005445C1   E8A228FDFF             call    00516E68
005445C6   8D55D8                 lea     edx, [ebp-$28]
005445C9   8B45FC                 mov     eax, [ebp-$04]
005445CC   8B8018030000           mov     eax, [eax+$0318]
005445D2   0FB78076050000         movzx   eax, word ptr [eax+$0576]

* Reference to: SysUtils.IntToStr(Integer):AnsiString;overload;
|
005445D9   E89A6EECFF             call    0040B478
005445DE   FF75D8                 push    dword ptr [ebp-$28]
005445E1   682C495400             push    $0054492C
005445E6   8B45FC                 mov     eax, [ebp-$04]
005445E9   8B8018030000           mov     eax, [eax+$0318]
005445EF   8B8076050000           mov     eax, [eax+$0576]

|
005445F5   E84E3CECFF             call    00408248
005445FA   0FB7C0                 movzx   eax, ax
005445FD   8D55D4                 lea     edx, [ebp-$2C]

* Reference to: SysUtils.IntToStr(Integer):AnsiString;overload;
|
00544600   E8736EECFF             call    0040B478
00544605   FF75D4                 push    dword ptr [ebp-$2C]
00544608   8D45DC                 lea     eax, [ebp-$24]
0054460B   BA03000000             mov     edx, $00000003

* Reference to: System.@LStrCatN;
|
00544610   E88B0DECFF             call    004053A0
00544615   8B45DC                 mov     eax, [ebp-$24]
00544618   50                     push    eax
00544619   B904000000             mov     ecx, $00000004
0054461E   BA01000000             mov     edx, $00000001
00544623   8B45FC                 mov     eax, [ebp-$04]
00544626   8B8010030000           mov     eax, [eax+$0310]

* Reference to: Grids.TStringGrid.SetCells(TStringGrid;Integer;Integer;AnsiString);
|
0054462C   E83728FDFF             call    00516E68
00544631   8D55CC                 lea     edx, [ebp-$34]
00544634   8B45FC                 mov     eax, [ebp-$04]
00544637   8B8018030000           mov     eax, [eax+$0318]
0054463D   0FB7807A050000         movzx   eax, word ptr [eax+$057A]

* Reference to: SysUtils.IntToStr(Integer):AnsiString;overload;
|
00544644   E82F6EECFF             call    0040B478
00544649   FF75CC                 push    dword ptr [ebp-$34]

⌨️ 快捷键说明

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