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

📄 viewkernelinfo.pas

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

* Reference to: SysUtils.IntToStr(Integer):AnsiString;overload;
|
005544F9   E87A6FEBFF             call    0040B478
005544FE   8B55D4                 mov     edx, [ebp-$2C]
00554501   8B45FC                 mov     eax, [ebp-$04]
00554504   8B805C030000           mov     eax, [eax+$035C]

* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
0055450A   E8694BF1FF             call    00469078
0055450F   8D55D0                 lea     edx, [ebp-$30]
00554512   A1A4B56500             mov     eax, dword ptr [$0065B5A4]
00554517   8B80830E0000           mov     eax, [eax+$0E83]

* Reference to: SysUtils.IntToStr(Integer):AnsiString;overload;
|
0055451D   E8566FEBFF             call    0040B478
00554522   8B55D0                 mov     edx, [ebp-$30]
00554525   8B45FC                 mov     eax, [ebp-$04]
00554528   8B8060030000           mov     eax, [eax+$0360]

* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
0055452E   E8454BF1FF             call    00469078
00554533   8D55CC                 lea     edx, [ebp-$34]
00554536   A1A4B56500             mov     eax, dword ptr [$0065B5A4]
0055453B   8B80870E0000           mov     eax, [eax+$0E87]

* Reference to: SysUtils.IntToStr(Integer):AnsiString;overload;
|
00554541   E8326FEBFF             call    0040B478
00554546   8B55CC                 mov     edx, [ebp-$34]
00554549   8B45FC                 mov     eax, [ebp-$04]
0055454C   8B8080030000           mov     eax, [eax+$0380]

* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
00554552   E8214BF1FF             call    00469078
00554557   8D55C8                 lea     edx, [ebp-$38]
0055455A   A1A4B56500             mov     eax, dword ptr [$0065B5A4]
0055455F   8B808B0E0000           mov     eax, [eax+$0E8B]

* Reference to: SysUtils.IntToStr(Integer):AnsiString;overload;
|
00554565   E80E6FEBFF             call    0040B478
0055456A   8B55C8                 mov     edx, [ebp-$38]
0055456D   8B45FC                 mov     eax, [ebp-$04]
00554570   8B8084030000           mov     eax, [eax+$0384]

* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
00554576   E8FD4AF1FF             call    00469078
0055457B   8D55C4                 lea     edx, [ebp-$3C]
0055457E   A1A4B56500             mov     eax, dword ptr [$0065B5A4]
00554583   8B808F0E0000           mov     eax, [eax+$0E8F]

* Reference to: SysUtils.IntToStr(Integer):AnsiString;overload;
|
00554589   E8EA6EEBFF             call    0040B478
0055458E   8B55C4                 mov     edx, [ebp-$3C]
00554591   8B45FC                 mov     eax, [ebp-$04]
00554594   8B8088030000           mov     eax, [eax+$0388]

* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
0055459A   E8D94AF1FF             call    00469078
0055459F   8D55C0                 lea     edx, [ebp-$40]
005545A2   A1A4B56500             mov     eax, dword ptr [$0065B5A4]
005545A7   8B80930E0000           mov     eax, [eax+$0E93]

* Reference to: SysUtils.IntToStr(Integer):AnsiString;overload;
|
005545AD   E8C66EEBFF             call    0040B478
005545B2   8B55C0                 mov     edx, [ebp-$40]
005545B5   8B45FC                 mov     eax, [ebp-$04]
005545B8   8B808C030000           mov     eax, [eax+$038C]

* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
005545BE   E8B54AF1FF             call    00469078
005545C3   8D55BC                 lea     edx, [ebp-$44]
005545C6   A1A4B56500             mov     eax, dword ptr [$0065B5A4]
005545CB   8B80970E0000           mov     eax, [eax+$0E97]

* Reference to: SysUtils.IntToStr(Integer):AnsiString;overload;
|
005545D1   E8A26EEBFF             call    0040B478
005545D6   8B55BC                 mov     edx, [ebp-$44]
005545D9   8B45FC                 mov     eax, [ebp-$04]
005545DC   8B8090030000           mov     eax, [eax+$0390]

* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
005545E2   E8914AF1FF             call    00469078
005545E7   8D55B8                 lea     edx, [ebp-$48]
005545EA   A1A4B56500             mov     eax, dword ptr [$0065B5A4]
005545EF   8B809B0E0000           mov     eax, [eax+$0E9B]

* Reference to: SysUtils.IntToStr(Integer):AnsiString;overload;
|
005545F5   E87E6EEBFF             call    0040B478
005545FA   8B55B8                 mov     edx, [ebp-$48]
005545FD   8B45FC                 mov     eax, [ebp-$04]
00554600   8B8094030000           mov     eax, [eax+$0394]

* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
00554606   E86D4AF1FF             call    00469078
0055460B   8B45F8                 mov     eax, [ebp-$08]
0055460E   05DA180000             add     eax, +$000018DA
00554613   8945F4                 mov     [ebp-$0C], eax
00554616   33C9                   xor     ecx, ecx
00554618   8B55F4                 mov     edx, [ebp-$0C]
0055461B   8B45FC                 mov     eax, [ebp-$04]

* Reference to : TfrmViewKernelInfo._PROC_00554680()
|
0055461E   E85D000000             call    00554680
00554623   8B45F8                 mov     eax, [ebp-$08]
00554626   05CA180000             add     eax, +$000018CA
0055462B   8945F4                 mov     [ebp-$0C], eax
0055462E   B901000000             mov     ecx, $00000001
00554633   8B55F4                 mov     edx, [ebp-$0C]
00554636   8B45FC                 mov     eax, [ebp-$04]

* Reference to : TfrmViewKernelInfo._PROC_00554680()
|
00554639   E842000000             call    00554680
0055463E   8B45F8                 mov     eax, [ebp-$08]
00554641   05BA180000             add     eax, +$000018BA
00554646   8945F4                 mov     [ebp-$0C], eax
00554649   B902000000             mov     ecx, $00000002
0055464E   8B55F4                 mov     edx, [ebp-$0C]
00554651   8B45FC                 mov     eax, [ebp-$04]

* Reference to : TfrmViewKernelInfo._PROC_00554680()
|
00554654   E827000000             call    00554680
00554659   33C0                   xor     eax, eax
0055465B   5A                     pop     edx
0055465C   59                     pop     ecx
0055465D   59                     pop     ecx
0055465E   648910                 mov     fs:[eax], edx

****** FINALLY
|
00554661   687B465500             push    $0055467B
00554666   8D45B8                 lea     eax, [ebp-$48]
00554669   BA0E000000             mov     edx, $0000000E

* Reference to: System.@LStrArrayClr(void;void;Integer);
|
0055466E   E8D109EBFF             call    00405044
00554673   C3                     ret


* Reference to: System.@HandleFinally;
|
00554674   E9FF02EBFF             jmp     00404978
00554679   EBEB                   jmp     00554666

****** END
|
0055467B   8BE5                   mov     esp, ebp
0055467D   5D                     pop     ebp
0055467E   C3                     ret

*)
end;

procedure TfrmViewKernelInfo.ButtonRefGlobalValClick(Sender : TObject);
begin
(*
00554848   55                     push    ebp
00554849   8BEC                   mov     ebp, esp
0055484B   83C4E4                 add     esp, -$1C
0055484E   53                     push    ebx
0055484F   56                     push    esi
00554850   57                     push    edi
00554851   33C9                   xor     ecx, ecx
00554853   894DE4                 mov     [ebp-$1C], ecx
00554856   894DE8                 mov     [ebp-$18], ecx
00554859   894DEC                 mov     [ebp-$14], ecx
0055485C   8955F0                 mov     [ebp-$10], edx
0055485F   8945FC                 mov     [ebp-$04], eax
00554862   33C0                   xor     eax, eax
00554864   55                     push    ebp
00554865   6884495500             push    $00554984

***** TRY
|
0055486A   64FF30                 push    dword ptr fs:[eax]
0055486D   648920                 mov     fs:[eax], esp
00554870   33C0                   xor     eax, eax
00554872   55                     push    ebp

* Possible String Reference to: '閌

⌨️ 快捷键说明

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