forecasth.h

来自「科思ERP部分源码及控件」· C头文件 代码 · 共 116 行

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

#ifndef ForeCasthH
#define ForeCasthH
//---------------------------------------------------------------------------
#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 <Buttons.hpp>
#include <ComCtrls.hpp>
#include <Dialogs.hpp>
#include <ImgList.hpp>
#include <Mask.hpp>
#include <Menus.hpp>
#include <ToolWin.hpp>
#include "SDGrid.h"
#include <Grids.hpp>
//---------------------------------------------------------------------------
class TfrmForeCasth : public TBillBaseForm
{
__published:	// IDE-managed Components
        TFloatPanel *fpForeCastHead;
        TLabel *Label1;
        TLabel *Label9;
        TLabel *Label4;
        TLabel *Label8;
        TLabel *Label2;
        TLabel *LabSysDate;
        TSDEdit *seForeCasthCode;
        TDateEdit *deForeCasthDate;
        TSDComboBox *scForeCasthPlanner;
        TMemo *memForeCasthDesc;
        TFloatPanel *FloatPanel3;
        TLabel *Label17;
        TLabel *labChecker;
        TLabel *Label15;
        TLabel *labCheckDate;
        TCheckBox *cheCheck;
        TFloatPanel *ftForeCastDetail;
        TLabel *Label3;
        TLabel *Label5;
        TLabel *Label6;
        TLabel *LabPpt1;
        TLabel *Label10;
        TLabel *LabPpt2;
        TLabel *Label11;
        TLabel *Label13;
        TLabel *Label14;
        TLabel *Label7;
        TLabel *Label12;
        TLabel *Label16;
        TLabel *Label18;
        TSDEdit *seForeCastdGoods;
        TSDEdit *seForeCastdGoodsName;
        TSDEdit *seForeCastdQty;
        TSDComboBox *scForeCastdUnit;
        TDateEdit *deForeCastdDate;
        TSDEdit *seForeCastdGQty;
        TMemo *memForeCastdDesc;
        TSDComboBox *scForeCastdType;
        TSDComboBox *scForeCastdFrom;
        TBitBtn *btnOK;
        TBitBtn *btnCancel;
        TSDEdit *seForeCastdLine;
        TSDEdit *seForeCastdEoq;
        TSDEdit *seForeCastdEoi;
        TSDEdit *seForeCastdSafeQty;
        TSDGrid *sgForeCasth;
        TSDEdit *seForeCastdGoodsSpce;
        void __fastcall FormCreate(TObject *Sender);
        void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
        void __fastcall FormShow(TObject *Sender);
        void __fastcall sgForeCasthDblClick(TObject *Sender);
        void __fastcall btnOKClick(TObject *Sender);
        void __fastcall btnCancelClick(TObject *Sender);
        void __fastcall seForeCasthCodeKeyDown(TObject *Sender, WORD &Key,
          TShiftState Shift);
        void __fastcall seForeCastdGoodsKeyDown(TObject *Sender, WORD &Key,
          TShiftState Shift);
        void __fastcall seForeCastdGoodsButtonClick(TObject *Sender);
        void __fastcall sgForeCasthClick(TObject *Sender);
        void __fastcall deForeCastdDateExit(TObject *Sender);
private:	// User declarations
    AnsiString __fastcall GetDataToGrid();
 //   AnsiString __fastcall GetDetailValue(int FieldIndex);
 //   AnsiString __fastcall GetHeadValue(int Index);
    void __fastcall RefreshUpdateData(int MsgSrc,int MsgType);
 //   void __fastcall SetHeadValue(int Index ,AnsiString Value);
 //   void __fastcall SetDetailValue(int Index, AnsiString Value);
    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=true);
    bool __fastcall BeforeCheck();
    bool __fastcall BeforeUnCheck();
public:		// User declarations
    AnsiString FormIniFile;
        __fastcall TfrmForeCasth(TComponent* Owner, HWND chWnd, AnsiString ClassCode,AnsiString WhereStr);
};
//---------------------------------------------------------------------------
extern PACKAGE TfrmForeCasth *frmForeCasth;
//---------------------------------------------------------------------------
#endif