wtdownload.pas

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

unit wtdownload;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics,
  Controls, Forms, Dialogs, StdCtrls
type
  TfrmDownload=class(TForm)
    btnDownload: TBitBtn;
    btnExit: TBitBtn;
    Label1: TLabel;
    Label2: TLabel;
    Label3: TLabel;
    OFFS_02F0: N.A.;
    OFFS_02FC: N.A.;
    OFFS_02E8: N.A.;
    OFFS_0300: N.A.;
    OFFS_02FD: N.A.;
    procedure btnDownloadClick(Sender : TObject);
    procedure SetDepartID(Sender : TObject);
    procedure FormCreate(Sender : TObject);
    procedure FormCloseQuery(Sender : TObject);
    procedure _PROC_006A38AC(Sender : TObject);
    procedure _PROC_006A38D8(Sender : TObject);
    procedure _PROC_006A3CD8(Sender : TObject);
    procedure _PROC_006A3D0D(Sender : TObject);
    procedure _PROC_006A3F55(Sender : TObject);
    procedure _PROC_006A4126(Sender : TObject);
    procedure _PROC_006A413A(Sender : TObject);
    procedure _PROC_006A421C(Sender : TObject);
    procedure _PROC_006A4238(Sender : TObject);
    procedure _PROC_006A424D(Sender : TObject);
    procedure _PROC_006A5964(Sender : TObject);
    procedure _PROC_006A5994(Sender : TObject);
    procedure Proc_006A4140(Sender : TObject);
    procedure Proc_006A3880(Sender : TObject);
    procedure Proc_006A3F54(Sender : TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end ;

var
  frmDownload: TfrmDownload;

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

implementation

{$R *.DFM}

procedure TfrmDownload.btnDownloadClick(Sender : TObject);
begin
(*
006A3BD0   55                     push    ebp
006A3BD1   8BEC                   mov     ebp, esp
006A3BD3   6A00                   push    $00
006A3BD5   6A00                   push    $00
006A3BD7   53                     push    ebx
006A3BD8   56                     push    esi
006A3BD9   8BD8                   mov     ebx, eax
006A3BDB   33C0                   xor     eax, eax
006A3BDD   55                     push    ebp

* Possible String Reference to: '閈