📄 frmmessage.pas
字号:
unit frmMessage;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics,
Controls, Forms, Dialogs, StdCtrls
type
TfrmMsg=class(TForm)
suiForm1: TsuiForm;
lbl: TLabel;
Image1: TImage;
procedure FormKeyDown(Sender : TObject);
procedure _PROC_004AC3DD(Sender : TObject);
procedure _PROC_004AC40C(Sender : TObject);
private
{ Private declarations }
public
{ Public declarations }
end ;
var
frmMsg: TfrmMsg;
{This file is generated by DeDe Ver 3.10b Copyright (c) 1999-2002 DaFixer}
implementation
{$R *.DFM}
procedure TfrmMsg.FormKeyDown(Sender : TObject);
begin
(*
004AC1B4 55 push ebp
004AC1B5 8BEC mov ebp, esp
004AC1B7 6A00 push $00
004AC1B9 6A00 push $00
004AC1BB 6A00 push $00
004AC1BD 6A00 push $00
004AC1BF 53 push ebx
004AC1C0 56 push esi
004AC1C1 57 push edi
004AC1C2 8BD8 mov ebx, eax
004AC1C4 33C0 xor eax, eax
004AC1C6 55 push ebp
004AC1C7 6865C34A00 push $004AC365
***** TRY
|
004AC1CC 64FF30 push dword ptr fs:[eax]
004AC1CF 648920 mov fs:[eax], esp
004AC1D2 F6450804 test byte ptr [ebp+$08], $04
004AC1D6 0F8466010000 jz 004AC342
004AC1DC 66833943 cmp word ptr [ecx], +$43
004AC1E0 0F855C010000 jnz 004AC342
004AC1E6 C645FB00 mov byte ptr [ebp-$05], $00
004AC1EA 8D45FC lea eax, [ebp-$04]
* Possible String Reference to: '---------------------------'
|
004AC1ED BA80C34A00 mov edx, $004AC380
* Reference to: System.Proc_00404284
|
004AC1F2 E88D80F5FF call 00404284
004AC1F7 FF75FC push dword ptr [ebp-$04]
004AC1FA 8D55F4 lea edx, [ebp-$0C]
* Reference to control TfrmMsg.suiForm1 : TsuiForm
|
004AC1FD 8B83F8020000 mov eax, [ebx+$02F8]
* Reference to: SUIForm.Proc_00491BB4
|
004AC203 E8AC59FEFF call 00491BB4
004AC208 FF75F4 push dword ptr [ebp-$0C]
004AC20B 68A8C34A00 push $004AC3A8
004AC210 8D45FC lea eax, [ebp-$04]
004AC213 BA03000000 mov edx, $00000003
* Reference to: System.Proc_0040456C
|
004AC218 E84F83F5FF call 0040456C
004AC21D FF75FC push dword ptr [ebp-$04]
* Possible String Reference to: '---------------------------'
|
004AC220 68B4C34A00 push $004AC3B4
004AC225 68A8C34A00 push $004AC3A8
004AC22A 8D45FC lea eax, [ebp-$04]
004AC22D BA03000000 mov edx, $00000003
* Reference to: System.Proc_0040456C
|
004AC232 E83583F5FF call 0040456C
004AC237 FF75FC push dword ptr [ebp-$04]
004AC23A 8D55F0 lea edx, [ebp-$10]
* Reference to control TfrmMsg.lbl : TLabel
|
004AC23D 8B83FC020000 mov eax, [ebx+$02FC]
* Reference to: Controls.Proc_004504F0
|
004AC243 E8A842FAFF call 004504F0
004AC248 FF75F0 push dword ptr [ebp-$10]
004AC24B 68A8C34A00 push $004AC3A8
004AC250 8D45FC lea eax, [ebp-$04]
004AC253 BA03000000 mov edx, $00000003
* Reference to: System.Proc_0040456C
|
004AC258 E80F83F5FF call 0040456C
004AC25D FF75FC push dword ptr [ebp-$04]
* Possible String Reference to: '---------------------------'
|
004AC260 68B4C34A00 push $004AC3B4
004AC265 68A8C34A00 push $004AC3A8
004AC26A 8D45FC lea eax, [ebp-$04]
004AC26D BA03000000 mov edx, $00000003
* Reference to: System.Proc_0040456C
|
004AC272 E8F582F5FF call 0040456C
004AC277 8BC3 mov eax, ebx
* Reference to: Classes.Proc_00422C24
|
004AC279 E8A669F7FF call 00422C24
004AC27E 8BF8 mov edi, eax
004AC280 4F dec edi
004AC281 85FF test edi, edi
004AC283 7C58 jl 004AC2DD
004AC285 47 inc edi
004AC286 33F6 xor esi, esi
004AC288 8BD6 mov edx, esi
004AC28A 8BC3 mov eax, ebx
* Reference to: Classes.Proc_00422BF8
|
004AC28C E86769F7FF call 00422BF8
* Reference to class TsuiButton
|
004AC291 8B150C9E4800 mov edx, [$00489E0C]
* Reference to: System.Proc_00403608
|
004AC297 E86C73F5FF call 00403608
004AC29C 84C0 test al, al
004AC29E 7439 jz 004AC2D9
004AC2A0 807DFB00 cmp byte ptr [ebp-$05], $00
004AC2A4 740D jz 004AC2B3
004AC2A6 8D45FC lea eax, [ebp-$04]
* Possible String Reference to: ' '
|
004AC2A9 BAD8C34A00 mov edx, $004AC3D8
* Reference to: System.Proc_004044B4
|
004AC2AE E80182F5FF call 004044B4
004AC2B3 8BD6 mov edx, esi
004AC2B5 8BC3 mov eax, ebx
* Reference to: Classes.Proc_00422BF8
|
004AC2B7 E83C69F7FF call 00422BF8
* Reference to class TsuiButton
|
004AC2BC 8B150C9E4800 mov edx, [$00489E0C]
* Reference to: System.Proc_0040362C
|
004AC2C2 E86573F5FF call 0040362C
* Reference to field TfrmMsg.OFFS_0214
|
004AC2C7 8B9014020000 mov edx, [eax+$0214]
004AC2CD 8D45FC lea eax, [ebp-$04]
* Reference to: System.Proc_004044B4
|
004AC2D0 E8DF81F5FF call 004044B4
004AC2D5 C645FB01 mov byte ptr [ebp-$05], $01
004AC2D9 46 inc esi
004AC2DA 4F dec edi
004AC2DB 75AB jnz 004AC288
004AC2DD FF75FC push dword ptr [ebp-$04]
004AC2E0 68A8C34A00 push $004AC3A8
* Possible String Reference to: '---------------------------'
|
004AC2E5 68B4C34A00 push $004AC3B4
004AC2EA 8D45FC lea eax, [ebp-$04]
004AC2ED BA03000000 mov edx, $00000003
* Reference to: System.Proc_0040456C
|
004AC2F2 E87582F5FF call 0040456C
* Reference to : TClipboard._PROC_004378AC()
|
004AC2F7 E8B0B5F8FF call 004378AC
004AC2FC 8B10 mov edx, [eax]
004AC2FE FF5218 call dword ptr [edx+$18]
004AC301 33C0 xor eax, eax
004AC303 55 push ebp
004AC304 683BC34A00 push $004AC33B
***** TRY
|
004AC309 64FF30 push dword ptr fs:[eax]
004AC30C 648920 mov fs:[eax], esp
004AC30F 8B45FC mov eax, [ebp-$04]
* Reference to: System.Proc_004046AC
|
004AC312 E89583F5FF call 004046AC
004AC317 50 push eax
* Reference to : TClipboard._PROC_004378AC()
|
004AC318 E88FB5F8FF call 004378AC
004AC31D 5A pop edx
* Reference to : TClipboard._PROC_004374D4()
|
004AC31E E8B1B1F8FF call 004374D4
004AC323 33C0 xor eax, eax
004AC325 5A pop edx
004AC326 59 pop ecx
004AC327 59 pop ecx
004AC328 648910 mov fs:[eax], edx
****** FINALLY
|
004AC32B 6842C34A00 push $004AC342
* Reference to : TClipboard._PROC_004378AC()
|
004AC330 E877B5F8FF call 004378AC
004AC335 8B10 mov edx, [eax]
004AC337 FF5214 call dword ptr [edx+$14]
004AC33A C3 ret
004AC33B E99078F5FF jmp 00403BD0
004AC340 EBEE jmp 004AC330
****** END
|
004AC342 33C0 xor eax, eax
004AC344 5A pop edx
004AC345 59 pop ecx
004AC346 59 pop ecx
004AC347 648910 mov fs:[eax], edx
****** FINALLY
|
004AC34A 686CC34A00 push $004AC36C
004AC34F 8D45F0 lea eax, [ebp-$10]
004AC352 BA02000000 mov edx, $00000002
* Reference to: System.Proc_00404210
|
004AC357 E8B47EF5FF call 00404210
004AC35C 8D45FC lea eax, [ebp-$04]
* Reference to: System.Proc_004041EC
|
004AC35F E8887EF5FF call 004041EC
004AC364 C3 ret
004AC365 E96678F5FF jmp 00403BD0
004AC36A EBE3 jmp 004AC34F
****** END
|
004AC36C 5F pop edi
004AC36D 5E pop esi
004AC36E 5B pop ebx
004AC36F 8BE5 mov esp, ebp
004AC371 5D pop ebp
004AC372 C20400 ret $0004
*)
end;
procedure TfrmMsg._PROC_004AC3DD(Sender : TObject);
begin
(*
004AC3DD 8BEC mov ebp, esp
004AC3DF 33C0 xor eax, eax
004AC3E1 55 push ebp
* Possible String Reference to: '槭w⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -