wn.h

科思ERP部分源码及控件

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

#ifndef WnH
#define WnH
//---------------------------------------------------------------------------
#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 "DateEdit.hpp"
#include "fpanel.h"
#include "SDComboBox.h"
#include "SDEdit.h"
#include "SDGrid.h"
#include <Grids.hpp>
#include <Mask.hpp>
//---------------------------------------------------------------------------
class TfrmWn : public TRecBaseForm
{
__published:	// IDE-managed Components
        TSDGrid *sgWn;
        TPageControl *pgWn;
        TTabSheet *tsWnBase;
        TFloatPanel *fpWnBase;
        TLabel *Label2;
        TLabel *Label3;
        TLabel *Label4;
        TLabel *Label6;
        TLabel *Label7;
        TLabel *Label16;
        TLabel *Label19;
        TLabel *Label20;
        TLabel *Label32;
        TLabel *Label1;
        TLabel *Label23;
        TSDEdit *seWnCode;
        TDateEdit *deWnDate;
        TSDComboBox *scWnProcess;
        TSDComboBox *scWnUnit;
        TGroupBox *GroupBox1;
        TLabel *Label10;
        TLabel *Label11;
        TLabel *Label12;
        TLabel *Label13;
        TDateEdit *deWnPsDate;
        TDateEdit *deWnRsDate;
        TDateEdit *deWnPeDate;
        TDateEdit *deWnReDate;
        TSDComboBox *scWnLoc;
        TSDComboBox *scWnBatch;
        TSDEdit *seWnPQty;
        TGroupBox *GroupBox2;
        TLabel *Label28;
        TLabel *Label29;
        TLabel *Label30;
        TLabel *Label31;
        TSDEdit *seWnPer;
        TSDEdit *seWnPrate;
        TSDEdit *seWnPeor;
        TSDEdit *seWnWxAmt;
        TCheckBox *cbWnChkFlg;
        TCheckBox *cbWnWxFlg;
        TSDEdit *seWnGoodsName;
        TSDEdit *seWnWo;
        TSDEdit *seWnPwt;
        TSDEdit *seWnGoods;
        TTabSheet *tsWnAdd;
        TFloatPanel *fpWnAdd;
        TLabel *Label38;
        TGroupBox *GroupBox3;
        TLabel *Label14;
        TLabel *Label17;
        TLabel *Label18;
        TLabel *Label21;
        TLabel *Label22;
        TSDEdit *seWnCQty;
        TSDEdit *seWnEQty;
        TSDEdit *seWnWQty;
        TSDEdit *seWnSQty;
        TSDEdit *seWnRQty;
        TGroupBox *GroupBox4;
        TLabel *Label24;
        TLabel *Label25;
        TLabel *Label26;
        TLabel *Label27;
        TLabel *Label33;
        TLabel *Label34;
        TSDEdit *seWnFwt;
        TSDEdit *seWnRwt;
        TSDEdit *seWnDwt;
        TSDEdit *seWnWwt;
        TSDEdit *seWnSwt;
        TSDEdit *seWnOwt;
        TGroupBox *GroupBox5;
        TLabel *Label37;
        TCheckBox *chkWnFshFlg;
        TDateEdit *deWnFshDate;
        TMemo *memWnDesc;
    void __fastcall FormShow(TObject *Sender);
    void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
    void __fastcall sgWnClick(TObject *Sender);
private:	// User declarations
    AnsiString FWnWoCode;
    int        FWnWoCheck;
    int        FWnWoCancel;
    AnsiString __fastcall GetDataToGrid();
    void __fastcall InitEditControl();
    void __fastcall ClearControl(bool BringToNext);
    void __fastcall GetDataFromComObject();
    void __fastcall SendDataToComObject();
    void __fastcall WaitUserInput();
    void __fastcall RefreshGridData(int mAction);
    void __fastcall FillGridWithData();
    void __fastcall GenrateDoc();
public:		// User declarations
    __fastcall TfrmWn(TComponent* Owner, HWND chWnd, AnsiString MidCode,AnsiString WhereStr);
    __fastcall TfrmWn(TComponent* Owner, HWND chWnd, AnsiString MidCode,AnsiString WhereStr,AnsiString ParamString);
};
//---------------------------------------------------------------------------
extern PACKAGE TfrmWn *frmWn;
//---------------------------------------------------------------------------
#endif