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

📄 hypmain.dpr

📁 一套反出来的股票分析软件,对于分析程序结构和数据结构有一定的帮助.
💻 DPR
字号:
{This file is generated by DeDe Ver 3.50.02 Copyright (c) 1999-2001 DaFixer}

Project Hypmain;

Uses
  DOArText in 'DOArText.pas' {TTextAttrDlg},
  DZHWeb in 'DZHWeb.pas' {TfrmWeb},
  ZBPassWD in 'ZBPassWD.pas' {TF_pswd},
  ZBSel in 'ZBSel.pas' {TFSlcZB},
  ZBRem in 'ZBRem.pas' {TF_GetRem},
  ZBInsFuc in 'ZBInsFuc.pas' {TF_crhs},
  Fbd in 'Fbd.pas' {TFbd_Prd},
  ZBEdit in 'ZBEdit.pas' {TF_gsbj},
  ZBMsg in 'ZBMsg.pas' {TMsg_frm},
  InsBK in 'InsBK.pas' {TfrmInsBK},
  BKNmEdit in 'BKNmEdit.pas' {TfrmBkNameEditDlg},
  DGSETPrx in 'DGSETPrx.pas' {TDGSetupProxy},
  IFHqDlg in 'IFHqDlg.pas' {ThqDlg},
  ASCQ in 'ASCQ.pas' {TfrmCQSel},
  RTZhpm in 'RTZhpm.pas' {TFrmZhpm},
  TopAdvise in 'TopAdvise.pas' {TfrmTopAdvise},
  TopDown in 'TopDown.pas' {TfrmTopDown},
  Qspt in 'Qspt.pas' {TFrmQSPT},
  GaoShou in 'GaoShou.pas' {TfrmGaoShou},
  StkSelect in 'StkSelect.pas' {TFrmStkSel},
  DataMain in 'DataMain.pas' {TFrmMain},
  ShowGS in 'ShowGS.pas' {TfrmShowGaoShou},
  DBPWDlg in 'DBPWDlg.pas' {TPasswordDialog},
  DBLogDlg in 'DBLogDlg.pas' {TLoginDialog},
  msggg in 'msggg.pas' {TfrmGGInfo},
  newsp in 'newsp.pas' {TSplashForm},
  SpeedTest in 'SpeedTest.pas' {TfrmPing},
  DGSETCMN in 'DGSETCMN.pas' {TDGSetupComm},
  DGHstInf in 'DGHstInf.pas' {TDGHostInfo},
  DGGetPwd in 'DGGetPwd.pas' {TFrmRegUsr},
  loginDZH in 'loginDZH.pas' {TfrmLoginDZH},
  BKShow in 'BKShow.pas' {TFrmBKShow},
  IFGgZs in 'IFGgZs.pas' {TFrmInfoGgZs},
  CfgYDCM in 'CfgYDCM.pas' {TfrmCfgYDCM},
  IFDpZs in 'IFDpZs.pas' {TFrmInfoDpZs},
  TDBkWin in 'TDBkWin.pas' {TfrmTDBK},
  JDShow in 'JDShow.pas' {TFrmJDShow},
  JDHint in 'JDHint.pas' {TFrmJDHint},
  JDVwAsk in 'JDVwAsk.pas' {TAskReviewDlg},
  JDSelect in 'JDSelect.pas' {TFrmJDSelect},
  FanFilter in 'FanFilter.pas' {TFrmFilter},
  Gxt in 'Gxt.pas' {TFrmGxt},
  RTIPWin in 'RTIPWin.pas' {TRealTimeForm},
  hqSting in 'hqSting.pas' {TfrmHqSetting},
  JERect in 'JERect.pas' {TfrmJE},
  FDShow in 'FDShow.pas' {Tfrm4D},
  PvIndpd in 'PvIndpd.pas' {TfrmPV},
  OxIndep in 'OxIndep.pas' {TmHjOx},
  ASWin in 'ASWin.pas' {TAlysWin},
  ZBStockBK in 'ZBStockBK.pas' {TselStockBKfrm},
  ZBPreAlert in 'ZBPreAlert.pas' {TPreAlertfrm},
  ZBNAlertSet in 'ZBNAlertSet.pas' {TAlertSetfrm},
  HJExit in 'HJExit.pas' {TfrmExit},
  ModifyUsr in 'ModifyUsr.pas' {TfrmModifyUserInfo},
  RegistGW in 'RegistGW.pas' {TfrmRegist},
  Bkdef in 'Bkdef.pas' {TBkDefForm},
  Wizard in 'Wizard.pas' {TfrmWizard},
  TJRange in 'TJRange.pas' {TfrmQyTJ},
  IfFJdlg in 'IfFJdlg.pas' {TInfoFJDlg},
  IFMxDlg in 'IFMxDlg.pas' {TInfoMxDlg},
  Consult in 'Consult.pas' {TfrmConsult},
  Reason in 'Reason.pas' {TfrmReason},
  Fund in 'Fund.pas' {TfrmFund},
  WarnQuit in 'WarnQuit.pas' {TfrmQuit},
  ivstcal in 'ivstcal.pas' {TFrmstockcla},
  DGSetup in 'DGSetup.pas' {TDGSysSetup},
  Dgwatcls in 'Dgwatcls.pas' {TFrmWaitClose},
  HJAbout in 'HJAbout.pas' {TAboutDlg},
  DGMdfWT in 'DGMdfWT.pas' {TFrmModifyWT},
  wtdownload in 'wtdownload.pas' {TfrmDownload},
  wtAdd in 'wtAdd.pas' {TFrmWeiTuo},
  WTSetup in 'WTSetup.pas' {TfrmWTSetup},
  DGXKT in 'DGXKT.pas' {TfrmXKTWaiting},
  DGRfsHq in 'DGRfsHq.pas' {TFrmRefreshHQ},
  main in 'main.pas' {THJ32Main},
  ShowSWF in 'ShowSWF.pas' {TfrmShowSWF},
  cartoon in 'cartoon.pas' {TfrmCartoon},
  Assitant in 'Assitant.pas' {TfrmAssistant},
  JPHis in 'JPHis.pas' {TfrmJPHis},
  DGWatClr in 'DGWatClr.pas' {TFrmWatClr},
  ZHSearch in 'ZHSearch.pas' {TfrmSearch},
  HQScroll in 'HQScroll.pas' {TfrmHQScroll},
  TDWin in 'TDWin.pas' {TfrmTrend},
  DOArEdit in 'DOArEdit.pas' {TfrmCtrl},
  CfgParam in 'CfgParam.pas' {TfrmCfgParam},
  ZBTest in 'ZBTest.pas' {TfrmXgTest},
  ZBRange in 'ZBRange.pas' {Trange_frm},
  ZBSelBK in 'ZBSelBK.pas' {TfrmBk},
  ZBAddtoBK in 'ZBAddtoBK.pas' {TfrmAddtoBK},
  ZBComConSG in 'ZBComConSG.pas' {TConSGfrm},
  selstock in 'selstock.pas' {Tsel_stock},
  ZBwizardXG in 'ZBwizardXG.pas' {TWizardXG},
  ZBXGByName in 'ZBXGByName.pas' {TXGByNameFrm},
  ZBSysEvalua in 'ZBSysEvalua.pas' {TSysEvaluafrm},
  ZBPJNewMod in 'ZBPJNewMod.pas' {TPJNewModFrm},
  ZBPJTest in 'ZBPJTest.pas' {TPJTestFrm},
  ZBExport in 'ZBExport.pas' {TFSlcFile},
  ZBPJEditer in 'ZBPJEditer.pas' {TPJEditerFrm},
  ZBSysTest in 'ZBSysTest.pas' {TSysTest},
  ZBConCom in 'ZBConCom.pas' {TConCom_frm},
  ZBCmpl in 'ZBCmpl.pas' {TfrmIndEdit},
  BillBrd in 'BillBrd.pas' {TfrmBillBrd},
  LabelTab in 'LabelTab.pas' {TfrmLabelTab},
  QKDZH in 'QKDZH.pas' {TfrmQJT},
  GWClip in 'GWClip.pas' {TfrmClip},
  HJCmd in 'HJCmd.pas' {TfrmCmd},
  DGInfo in 'DGInfo.pas' {TfrmShowInfo},
  CmdExec in 'CmdExec.pas' {TCommander},
  DGNewBK in 'DGNewBK.pas' {TFrmNewBK},
  DGSltBK in 'DGSltBK.pas' {TFrmSltBK},
  DGSavDat in 'DGSavDat.pas' {TFrmSavDat},
  GWTools in 'GWTools.pas' {TfrmTools};

