mainunit.h

银行综合业务系统模拟环境

//---------------------------------------------------------------------------

#ifndef MainUnitH
#define MainUnitH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ComCtrls.hpp>
#include <ExtCtrls.hpp>
#include <Graphics.hpp>
#include <Menus.hpp>
#include <ToolWin.hpp>
#include <dbcgrids.hpp>
#include <DB.hpp>
#include <DBTables.hpp>
#include <ADODB.hpp>
#include <DBCtrls.hpp>
#include <Mask.hpp>
#include <Graphics.hpp>
//---------------------------------------------------------------------------
#include <Inifiles.hpp>
#include <registry.hpp>
#include <ImgList.hpp>

class TMainForm : public TForm
{
__published:	// IDE-managed Components
    TStatusBar *StatusBar;
    TCoolBar *CoolBar;
    TToolBar *ToolBar;
    TToolButton *ToolButton1;
    TPanel *PanelLogin;
    TImage *ImageLogin;
    TEdit *EditJGDM;
    TEdit *EditGYBM;
    TEdit *EditMB;
    TEdit *EditGYKEY;
    TPanel *PanelMain;
    TImage *ImageWin;
    TLabel *LabelJGDM;
    TLabel *LabelGYBM;
    TLabel *LabelMB;
    TLabel *LabelJGMC;
    TLabel *LabelDay;
    TLabel *LabelZCD;
    TEdit *EditCDBM;
    TDBCtrlGrid *DBCtrlGrid;
    TDataSource *DataSource;
    TADOQuery *ADOQuery;
    TDBText *DBTextZMXH;
    TLabel *LabelHead;
    TLabel *LabelDate;
    TADOConnection *ADOConnection;
    TADOQuery *ADOQry;
    TLabel *LabelZCDM;
    TDBText *DBTextXMDM;
    TDBText *DBTextXMMC;
    TPanel *PanelTran;
    TImage *ImageTran;
    TLabel *TLabelJGDM;
    TLabel *TLabelGYBM;
    TLabel *TLabelMB;
    TLabel *TLabelJGMC;
    TLabel *TLabelDay;
    TADOQuery *ADOQue;
    TPanel *PanelESC;
    TImage *Image1;
    TEdit *EditEsc;
    TPanel *PanelShow;
    TProgressBar *ProgressBar;
    TImageList *ImageList;
    void __fastcall FormCreate(TObject *Sender);
    void __fastcall FormShow(TObject *Sender);
    void __fastcall EditJGDMKeyPress(TObject *Sender, char &Key);
    void __fastcall EditGYBMKeyPress(TObject *Sender, char &Key);
    void __fastcall EditGYKEYKeyPress(TObject *Sender, char &Key);
    void __fastcall EditMBKeyPress(TObject *Sender, char &Key);
    void __fastcall DBCtrlGridClick(TObject *Sender);
    void __fastcall EditCDBMKeyPress(TObject *Sender, char &Key);
    void __fastcall DBCtrlGridKeyPress(TObject *Sender, char &Key);
    void __fastcall FormDestroy(TObject *Sender);
    void __fastcall FormKeyDown(TObject *Sender, WORD &Key,
          TShiftState Shift);
    void __fastcall EditEscKeyPress(TObject *Sender, char &Key);
    void __fastcall ToolButton1Click(TObject *Sender);

private:	// User declarations
public:		// User declarations
        TList *MyList;    
        __fastcall TMainForm(TComponent* Owner);
        static void CALLBACK TimeProc(UINT uID,UINT uMsg,DWORD dwUser,DWORD dw1,DWORD dw2); // 定时器回调函数
        int TimerID; // 定时器ID
        
        void __fastcall TMainForm::WinShow();//进入下一个登陆后的画面
        void __fastcall TMainForm::MenuShow(AnsiString MenuNum);//显示菜单画面
        void __fastcall TMainForm::ShowTran(AnsiString TranNum);//显示窗口画面
        void __fastcall TMainForm::LabelCreate(TADOQuery *ADOQry,TList *MyList);
        void __fastcall TMainForm::ComboBoxCreate(TADOQuery *ADOQry,TList *MyList);
        void __fastcall TMainForm::ComboLabCreate(TADOQuery *ADOQry,TList *MyList);
        void __fastcall TMainForm::LabeledEditCreate(TADOQuery *ADOQry,TList *MyList);

        AnsiString FilePath;//系统当前所在路径
        AnsiString  JYDM;// 交易代码
        AnsiString  CDDM;// 菜单代码
        char  cZMXH;//菜单名称前的字母序号
        AnsiString  sZMXH;//菜单名称前的字母序号
        AnsiString   strtmp;
        char *chtmp,*chtmp1;
        char ch,ch1;        
        int   iXSWS ; //选项编码xsws

        AnsiString JGDM;//机构代码
        AnsiString JGMC;//机构名称
        AnsiString GYBM;//柜员编码
        AnsiString KEY;//系统内柜员登陆秘密
        AnsiString GYKEY;//柜员输入秘密
        AnsiString MoneyBox;//钱箱
};
//---------------------------------------------------------------------------
extern PACKAGE TMainForm *MainForm;
//---------------------------------------------------------------------------
#endif