wl.h

速达开源ERP系统

//---------------------------------------------------------------------------
#ifndef WlH
#define WlH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include "fpanel.h"
#include "RecBaseForm.h"
#include "SDEdit.h"
#include "SDGrid.h"
#include <ComCtrls.hpp>
#include <Grids.hpp>
#include <ImgList.hpp>
#include <Menus.hpp>
#include <ToolWin.hpp>
#include "SDComboBox.h"
#include <Dialogs.hpp>
//---------------------------------------------------------------------------
class PACKAGE TfrmWl;
class  TfrmWl : public TRecBaseForm
{
__published:	// IDE-managed Components
        TFloatPanel *FloatPanel1;
        TLabel *Label1;
        TSDGrid *sgWl;
        TLabel *Label3;
        TLabel *Label4;
        TLabel *Label2;
        TLabel *Label5;
        TLabel *Label6;
        TLabel *Label7;
        TSDEdit *seWlCode;
        TSDEdit *seWlDesc;
        TSDEdit *seWlFix;
        TSDEdit *seWlBorus;
        TSDEdit *seWlAnce;
        TSDEdit *seWlOther;
        TLabel *LbWlSum;
        void __fastcall FormShow(TObject *Sender);
        void __fastcall seWlFixExit(TObject *Sender);
        void __fastcall seWlBorusExit(TObject *Sender);
        void __fastcall seWlAnceExit(TObject *Sender);
        void __fastcall seWlOtherExit(TObject *Sender);
        void __fastcall sgWlClick(TObject *Sender);
private:
    AnsiString __fastcall GetFieldValue(int FieldIndex);
    void __fastcall ClearControl(bool BringToNext);
    void __fastcall GetDataFromComObject();
    void __fastcall SendDataToComObject();
    void __fastcall WaitUserInput();
    AnsiString __fastcall GetDataToGrid();
    void __fastcall RefreshGridData(int mAction);
    void __fastcall FillGridWithData();
    void __fastcall InitEditControl();	// User declarations
public:		// User declarations
        __fastcall TfrmWl(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TfrmWl *frmWl;
//---------------------------------------------------------------------------
#endif