//---------------------------------------------------------------------------- #ifndef OCBHE #define OCBHE //---------------------------------------------------------------------------- #include #include #include #include #include #include #include #include #include #include //---------------------------------------------------------------------------- class TDlgGetValue : public TForm { __published: TButton *OKBtn; TButton *CancelBtn; TBevel *Bevel; TLabel *GetValueType; TEdit *GetValueBox; TScrollBar *GetValueBar; TCheckBox *Resize_Horz; void __fastcall FormActivate(TObject *Sender); void __fastcall GetValueBarChange(TObject *Sender); void __fastcall GetValueBoxChange(TObject *Sender); void __fastcall OKBtnClick(TObject *Sender); void __fastcall CancelBtnClick(TObject *Sender); void __fastcall GetValueBoxKeyPress(TObject *Sender, char &Key); private: public: virtual __fastcall TDlgGetValue(TComponent* AOwner); void __fastcall InitTheForm(AnsiString Title, AnsiString UnitType, int UnitMax, int UnitMin, int UnitInit, int LargeStep, int SmallStep, bool ResizeHorz); bool __fastcall UserResult(void); bool __fastcall GetResizeHorz(void); int __fastcall GetAmount(void); int nChangeValue; bool bGetValueGo, bInBox , bInBar; }; //---------------------------------------------------------------------------- extern PACKAGE TDlgGetValue *DlgGetValue; //---------------------------------------------------------------------------- #endif