wageitemfr.h

来自「一个以前收集的基于C/S架构的ERP客户端源代码」· C头文件 代码 · 共 77 行

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

#ifndef FadmFH
#define FadmFH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ExtCtrls.hpp>
#include <Buttons.hpp>
#include "StdBaseForm.h"
#include "Calc.h"
//---------------------------------------------------------------------------
class  PACKAGE TfrmWageItemFr;
class TfrmWageItemFr : public TStdBaseForm
{
__published:	// IDE-managed Components
        TBitBtn *btOk;
        TBitBtn *btCacel;
        TGroupBox *GroupBox3;
        TListBox *ListItem;
        TGroupBox *GroupBox2;
        TSpeedButton *SpeedButton1;
        TSpeedButton *SpeedButton2;
        TSpeedButton *SpeedButton3;
        TSpeedButton *SpeedButton4;
        TSpeedButton *SpeedButton5;
        TSpeedButton *SpeedButton6;
        TSpeedButton *SpeedButton7;
        TSpeedButton *SpeedButton8;
        TSpeedButton *SpeedButton9;
        TSpeedButton *SpeedButton10;
        TSpeedButton *SpeedButton11;
        TSpeedButton *SpeedButton12;
        TSpeedButton *SpeedButton13;
        TSpeedButton *SpeedButton14;
        TSpeedButton *SpeedButton15;
        TSpeedButton *SpeedButton16;
        TSpeedButton *SpeedButton17;
        TSpeedButton *SpeedButton18;
        TGroupBox *GroupBox1;
        TMemo *memFormula;
        TBitBtn *btReSet;
        TEdit *seTempUse;
        void __fastcall btOkClick(TObject *Sender);
        void __fastcall btCacelClick(TObject *Sender);
        void __fastcall ListItemDblClick(TObject *Sender);
        void __fastcall btReSetClick(TObject *Sender);
        void __fastcall SpeedButtonClick(TObject *Sender);
private:	// User declarations
     /*   struct FlItem
        {
           AnsiString  Name;
           double      Numb;
        };
        struct FlItem  m_FiItem[10];
     */
        AnsiString  m_FadmFResult;
        AnsiString  m_WageItemCodeFr;
        bool        m_FadmFSure;
        TExpression * Expression;
        bool __fastcall IsVariable(AnsiString Variable);
        double __fastcall GetValue(AnsiString Variable);


public:		// User declarations
        __property AnsiString FadmFResult={read=m_FadmFResult};
        __property AnsiString WageItemCodeFr={read=m_WageItemCodeFr};
        __property bool FadmFSure={read=m_FadmFSure};
        __fastcall TfrmWageItemFr(TComponent* Owner,AnsiString FadmF );
};
//---------------------------------------------------------------------------
extern PACKAGE TfrmWageItemFr *frmWageItemFr;
//---------------------------------------------------------------------------
#endif