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

📄 aswin.pas

📁 一套反出来的股票分析软件,对于分析程序结构和数据结构有一定的帮助.
💻 PAS
📖 第 1 页 / 共 5 页
字号:
unit ASWin;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics,
  Controls, Forms, Dialogs, StdCtrls
type
  TAlysWin=class(TForm)
    mDyInfoPanel: TPanel;
    mnuAttr: TPopupMenu;
    Panel1: TPanel;
    mLeftPanel: TPanel;
    mLessonDraw: TPaintBox;
    Timer1: TTimer;
    OFFS_038C: N.A.;
    OFFS_0439: N.A.;
    OFFS_0364: N.A.;
    OFFS_0321: N.A.;
    OFFS_0570: N.A.;
    OFFS_0402: N.A.;
    OFFS_0409: N.A.;
    OFFS_0401: N.A.;
    OFFS_036E: N.A.;
    OFFS_0400: N.A.;
    OFFS_0365: N.A.;
    OFFS_043A: N.A.;
    OFFS_043C: N.A.;
    OFFS_044B: N.A.;
    OFFS_036D: N.A.;
    OFFS_057C: N.A.;
    OFFS_0580: N.A.;
    OFFS_0584: N.A.;
    OFFS_0588: N.A.;
    OFFS_0440: N.A.;
    OFFS_036C: N.A.;
    OFFS_03C0: N.A.;
    OFFS_055A: N.A.;
    OFFS_035C: N.A.;
    OFFS_0399: N.A.;
    OFFS_0558: N.A.;
    OFFS_055B: N.A.;
    OFFS_0350: N.A.;
    OFFS_0430: N.A.;
    OFFS_0442: N.A.;
    OFFS_0438: N.A.;
    OFFS_0374: N.A.;
    OFFS_0468: N.A.;
    procedure FormCreate(Sender : TObject);
    procedure FormResize(Sender : TObject);
    procedure FormActivate(Sender : TObject);
    procedure FormKeyDown(Sender : TObject);
    procedure mnuIndAttrClick(Sender : TObject);
    procedure FormDestroy(Sender : TObject);
    procedure FormKeyUp(Sender : TObject);
    procedure FormKeyPress(Sender : TObject);
    procedure FormClose(Sender : TObject);
    procedure TabSet1Change(Sender : TObject);
    procedure FormDeactivate(Sender : TObject);
    procedure mLessonDrawPaint(Sender : TObject);
    procedure Timer1Timer(Sender : TObject);
    procedure _PROC_0063F729(Sender : TObject);
    procedure _PROC_0063F7B4(Sender : TObject);
    procedure _PROC_0063F7C4(Sender : TObject);
    procedure _PROC_0063F901(Sender : TObject);
    procedure _PROC_0063F924(Sender : TObject);
    procedure _PROC_0063F934(Sender : TObject);
    procedure _PROC_0063FA28(Sender : TObject);
    procedure _PROC_0063FBFB(Sender : TObject);
    procedure _PROC_0063FC1D(Sender : TObject);
    procedure _PROC_0063FC60(Sender : TObject);
    procedure _PROC_0063FC64(Sender : TObject);
    procedure _PROC_0063FC68(Sender : TObject);
    procedure _PROC_0063FF40(Sender : TObject);
    procedure _PROC_0063FFBC(Sender : TObject);
    procedure _PROC_0063FFD8(Sender : TObject);
    procedure _PROC_00640131(Sender : TObject);
    procedure _PROC_00640444(Sender : TObject);
    procedure _PROC_006404EC(Sender : TObject);
    procedure _PROC_00640568(Sender : TObject);
    procedure _PROC_006406A0(Sender : TObject);
    procedure _PROC_00640778(Sender : TObject);
    procedure _PROC_00640A40(Sender : TObject);
    procedure _PROC_00640CBC(Sender : TObject);
    procedure _PROC_00640E58(Sender : TObject);
    procedure _PROC_00640EA4(Sender : TObject);
    procedure _PROC_00640F18(Sender : TObject);
    procedure _PROC_00640F58(Sender : TObject);
    procedure _PROC_00640FCC(Sender : TObject);
    procedure _PROC_00640FEC(Sender : TObject);
    procedure _PROC_00641078(Sender : TObject);
    procedure _PROC_006410F0(Sender : TObject);
    procedure _PROC_00641114(Sender : TObject);
    procedure _PROC_00641254(Sender : TObject);
    procedure _PROC_006412B4(Sender : TObject);
    procedure _PROC_0064173C(Sender : TObject);
    procedure _PROC_0064183C(Sender : TObject);
    procedure _PROC_006418B0(Sender : TObject);
    procedure _PROC_00641988(Sender : TObject);
    procedure _PROC_00641A38(Sender : TObject);
    procedure _PROC_00641ADC(Sender : TObject);
    procedure _PROC_00641B00(Sender : TObject);
    procedure _PROC_00641BA4(Sender : TObject);
    procedure _PROC_00641C55(Sender : TObject);
    procedure _PROC_00641C80(Sender : TObject);
    procedure _PROC_00641D5C(Sender : TObject);
    procedure _PROC_00641E1C(Sender : TObject);
    procedure _PROC_006423C4(Sender : TObject);
    procedure _PROC_00642544(Sender : TObject);
    procedure _PROC_006426C4(Sender : TObject);
    procedure _PROC_006426DC(Sender : TObject);
    procedure _PROC_006428C4(Sender : TObject);
    procedure _PROC_00642968(Sender : TObject);
    procedure _PROC_00642BEC(Sender : TObject);
    procedure _PROC_00642E04(Sender : TObject);
    procedure _PROC_00642E70(Sender : TObject);
    procedure _PROC_006431E1(Sender : TObject);
    procedure _PROC_00643C44(Sender : TObject);
    procedure _PROC_00643D10(Sender : TObject);
    procedure _PROC_00643D20(Sender : TObject);
    procedure _PROC_00643D98(Sender : TObject);
    procedure _PROC_00643E1C(Sender : TObject);
    procedure _PROC_00643E38(Sender : TObject);
    procedure _PROC_0064413D(Sender : TObject);
    procedure _PROC_00644180(Sender : TObject);
    procedure _PROC_00644194(Sender : TObject);
    procedure _PROC_00644315(Sender : TObject);
    procedure _PROC_00644488(Sender : TObject);
    procedure _PROC_006444E8(Sender : TObject);
    procedure _PROC_00644540(Sender : TObject);
    procedure _PROC_006445BC(Sender : TObject);
    procedure _PROC_00644608(Sender : TObject);
    procedure _PROC_00644634(Sender : TObject);
    procedure _PROC_00644858(Sender : TObject);
    procedure _PROC_00644AE0(Sender : TObject);
    procedure _PROC_00644C88(Sender : TObject);
    procedure _PROC_00644C8C(Sender : TObject);
    procedure _PROC_00644C94(Sender : TObject);
    procedure _PROC_00644C98(Sender : TObject);
    procedure _PROC_00644FA5(Sender : TObject);
    procedure _PROC_00644FB3(Sender : TObject);
    procedure _PROC_00644FBC(Sender : TObject);
    procedure _PROC_0064502C(Sender : TObject);
    procedure _PROC_006450EE(Sender : TObject);
    procedure _PROC_006451C0(Sender : TObject);
    procedure _PROC_00645685(Sender : TObject);
    procedure _PROC_006456B8(Sender : TObject);
    procedure _PROC_00645A4C(Sender : TObject);
    procedure _PROC_00645A59(Sender : TObject);
    procedure _PROC_00645AE4(Sender : TObject);
    procedure _PROC_00645AE8(Sender : TObject);
    procedure _PROC_00645AEC(Sender : TObject);
    procedure _PROC_00645AF0(Sender : TObject);
    procedure _PROC_00645B54(Sender : TObject);
    procedure _PROC_00645BAD(Sender : TObject);
    procedure _PROC_00645C34(Sender : TObject);
    procedure _PROC_00645C88(Sender : TObject);
    procedure _PROC_00645CA0(Sender : TObject);
    procedure _PROC_00645DF9(Sender : TObject);
    procedure _PROC_00645F0D(Sender : TObject);
    procedure _PROC_00646060(Sender : TObject);
    procedure _PROC_00646071(Sender : TObject);
    procedure _PROC_006460A0(Sender : TObject);
    procedure _PROC_0064610C(Sender : TObject);
    procedure _PROC_00646144(Sender : TObject);
    procedure _PROC_00646154(Sender : TObject);
    procedure _PROC_0064617C(Sender : TObject);
    procedure _PROC_00646180(Sender : TObject);
    procedure _PROC_00646348(Sender : TObject);
    procedure _PROC_00646465(Sender : TObject);
    procedure _PROC_00646BE5(Sender : TObject);
    procedure _PROC_00646EC1(Sender : TObject);
    procedure _PROC_00646FEC(Sender : TObject);
    procedure _PROC_00646FF0(Sender : TObject);
    procedure _PROC_00647508(Sender : TObject);
    procedure _PROC_00647513(Sender : TObject);
    procedure _PROC_0064752C(Sender : TObject);
    procedure _PROC_00647541(Sender : TObject);
    procedure _PROC_00647569(Sender : TObject);
    procedure _PROC_006475E0(Sender : TObject);
    procedure _PROC_006475F0(Sender : TObject);
    procedure _PROC_006475F8(Sender : TObject);
    procedure _PROC_006475FC(Sender : TObject);
    procedure _PROC_00647680(Sender : TObject);
    procedure _PROC_006476BC(Sender : TObject);
    procedure _PROC_00647728(Sender : TObject);
    procedure _PROC_00647853(Sender : TObject);
    procedure _PROC_00647891(Sender : TObject);
    procedure _PROC_006478F0(Sender : TObject);
    procedure _PROC_006479B0(Sender : TObject);
    procedure _PROC_00647DF8(Sender : TObject);
    procedure _PROC_00647E5D(Sender : TObject);
    procedure _PROC_00647EE4(Sender : TObject);
    procedure _PROC_00647EEC(Sender : TObject);
    procedure _PROC_00647EF4(Sender : TObject);
    procedure _PROC_00647F20(Sender : TObject);
    procedure _PROC_00647F24(Sender : TObject);
    procedure _PROC_00647F28(Sender : TObject);
    procedure _PROC_00647F94(Sender : TObject);
    procedure _PROC_00648010(Sender : TObject);
    procedure _PROC_006480EC(Sender : TObject);
    procedure _PROC_0064812C(Sender : TObject);
    procedure _PROC_0064815C(Sender : TObject);
    procedure Proc_00647500(Sender : TObject);
    procedure Proc_00640130(Sender : TObject);
    procedure Proc_006431DC(Sender : TObject);
    procedure Proc_00646EC0(Sender : TObject);
    procedure Proc_00643218(Sender : TObject);
    procedure Proc_00644138(Sender : TObject);
    procedure Proc_006450E8(Sender : TObject);
    procedure Proc_0064567C(Sender : TObject);
    procedure Proc_00645A58(Sender : TObject);
    procedure Proc_00640440(Sender : TObject);
    procedure Proc_00641744(Sender : TObject);
    procedure Proc_00644314(Sender : TObject);
    procedure Proc_00647890(Sender : TObject);
    procedure Proc_00646070(Sender : TObject);
    procedure Proc_00645BAC(Sender : TObject);
    procedure Proc_00646BE4(Sender : TObject);
    procedure Proc_00647568(Sender : TObject);
    procedure Proc_006450D8(Sender : TObject);
    procedure Proc_00645DF8(Sender : TObject);
    procedure Proc_00645F0C(Sender : TObject);
    procedure Proc_00644FA0(Sender : TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end ;

var
  AlysWin: TAlysWin;

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

implementation

{$R *.DFM}

procedure TAlysWin.FormCreate(Sender : TObject);
begin
(*
0063FDCC   53                     push    ebx
0063FDCD   56                     push    esi
0063FDCE   8BD8                   mov     ebx, eax
0063FDD0   8BCB                   mov     ecx, ebx
0063FDD2   B201                   mov     dl, $01

* Reference to class TTopGraph
|
0063FDD4   A17C956C00             mov     eax, dword ptr [$006C957C]

* Reference to: TopGraph.Proc_006C97BC
|
0063FDD9   E8DE990800             call    006C97BC
0063FDDE   8BF0                   mov     esi, eax

* Reference to field TAlysWin.OFFS_0578
|
0063FDE0   89B378050000           mov     [ebx+$0578], esi

* Reference to control TAlysWin.Panel1 : TPanel
|
0063FDE6   8B9340030000           mov     edx, [ebx+$0340]
0063FDEC   8BC6                   mov     eax, esi
0063FDEE   8B08                   mov     ecx, [eax]

* Possible reference to virtual method TTopGraph.OFFS_60
|
0063FDF0   FF5160                 call    dword ptr [ecx+$60]
0063FDF3   B204                   mov     dl, $04
0063FDF5   8BC6                   mov     eax, esi

* Reference to: controls.TControl.SetAlign(TControl;TAlign);
|
0063FDF7   E84092DFFF             call    0043903C
0063FDFC   BAE6000000             mov     edx, $000000E6
0063FE01   8BC6                   mov     eax, esi

* Reference to: controls.TControl.SetWidth(TControl;Integer);
|
0063FE03   E88094DFFF             call    00439288
0063FE08   33D2                   xor     edx, edx
0063FE0A   8BC6                   mov     eax, esi

* Reference to: controls.TControl.SetVisible(TControl;Boolean);
|
0063FE0C   E8579BDFFF             call    00439968
0063FE11   8BD3                   mov     edx, ebx
0063FE13   8BC6                   mov     eax, esi

* Reference to : TTopExpGraph._PROC_006C9958()
|
0063FE15   E83E9B0800             call    006C9958

* Reference to field TAlysWin.OFFS_0578
|
0063FE1A   8B8378050000           mov     eax, [ebx+$0578]
0063FE20   8998BC000000           mov     [eax+$00BC], ebx
0063FE26   C780B80000001CFC6300   mov     dword ptr [eax+$00B8], $0063FC1C
0063FE30   B201                   mov     dl, $01

* Reference to class TCmdtDtaFace
|
0063FE32   A160E27300             mov     eax, dword ptr [$0073E260]

* Reference to: Unit_0073E260.Proc_0073E2BC
|
0063FE37   E880E40F00             call    0073E2BC

* Reference to field TAlysWin.OFFS_0354
|
0063FE3C   898354030000           mov     [ebx+$0354], eax

* Reference to field TAlysWin.OFFS_038C : Byte
|
0063FE42   C6838C03000000         mov     byte ptr [ebx+$038C], $00

* Reference to THJ32Main instance
|
0063FE49   A158D37700             mov     eax, dword ptr [$0077D358]
0063FE4E   8B00                   mov     eax, [eax]

* Reference to control THJ32Main.ImageList1 : TImageList
|
0063FE50   8B9070060000           mov     edx, [eax+$0670]

* Reference to control TAlysWin.mnuAttr : TPopupMenu
|
0063FE56   8B833C030000           mov     eax, [ebx+$033C]

* Reference to: menus.TMenu.SetImages(TMenu;TCustomImageList);
|
0063FE5C   E837C6E0FF             call    0044C498
0063FE61   8BC3                   mov     eax, ebx
0063FE63   8B10                   mov     edx, [eax]

* Possible reference to virtual method TAlysWin.OFFS_01E4
|
0063FE65   FF92E4010000           call    dword ptr [edx+$01E4]

* Reference to control TAlysWin.mLeftPanel : TPanel
|
0063FE6B   8B8B44030000           mov     ecx, [ebx+$0344]
0063FE71   B201                   mov     dl, $01

* Reference to class TVertPan
|
0063FE73   A168076C00             mov     eax, dword ptr [$006C0768]

* Reference to: CDVtPan.Proc_006C08A4
|
0063FE78   E8270A0800             call    006C08A4
0063FE7D   8BF0                   mov     esi, eax

* Reference to field TAlysWin.OFFS_0418

⌨️ 快捷键说明

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