qcl.h

来自「速达开源ERP系统」· C头文件 代码 · 共 54 行

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

#ifndef QclH
#define QclH
//---------------------------------------------------------------------------
#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 "SDEdit.h"
#include "SDGrid.h"
#include <Grids.hpp>
//---------------------------------------------------------------------------
class TfrmQcl : public TRecBaseForm
{
__published:	// IDE-managed Components
        TSDGrid *sgQcl;
        TFloatPanel *fpQcl;
        TLabel *Label1;
        TLabel *Label2;
        TLabel *Label3;
        TSDEdit *seQclName;
        TSDEdit *seQclDesc;
        TSDEdit *seQclCode;
        void __fastcall FormShow(TObject *Sender);
        void __fastcall sgQclClick(TObject *Sender);
        void __fastcall seQclCodeKeyPress(TObject *Sender, char &Key);
private:	// User declarations
    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 InitEditControl();
    void __fastcall RefreshUpdateData(int MsgSrc,int MsgType);    

public:		// User declarations
        __fastcall TfrmQcl(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TfrmQcl *frmQcl;
//---------------------------------------------------------------------------
#endif