genbaseform.h

科思ERP部分源码及控件

//---------------------------------------------------------------------------
#ifndef GenBaseFormH
#define GenBaseFormH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ComCtrls.hpp>
#include <ToolWin.hpp>
#include <Menus.hpp>
#include <Grids.hpp>
#include <ExtCtrls.hpp>
#include <ImgList.hpp>
#include "SDEdit.h"
#include "SDGrid.h"
#include <Dialogs.hpp>

#include "BaseGlobeVars.h"
#include "KSFunction.h"
#include "CommFunction.h"
#include "WhereForm.h"
#include "FormSet.h"
#include "WnQuery.h"
#include "container.h"
#include "ClientDcom.h"
#include "AncGenBase.h"
#include <ActnList.hpp>
#define WM_YW_UPDATE_MSG (WM_USER+1)
//---------------------------------------------------------------------------


class TGenBaseForm : public TAncGenBaseForm
{
__published:	// IDE-managed Components
  TMainMenu *MainMenu1;
  TMenuItem *muFile;
  TMenuItem *muQuery;
  TMenuItem *muEdit;
  TMenuItem *muReport;
  TMenuItem *muHelp;
  TMenuItem *muAddDetail;
  TMenuItem *muSave;
  TMenuItem *N3;
  TMenuItem *muEditDetail;
  TMenuItem *muDeleteDetail;
  TMenuItem *N4;
  TMenuItem *muPrint;
  TMenuItem *S2;
  TMenuItem *muExit;
  TMenuItem *muUnDo;
  TMenuItem *N5;
  TMenuItem *muCut;
  TMenuItem *muCopy;
  TMenuItem *muPaste;
  TMenuItem *muAbout;
  TStatusBar *sbBar;
  TMenuItem *muPrintSetup;
  TMenuItem *muTools;
  TMenuItem *muToolBar;
  TMenuItem *muStatusBar;
  TMenuItem *N8;
  TMenuItem *N9;
  TMenuItem *muOptons;
  TMenuItem *muContext;
  TMenuItem *muWebSite;
  TMenuItem *N11;
  TMenuItem *muFind;
  TMenuItem *muView;
  TMenuItem *muFirst;
  TMenuItem *muPrevious;
  TMenuItem *muNext;
  TMenuItem *muLast;
  TMenuItem *muAddHead;
  TMenuItem *muEditHead;
  TMenuItem *muDelHead;
  TMenuItem *N7;
  TMenuItem *muCancel;
  TImageList *ImageList1;
  TCoolBar *CoolBar1;
  TToolBar *tbMainBar;
  TToolButton *tbAddHead;
  TToolButton *tbEditHead;
  TToolButton *tbDeleteHead;
  TToolButton *ToolButton4;
  TToolButton *tbAddDetail;
  TToolButton *tbEditDetail;
  TToolButton *tbDeleteDetail;
  TToolButton *ToolButton8;
  TToolButton *tbCancel;
  TToolButton *tbSave;
  TToolButton *ToolButton11;
  TToolButton *tbFirst;
  TToolButton *tbPrevious;
  TToolButton *tbNext;
  TToolButton *tbLast;
  TToolButton *ToolButton16;
  TToolButton *tbQuery;
  TToolButton *tbPrint;
  TToolButton *ToolButton19;
  TToolButton *tbHelp;
  TToolButton *tbControl;
  TToolButton *tbCheck;
  TToolButton *ToolButton5;
  TPrintDialog *BillPrintDlg;
  TPrinterSetupDialog *BillPrnSetupDlg;
  TToolButton *tbGenDetail;
  TToolButton *ToolButton2;
  TToolButton *tbEditAll;
  TToolButton *ToolButton3;
  TToolButton *tbExport;
  TToolButton *tbClose;
  TPopupMenu *pmDetail;
  TMenuItem *puClose;
  TMenuItem *muUnCheck;
  TMenuItem *muUnClose;
  TMenuItem *muUnCloseDetail;
  TMenuItem *N1;
  TSaveDialog *SaveDataDlg;
  TMenuItem *mnExport;
  TMenuItem *N2;
  void __fastcall muAddDetailClick(TObject *Sender);
  void __fastcall muAddHeadClick(TObject *Sender);
  void __fastcall muEditHeadClick(TObject *Sender);
  void __fastcall muDelHeadClick(TObject *Sender);
  void __fastcall muEditDetailClick(TObject *Sender);
  void __fastcall muDeleteDetailClick(TObject *Sender);
  void __fastcall muCancelClick(TObject *Sender);
  void __fastcall muSaveClick(TObject *Sender);
  void __fastcall muPrintClick(TObject *Sender);
  void __fastcall muExitClick(TObject *Sender);
  void __fastcall muUnDoClick(TObject *Sender);
  void __fastcall muToolBarClick(TObject *Sender);
  void __fastcall muStatusBarClick(TObject *Sender);
  void __fastcall muFirstClick(TObject *Sender);
  void __fastcall muPreviousClick(TObject *Sender);
  void __fastcall muNextClick(TObject *Sender);
  void __fastcall muLastClick(TObject *Sender);
  void __fastcall muContextClick(TObject *Sender);
  void __fastcall muWebSiteClick(TObject *Sender);
  void __fastcall muAboutClick(TObject *Sender);
  void __fastcall tbAddHeadClick(TObject *Sender);
  void __fastcall tbEditHeadClick(TObject *Sender);
  void __fastcall tbDeleteHeadClick(TObject *Sender);
  void __fastcall tbAddDetailClick(TObject *Sender);
  void __fastcall tbEditDetailClick(TObject *Sender);
  void __fastcall tbDeleteDetailClick(TObject *Sender);
  void __fastcall tbCancelClick(TObject *Sender);
  void __fastcall tbSaveClick(TObject *Sender);
  void __fastcall tbFirstClick(TObject *Sender);
  void __fastcall tbPreviousClick(TObject *Sender);
  void __fastcall tbNextClick(TObject *Sender);
  void __fastcall tbLastClick(TObject *Sender);
  void __fastcall tbHelpClick(TObject *Sender);
  void __fastcall tbPrintClick(TObject *Sender);
  void __fastcall tbControlClick(TObject *Sender);
  void __fastcall tbCheckClick(TObject *Sender);
  void __fastcall tbQueryClick(TObject *Sender);
  void __fastcall muPrintSetupClick(TObject *Sender);
  void __fastcall tbGenDetailClick(TObject *Sender);
  void __fastcall FormActivate(TObject *Sender);
  void __fastcall muOptonsClick(TObject *Sender);
  void __fastcall tbEditAllClick(TObject *Sender);
  void __fastcall tbExportClick(TObject *Sender);
  void __fastcall tbCloseClick(TObject *Sender);
  void __fastcall puCloseClick(TObject *Sender);
  void __fastcall muUnCheckClick(TObject *Sender);
  void __fastcall muUnCloseClick(TObject *Sender);
  void __fastcall muUnCloseDetailClick(TObject *Sender);
  void __fastcall FormKeyDown(TObject *Sender, WORD &Key,
          TShiftState Shift);
    void __fastcall muQueryClick(TObject *Sender);
private:

public:		// User declarations
  __fastcall TGenBaseForm(TComponent* Owner,HWND chWnd,AnsiString MidCode,AnsiString WhereStr);
  __fastcall ~TGenBaseForm();
  //以下从基类重载
  AnsiString __fastcall	  GetCurrentStateString();
  DYNAMIC void __fastcall SetControlState(TControlAction mAct);
  DYNAMIC void __fastcall SetToolBarState(TControlAction mAct);
  DYNAMIC void __fastcall SetStatusBarInfo(TControlAction mAct);
  DYNAMIC void __fastcall SetMenuState(TControlAction mAct);
  
  DYNAMIC void __fastcall PrintBill(bool ShowDialog);
  virtual void __fastcall SetCheckToolbarStatus(bool state);
  virtual void __fastcall SetCloseToolbarStatus(bool state);
  virtual void __fastcall SetCancelToolbarStatus(bool state);
  virtual void __fastcall SetCloseItemStatus(bool state);
  
  virtual void  __fastcall ReSetToolbarStatus();
  virtual void __fastcall SetFormRight(AnsiString right);
  void __fastcall 	  VerifyFormRight();
    //导出数据
    void __fastcall SaveDataToFile();//从前台得到数据
    virtual TStringList* __fastcall GetExportData();//前台可重载，用于得到保存到EXCEL里的以TAB间隔的含单头明细的传入GRID数据
    TSDGrid *HeadExportGrid; //传入导出的单头记录GRID，前台可以重载，缺省为所有的单头字段
    TSDGrid *DetailExportGrid;//传入供导出的记录GRID

};
//---------------------------------------------------------------------------
extern PACKAGE TGenBaseForm *GenBaseForm;
//---------------------------------------------------------------------------
#endif