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

📄 fdshow.pas

📁 一套反出来的股票分析软件,对于分析程序结构和数据结构有一定的帮助.
💻 PAS
字号:
unit FDShow;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics,
  Controls, Forms, Dialogs, StdCtrls
type
  Tfrm4D=class(TForm)
    PaintBox1: TPaintBox;
    Panel1: TPanel;
    Edit2: TEdit;
    RadioButton1: TRadioButton;
    RadioButton2: TRadioButton;
    Label1: TLabel;
    Label2: TLabel;
    Label3: TLabel;
    Bevel1: TBevel;
    Label4: TLabel;
    Label5: TLabel;
    Label6: TLabel;
    Label7: TLabel;
    Label8: TLabel;
    BitBtn2: TBitBtn;
    BitBtn1: TBitBtn;
    BitBtn3: TBitBtn;
    FormStorage1: TFormStorage;
    RxGradientCaption1: TRxGradientCaption;
    Edit1: TRxSpinEdit;
    Edit3: TRxSpinEdit;
    OFFS_0328: N.A.;
    procedure PaintBox1Paint(Sender : TObject);
    procedure FormKeyDown(Sender : TObject);
    procedure Button2Click(Sender : TObject);
    procedure Button1Click(Sender : TObject);
    procedure RadioButton1Click(Sender : TObject);
    procedure RadioButton2Click(Sender : TObject);
    procedure BitBtn3Click(Sender : TObject);
    procedure FormCreate(Sender : TObject);
    procedure _PROC_00638138(Sender : TObject);
    procedure _PROC_006381B4(Sender : TObject);
    procedure _PROC_00638208(Sender : TObject);
    procedure _PROC_006382C9(Sender : TObject);
    procedure _PROC_006382F8(Sender : TObject);
    procedure Proc_00637B24(Sender : TObject);
    procedure Proc_00638194(Sender : TObject);
    procedure Proc_006381E8(Sender : TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end ;

var
  frm4D: Tfrm4D;

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

implementation

{$R *.DFM}

procedure Tfrm4D.PaintBox1Paint(Sender : TObject);
begin
(*
00637CEC   55                     push    ebp
00637CED   8BEC                   mov     ebp, esp
00637CEF   6A00                   push    $00
00637CF1   6A00                   push    $00
00637CF3   6A00                   push    $00
00637CF5   53                     push    ebx
00637CF6   56                     push    esi
00637CF7   57                     push    edi
00637CF8   8BD8                   mov     ebx, eax
00637CFA   33C0                   xor     eax, eax
00637CFC   55                     push    ebp

* Possible String Reference to: '閫卉

⌨️ 快捷键说明

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