jdhint.pas

一套反出来的股票分析软件,对于分析程序结构和数据结构有一定的帮助.

unit JDHint;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics,
  Controls, Forms, Dialogs, StdCtrls, ExtCtrls, ComCtrls
type
  TFrmJDHint=class(TForm)
    ProgressBar: TProgressBar;
    Panel1: TPanel;
    Panel2: TPanel;
    procedure FormKeyDown(Sender : TObject);
    procedure _PROC_00628918(Sender : TObject);
    procedure _PROC_00628948(Sender : TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end ;

var
  FrmJDHint: TFrmJDHint;

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

implementation

{$R *.DFM}

procedure TFrmJDHint.FormKeyDown(Sender : TObject);
begin
(*
006288FC   55                     push    ebp
006288FD   8BEC                   mov     ebp, esp
006288FF   6683391B               cmp     word ptr [ecx], +$1B
00628903   750E                   jnz     00628913

* Reference to pointer to GlobalVar_0078CDD0
|
00628905   A124D17700             mov     eax, dword ptr [$0077D124]
0062890A   8B00                   mov     eax, [eax]

* Reference to field GlobalVar_0078CDD0.OFFS_03B0
|
0062890C   C680B003000001         mov     byte ptr [eax+$03B0], $01
00628913   5D                     pop     ebp
00628914   C20400                 ret     $0004

*)
end;

procedure TFrmJDHint._PROC_00628918(Sender : TObject);
begin
(*
00628918   55                     push    ebp
00628919   8BEC                   mov     ebp, esp
0062891B   33C0                   xor     eax, eax
0062891D   55                     push    ebp

* Possible String Reference to: '殛拜