glkm.h

来自「速达开源ERP系统」· C头文件 代码 · 共 108 行

//---------------------------------------------------------------------------
#ifndef GlkmH
#define GlkmH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include "RecBaseForm.h"
#include <ComCtrls.hpp>
#include <ImgList.hpp>
#include <Menus.hpp>
#include <ToolWin.hpp>
#include "fpanel.h"
#include "SDEdit.h"
#include <ExtCtrls.hpp>
#include <Dialogs.hpp>
#include "SDComboBox.h"
//---------------------------------------------------------------------------
class PACKAGE TfrmGlkm ;
class TfrmGlkm : public TRecBaseForm
{
__published:	// IDE-managed Components
    TPanel *Panel1;
        TTreeView *tvGlkm;
        TPageControl *PageControl1;
        TTabSheet *TabSheet1;
        TTabSheet *TabSheet2;
        TFloatPanel *FloatPanel1;
        TLabel *Label1;
        TLabel *Label2;
        TLabel *Label3;
        TLabel *Label4;
        TLabel *Label5;
        TLabel *Label6;
        TGroupBox *GroupBox2;
        TLabel *Label9;
        TSDComboBox *scGlkmUnit;
        TSDEdit *seGlkmCode;
        TSDEdit *seGlkmItem;
        TSDEdit *seGlkmUpperCode;
        TSDEdit *seGlkmLevel;
        TSDEdit *seGlkmName;
        TSDEdit *seGlkmShortCut;
        TGroupBox *GroupBox1;
        TLabel *Label8;
        TSDComboBox *scGlkmCurrency;
        TCheckBox *chkGlkmMx;
        TCheckBox *chkGlkmWb;
        TCheckBox *chkGlkmSl;
        TFloatPanel *FloatPanel2;
        TLabel *Label16;
        TSDComboBox *scGlkmDir;
        TSDComboBox *scGlkmBookType;
        TLabel *Label10;
        TLabel *Label11;
        TSDEdit *seLevelLen;
        TImageList *ImageList2;
        TGroupBox *GroupBox3;
        TCheckBox *chkGlkmClient;
        TCheckBox *chkGlkmHuman;
        TCheckBox *chkGlkmDept;
        TCheckBox *chkGlkmBank;
        TCheckBox *chkGlkmCash;
        TCheckBox *chkGlkmSupply;
        TCheckBox *chkGlkmProject;
        TCheckBox *chkGlkmCc;
        TCheckBox *chkGlkmAer;
        TCheckBox *chkGlkmNoUse;
    void __fastcall FormShow(TObject *Sender);
    void __fastcall tvGlkmChange(TObject *Sender, TTreeNode *Node);
    void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
    void __fastcall muAddDetailClick(TObject *Sender);
    void __fastcall muEditDetailClick(TObject *Sender);
    void __fastcall muDeleteDetailClick(TObject *Sender);
    void __fastcall muFirstClick(TObject *Sender);
    void __fastcall muPreviousClick(TObject *Sender);
    void __fastcall muNextClick(TObject *Sender);
    void __fastcall muLastClick(TObject *Sender);
        void __fastcall seGlkmItemExit(TObject *Sender);
        void __fastcall chkGlkmWbClick(TObject *Sender);
        void __fastcall chkGlkmSlClick(TObject *Sender);

private:	// User declarations

    int TierLen[20];   //存放各层字符的长度
    bool TreeFresh;    //更新树
    AnsiString __fastcall GetFieldValue(int FieldIndex);
    void __fastcall ClearControl(bool BringToNext);
    void __fastcall GetDataFromComObject();
    void __fastcall SendDataToComObject();

    void __fastcall WaitUserInput();
    void __fastcall RefreshGridData(int mAction);
    void __fastcall FillGridWithData();
    void __fastcall InitEditControl();
    void __fastcall TreeViewLocation();

    int __fastcall GetTierLen(int tiernum);
    void __fastcall InitTierLen();
public:		// User declarations
    __fastcall TfrmGlkm(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TfrmGlkm *frmGlkm;
//---------------------------------------------------------------------------
#endif