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

📄 stdctrls.pas

📁 传奇3delphi代码 请自己看吧 包括地图
💻 PAS
字号:
unit StdCtrls;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics,
  Controls, Forms, Dialogs, StdCtrls
type
  TMemoStrings=class(TForm)
    procedure _PROC_00425280(Sender : TObject);
    procedure _PROC_004252D3(Sender : TObject);
    procedure _PROC_004252D8(Sender : TObject);
    procedure _PROC_004254E9(Sender : TObject);
    procedure _PROC_00425568(Sender : TObject);
    procedure _PROC_0042557C(Sender : TObject);
    procedure _PROC_00425598(Sender : TObject);
    procedure _PROC_004255AC(Sender : TObject);
    procedure _PROC_0042562D(Sender : TObject);
    procedure _PROC_004257A0(Sender : TObject);
    procedure _PROC_004258A0(Sender : TObject);
    procedure _PROC_004258B8(Sender : TObject);
    procedure _PROC_00425984(Sender : TObject);
    procedure _PROC_00425998(Sender : TObject);
    procedure _PROC_004259B4(Sender : TObject);
    procedure _PROC_004259C0(Sender : TObject);
    procedure _PROC_004259D4(Sender : TObject);
    procedure _PROC_004259E8(Sender : TObject);
    procedure _PROC_00425AC9(Sender : TObject);
    procedure _PROC_00425B64(Sender : TObject);
    procedure _PROC_00425D41(Sender : TObject);
    procedure _PROC_00425DC8(Sender : TObject);
    procedure _PROC_00425E04(Sender : TObject);
    procedure _PROC_00425E28(Sender : TObject);
    procedure _PROC_00425E48(Sender : TObject);
    procedure _PROC_00425E78(Sender : TObject);
    procedure _PROC_00425EDC(Sender : TObject);
    procedure _PROC_00425F15(Sender : TObject);
    procedure _PROC_00425FB0(Sender : TObject);
    procedure _PROC_0042604C(Sender : TObject);
    procedure _PROC_00426100(Sender : TObject);
    procedure _PROC_00426124(Sender : TObject);
    procedure _PROC_00426178(Sender : TObject);
    procedure _PROC_0042621C(Sender : TObject);
    procedure _PROC_00426238(Sender : TObject);
    procedure _PROC_00426270(Sender : TObject);
    procedure _PROC_00426278(Sender : TObject);
    procedure _PROC_0042631C(Sender : TObject);
    procedure _PROC_00426340(Sender : TObject);
    procedure _PROC_00426378(Sender : TObject);
    procedure _PROC_004263B8(Sender : TObject);
    procedure _PROC_004263EC(Sender : TObject);
    procedure _PROC_00426414(Sender : TObject);
    procedure _PROC_00426434(Sender : TObject);
    procedure _PROC_00426470(Sender : TObject);
    procedure _PROC_004264A8(Sender : TObject);
    procedure _PROC_0042650C(Sender : TObject);
    procedure _PROC_00426550(Sender : TObject);
    procedure _PROC_004265C4(Sender : TObject);
    procedure _PROC_00426789(Sender : TObject);
    procedure _PROC_004267C0(Sender : TObject);
    procedure _PROC_004267D4(Sender : TObject);
    procedure _PROC_004268A8(Sender : TObject);
    procedure _PROC_0042692C(Sender : TObject);
    procedure _PROC_0042695C(Sender : TObject);
    procedure _PROC_004269C0(Sender : TObject);
    procedure _PROC_00426B75(Sender : TObject);
    procedure _PROC_00426B90(Sender : TObject);
    procedure _PROC_00426B98(Sender : TObject);
    procedure _PROC_00426BBC(Sender : TObject);
    procedure _PROC_00426BE0(Sender : TObject);
    procedure _PROC_00426C18(Sender : TObject);
    procedure _PROC_00426C7C(Sender : TObject);
    procedure _PROC_00426CD0(Sender : TObject);
    procedure _PROC_00426D18(Sender : TObject);
    procedure _PROC_00426D20(Sender : TObject);
    procedure _PROC_00426D24(Sender : TObject);
    procedure _PROC_00426D44(Sender : TObject);
    procedure _PROC_00426D48(Sender : TObject);
    procedure _PROC_00426DC0(Sender : TObject);
    procedure _PROC_00426E50(Sender : TObject);
    procedure _PROC_00426EA0(Sender : TObject);
    procedure _PROC_00426ED4(Sender : TObject);
    procedure _PROC_00426F0A(Sender : TObject);
    procedure _PROC_00426F1C(Sender : TObject);
    procedure _PROC_00426F3C(Sender : TObject);
    procedure _PROC_00426FAD(Sender : TObject);
    procedure _PROC_00427030(Sender : TObject);
    procedure _PROC_00427084(Sender : TObject);
    procedure _PROC_0042708C(Sender : TObject);
    procedure _PROC_004271CE(Sender : TObject);
    procedure _PROC_004271E2(Sender : TObject);
    procedure _PROC_00427226(Sender : TObject);
    procedure _PROC_00427252(Sender : TObject);
    procedure _PROC_00427260(Sender : TObject);
    procedure _PROC_00427268(Sender : TObject);
    procedure _PROC_004272A1(Sender : TObject);
    procedure _PROC_0042733C(Sender : TObject);
    procedure StdCtrls.Finalization(Sender : TObject);
    procedure StdCtrls.Initialization(Sender : TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end ;

var
  MemoStrings: TMemoStrings;

{This file is generated by DeDe Ver 3.50.04 Copyright (c) 1999-2002 DaFixer}

implementation

{$R *.DFM}

procedure TMemoStrings._PROC_00425280(Sender : TObject);
begin
(*
00425280   F0                     lock
00425281   0100                   add     [eax], eax
00425283   00E8                   add     al, ch
00425285   0F59                   DB  $0F, $59  //
00425287   FFFF                   DB  $FF, $FF  //      
00425289   BAC4524200             mov     edx, $004252C4
0042528E   8B83F0010000           mov     eax, [ebx+$01F0]

* Reference to : TIcon._PROC_0041AAF4()
|
00425294   E85B58FFFF             call    0041AAF4
00425299   014604                 add     [esi+$04], eax
0042529C   6AFF                   push    $FF
0042529E   6AFF                   push    $FF
004252A0   56                     push    esi

* Reference to: user32.InflateRect()
|
004252A1   E87A2EFEFF             call    00408120
004252A6   80BB3801000000         cmp     byte ptr [ebx+$0138], $00
004252AD   740A                   jz      004252B9
004252AF   6AFF                   push    $FF
004252B1   6AFF                   push    $FF
004252B3   56                     push    esi

* Reference to: user32.InflateRect()
|
004252B4   E8672EFEFF             call    00408120
004252B9   5E                     pop     esi
004252BA   5B                     pop     ebx
004252BB   C3                     ret

*)
end;

procedure TMemoStrings._PROC_004252D3(Sender : TObject);
begin
(*
004252D3   6324FC                 arpl    [esp+edi*8], sp
004252D6   5B                     pop     ebx
004252D7   C3                     ret

*)
end;

procedure TMemoStrings._PROC_004252D8(Sender : TObject);
begin
(*
004252D8   55                     push    ebp
004252D9   8BEC                   mov     ebp, esp
004252DB   83C4C4                 add     esp, -$3C
004252DE   53                     push    ebx
004252DF   56                     push    esi
004252E0   57                     push    edi
004252E1   33D2                   xor     edx, edx
004252E3   8955C4                 mov     [ebp-$3C], edx
004252E6   8955C8                 mov     [ebp-$38], edx
004252E9   8955CC                 mov     [ebp-$34], edx
004252EC   8955D0                 mov     [ebp-$30], edx
004252EF   8955D4                 mov     [ebp-$2C], edx
004252F2   8955E8                 mov     [ebp-$18], edx
004252F5   8BF0                   mov     esi, eax
004252F7   33C0                   xor     eax, eax
004252F9   55                     push    ebp

* Possible String Reference to: '榛猃

⌨️ 快捷键说明

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