zbmsg.pas

来自「一套反出来的股票分析软件,对于分析程序结构和数据结构有一定的帮助.」· PAS 代码 · 共 44 行

unit ZBMsg;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics,
  Controls, Forms, Dialogs, StdCtrls, Buttons
type
  TMsg_frm=class(TForm)
    Label1: TLabel;
    Edit1: TEdit;
    Button1: TBitBtn;
    Button2: TBitBtn;
    procedure Button1Click(Sender : TObject);
    procedure _PROC_005580DC(Sender : TObject);
    procedure _PROC_00558120(Sender : TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end ;

var
  Msg_frm: TMsg_frm;

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

implementation

{$R *.DFM}

procedure TMsg_frm.Button1Click(Sender : TObject);
begin
(*
00558054   55                     push    ebp
00558055   8BEC                   mov     ebp, esp
00558057   6A00                   push    $00
00558059   6A00                   push    $00
0055805B   53                     push    ebx
0055805C   8BD8                   mov     ebx, eax
0055805E   33C0                   xor     eax, eax
00558060   55                     push    ebp

* Possible String Reference to: '閃龟