vdatadict.h

速达开源ERP系统

//---------------------------------------------------------------------------
#ifndef VDataDictH
#define VDataDictH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include "BillBaseForm.h"
#include "DateEdit.hpp"
#include "fpanel.h"
#include "SDComboBox.h"
#include "SDEdit.h"
#include "SDGrid.h"
#include <Buttons.hpp>
#include <ComCtrls.hpp>
#include <Grids.hpp>
#include <ImgList.hpp>
#include <Mask.hpp>
#include <Menus.hpp>
#include <ToolWin.hpp>
#include <Dialogs.hpp>
//---------------------------------------------------------------------------
class PACKAGE TfrmVDataDict;
class  TfrmVDataDict : public TBillBaseForm
{
__published:	// IDE-managed Components
        TSDGrid *sgVDataDict;
        TFloatPanel *FloatPanel2;
        TLabel *Label6;
        TGroupBox *GroupBox1;
        TLabel *Label8;
        TLabel *Label7;
        TLabel *Label9;
        TLabel *Label10;
        TLabel *Label11;
        TLabel *Label12;
        TSDEdit *seVFieldNo;
        TSDEdit *seVFieldName;
        TSDEdit *seVFieldDesc;
        TSDComboBox *scVFieldType;
        TSDEdit *seVFieldWidth;
        TSDEdit *seVFieldScale;
        TGroupBox *GroupBox2;
        TLabel *Label13;
        TCheckBox *chkVFieldFlg;
        TMemo *memVFieldExpr;
        TMemo *memVFieldMemo;
        TBitBtn *btnOK;
        TBitBtn *btnCancel;
        TFloatPanel *FloatPanel1;
        TLabel *Label1;
        TLabel *Label2;
        TLabel *Label3;
        TLabel *Label5;
        TLabel *Label4;
        TLabel *Label19;
        TLabel *Label20;
        TLabel *Label21;
        TLabel *lbViewDate;
        TSDEdit *seViewName;
        TSDEdit *seViewDesc;
        TSDComboBox *scViewClassID;
        TMemo *memViewWhere;
        TMemo *memViewTable;
        TMemo *memViewOrder;
        TMemo *memViewGroup;
        void __fastcall FormShow(TObject *Sender);
        void __fastcall sgVDataDictSelectCell(TObject *Sender, int ACol, int ARow,
             bool &CanSelect);
        void __fastcall sgVDataDictDblClick(TObject *Sender);
        void __fastcall btnOKClick(TObject *Sender);
        void __fastcall btnCancelClick(TObject *Sender);
        void __fastcall scVFieldTypeExit(TObject *Sender);
        void __fastcall seViewNameKeyDown(TObject *Sender, WORD &Key,
          TShiftState Shift);
private:	// User declarations
        AnsiString __fastcall GetDetailValue(int FieldIndex);
        AnsiString __fastcall GetHeadValue(int Index);
        void __fastcall SetHeadValue(int Index ,AnsiString Value);
        void __fastcall SetDetailValue(int Index, AnsiString Value);
        int __fastcall GetMaxItemLineValue();
        double TaxRate;
        double Amt;
        double TaxAmt;
        double NoTaxPrice;
        AnsiString KeyCode;
        bool MUnit;
        void  __fastcall RefreshUpdateData(int MsgSrc,int MsgType);               
public:		// User declarations
        AnsiString FormIniFile;
        void __fastcall InitEditControl();
        void __fastcall ClearControl(int Section,bool BringToNext);
        void __fastcall GetDataFromComObject(int Section);
        void __fastcall SendDataToComObject(int Section);
        void __fastcall WaitUserInput(int Section);
        void __fastcall RefreshGridData(int mAction);
        void __fastcall DisplayBill();
        void __fastcall GetBill(AnsiString BillID);
        void __fastcall FillGridWithData();
        void __fastcall ChangeToBrowseState(bool Browse);
        __fastcall TfrmVDataDict(TComponent* Owner);
        __property int MaxItemLineValue  = { read=GetMaxItemLineValue };
};
//---------------------------------------------------------------------------
extern PACKAGE TfrmVDataDict *frmVDataDict;
//---------------------------------------------------------------------------
#endif