fadc.h

速达开源ERP系统

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

#ifndef FaDcH
#define FaDcH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include "RecBaseForm.h"
#include <ComCtrls.hpp>
#include <Dialogs.hpp>
#include <ImgList.hpp>
#include <Menus.hpp>
#include <ToolWin.hpp>
#include "fpanel.h"
#include "SDComboBox.h"
#include "SDEdit.h"
#include "SDGrid.h"
#include <Grids.hpp>
#include <ExtCtrls.hpp>
//---------------------------------------------------------------------------
class PACKAGE TfrmFaDc;
class TfrmFaDc : public TRecBaseForm
{
__published:	// IDE-managed Components
        TFloatPanel *FloatPanel2;
        TLabel *Label9;
        TLabel *labLgLocName;
        TSDComboBox *scFaDcFMonth;
        TFloatPanel *FloatPanel1;
        TLabel *Label2;
        TLabel *Label4;
        TSDEdit *seFaDcOVal;
        TSDComboBox *scFaDcFadn;
        TLabel *Label1;
        TSDComboBox *scFaDcFadm;
        TLabel *Label3;
        TSDEdit *seFaDcDVal;
        TLabel *Label5;
        TSDEdit *seFaDcEVal;
        TLabel *Label8;
        TSDEdit *seFaDcPeriod;
        TLabel *Label10;
        TSDEdit *seFaDcAPeriod;
        TLabel *Label11;
        TSDEdit *seFaDcVal;
        TLabel *Label12;
        TCheckBox *chkFaDcPost;
        TLabel *Label13;
        TSDEdit *seFaDcPzCode;
        TLabel *Label14;
        TSDEdit *seFaDcFadnName;
        TSDComboBox *scFaDcUser;
        TPanel *Panel1;
        TLabel *Label6;
        TSDEdit *seFaDcTWork;
        TLabel *Label7;
        TSDEdit *seFaDcAWork;
        TSDGrid *sgFaDc;
        void __fastcall scFaDcFMonthClick(TObject *Sender);
        void __fastcall chkFaDcPostClick(TObject *Sender);
        void __fastcall muEditDetailClick(TObject *Sender);
        void __fastcall scFaDcFadnKeyDown(TObject *Sender, WORD &Key,
          TShiftState Shift);
        void __fastcall sgFaDcClick(TObject *Sender);
        void __fastcall FormShow(TObject *Sender);
        void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
private:	// User declarations
        AnsiString LastFaDcFMonth;
        void __fastcall InitEditControl();
        AnsiString __fastcall GetFieldValue(int FieldIndex);
        AnsiString __fastcall GetDataToGrid();
        void __fastcall ClearControl(bool BringToNext);
        void __fastcall GetDataFromComObject();
        void __fastcall SendDataToComObject();
        void __fastcall WaitUserInput();
        void __fastcall RefreshGridData(int mAction);
        void __fastcall FillGridWithData();
        void __fastcall RefreshUpdateData(int MsgSrc,int MsgType);
        double  __fastcall Depreciation(AnsiString SourData[13]);
        bool __fastcall EnSureDepreciationECode(AnsiString fadncode);
        TComResultSet  *ResultSet;
        TComResultSet  *WorkResultSet;
public:		// User declarations
        __fastcall TfrmFaDc(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TfrmFaDc *frmFaDc;
//---------------------------------------------------------------------------
#endif