{$R *.RES}

begin
{
00771008   55                     push    ebp
00771009   8BEC                   mov     ebp, esp
0077100B   83C4F4                 add     esp, -$0C
0077100E   53                     push    ebx
0077100F   B8D8007700             mov     eax, $007700D8

* Reference to: sysinit.@InitExe;
|
00771014   E8136DC9FF             call    00407D2C

* Reference to TApplication instance
|
00771019   8B1D00D17700           mov     ebx, [$0077D100]

* Reference to: Unit_00651A88.Proc_00655728
|
0077101F   E80447EEFF             call    00655728
00771024   84C0                   test    al, al
00771026   751F                   jnz     00771047
00771028   6A10                   push    $10

* Possible String Reference to: '注册控件'
|
0077102A   B904117700             mov     ecx, $00771104

* Possible String Reference to: '控件注册失败,程序将无法正常运行'
|
0077102F   BA10117700             mov     edx, $00771110
00771034   8B03                   mov     eax, [ebx]

* Reference to: forms.TApplication.MessageBox(TApplication;PChar;PChar;Longint):Integer;
|
00771036   E8DD84CEFF             call    00459518
0077103B   8B03                   mov     eax, [ebx]

* Reference to: forms.TApplication.Terminate(TApplication);
|
0077103D   E83284CEFF             call    00459474
00771042   E9B7000000             jmp     007710FE
00771047   A12CD37700             mov     eax, dword ptr [$0077D32C]
0077104C   C60001                 mov     byte ptr [eax], $01
0077104F   B201                   mov     dl, $01

* Reference to class TGlobal
|
00771051   A1C49B7400             mov     eax, dword ptr [$00749BC4]

* Reference to: Unit_00749B9C.Proc_0074A61C
|
00771056   E8C195FDFF             call    0074A61C

* Reference to pointer to GlobalVar_007991D8
|
0077105B   8B15A0D37700           mov     edx, [$0077D3A0]
00771061   8902                   mov     [edx], eax
00771063   8B03                   mov     eax, [ebx]

* Reference to: forms.TApplication.Initialize(TApplication);
|
00771065   E8BE82CEFF             call    00459328
0077106A   8B03                   mov     eax, [ebx]

* Possible String Reference to: '大智慧证券信息港'
|
0077106C   BA3C117700             mov     edx, $0077113C

* Reference to: forms.TApplication.SetTitle(TApplication;AnsiString);
|
00771071   E8B67ECEFF             call    00458F2C

* Reference to: HJExit.Proc_00651A88
|
00771076   E80D0AEEFF             call    00651A88
0077107B   8B0B                   mov     ecx, [ebx]
0077107D   B201                   mov     dl, $01

* Reference to class TSplashForm
|
0077107F   A148236100             mov     eax, dword ptr [$00612348]

* Reference to: forms.TCustomForm.Create(TCustomForm;boolean;TComponent);
|
00771084   E85312CEFF             call    004522DC

* Reference to pointer to GlobalVar_0078CD44
|
00771089   8B15C8CF7700           mov     edx, [$0077CFC8]
0077108F   8902                   mov     [edx], eax

* Reference to pointer to GlobalVar_0078CD44
|
00771091   A1C8CF7700             mov     eax, dword ptr [$0077CFC8]
00771096   8B00                   mov     eax, [eax]

* Reference to: forms.TCustomForm.Show(TCustomForm);
|
00771098   E8D751CEFF             call    00456274

* Reference to pointer to GlobalVar_0078CD44
|
0077109D   A1C8CF7700             mov     eax, dword ptr [$0077CFC8]
007710A2   8B00                   mov     eax, [eax]
007710A4   8B10                   mov     edx, [eax]

* Possible reference to virtual method TGlobalVar_0078CD44.OFFS_0080
|
007710A6   FF9280000000           call    dword ptr [edx+$0080]

* Reference to THJ32Main instance
|
007710AC   8B0D58D37700           mov     ecx, [$0077D358]
007710B2   8B03                   mov     eax, [ebx]

* Reference to class THJ32Main
|
007710B4   8B15DC866A00           mov     edx, [$006A86DC]

* Reference to: forms.TApplication.CreateForm(TApplication;TComponentClass;void;void);
|
007710BA   E88182CEFF             call    00459340

* Reference to THJ32Main instance
|
007710BF   A158D37700             mov     eax, dword ptr [$0077D358]
007710C4   8B00                   mov     eax, [eax]
007710C6   8B10                   mov     edx, [eax]

* Reference to method THJ32Main.Update()
|
007710C8   FF9280000000           call    dword ptr [edx+$0080]

* Reference to: Unit_00651A88.Proc_00651F60
|
007710CE   E88D0EEEFF             call    00651F60

* Reference to pointer to GlobalVar_0078CF18
|
007710D3   A1E8D07700             mov     eax, dword ptr [$0077D0E8]
007710D8   8B00                   mov     eax, [eax]
007710DA   8B10                   mov     edx, [eax]

* Possible reference to virtual method TGlobalVar_0078CF18.OFFS_04
|
007710DC   FF5204                 call    dword ptr [edx+$04]

* Reference to pointer to GlobalVar_007991D8
|
007710DF   A1A0D37700             mov     eax, dword ptr [$0077D3A0]
007710E4   8B00                   mov     eax, [eax]

* Reference to: Unit_00749B9C.Proc_00749D20
|
007710E6   E8358CFDFF             call    00749D20

* Reference to THJ32Main instance
|
007710EB   A158D37700             mov     eax, dword ptr [$0077D358]
007710F0   8B00                   mov     eax, [eax]

* Reference to : THJ32Main._PROC_006B1C2C()
|
007710F2   E8350BF4FF             call    006B1C2C
007710F7   8B03                   mov     eax, [ebx]

* Reference to: forms.TApplication.Run(TApplication);
|
007710F9   E8C282CEFF             call    004593C0
007710FE   5B                     pop     ebx

* Reference to: system.@Halt0;
|
007710FF   E8182EC9FF             call    00403F1C
00771104   D7                     xlat
00771105   A2B2E1BFD8             mov     byte ptr [$D8BFE1B2], al
0077110A   BCFE000000             mov     esp, $000000FE
0077110F   00BFD8BCFED7           add     [edi+$D7FEBCD8], bh
00771115   A2B2E1CAA7             mov     byte ptr [$A7CAE1B2], al
0077111A   B0DC                   mov     al, $DC
0077111C   A3ACB3CCD0             mov     dword ptr [$D0CCB3AC], eax
00771121   F2                     repne
00771122   BDABCEDEB7             mov     ebp, $B7DECEAB
00771127   A8D5                   test    al, $D5
00771129   FD                     std
0077112A   B3A3                   mov     bl, $A3
0077112C   D4                     aam
0077112D   CB                     ret

}
end.

⌨️ 快捷键说明

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