home *** CD-ROM | disk | FTP | other *** search
- // Borland C++ Builder
- // Copyright (c) 1995, 1998 by Borland International
- // All rights reserved
-
- // (DO NOT EDIT: machine generated header) 'NumIO.pas' rev: 3.00
-
- #ifndef NumIOHPP
- #define NumIOHPP
- #include <StdCtrls.hpp>
- #include <Menus.hpp>
- #include <Dialogs.hpp>
- #include <Forms.hpp>
- #include <Controls.hpp>
- #include <Graphics.hpp>
- #include <Classes.hpp>
- #include <SysUtils.hpp>
- #include <Messages.hpp>
- #include <Windows.hpp>
- #include <SysInit.hpp>
- #include <System.hpp>
-
- //-- user supplied -----------------------------------------------------------
-
- namespace Numio
- {
- //-- type declarations -------------------------------------------------------
- enum TInFormat { itExp, itFloat, itInt, itHex, itOct, itBin, itDynamic };
-
- enum TDecPSep { dsDot, dsComma, dsBoth };
-
- class DELPHICLASS TNumIO;
- class PASCALIMPLEMENTATION TNumIO : public Stdctrls::TCustomEdit
- {
- typedef Stdctrls::TCustomEdit inherited;
-
- private:
- TInFormat FInFormat;
- TInFormat FCurrentFormat;
- System::AnsiString OldText;
- bool FBeep;
- double FMinimum;
- double FMaximum;
- TDecPSep FDecPSep;
- double FCurrentVal;
- void __fastcall SetInputFormat(TInFormat value);
- void __fastcall SetRangeLow(double value);
- void __fastcall SetRangeHigh(double value);
- void __fastcall SetLabValue(double x);
- double __fastcall GetLabValue(void);
- void __fastcall SetDecPSep(TDecPSep Value);
-
- protected:
- virtual void __fastcall AssignTo(Classes::TPersistent* Dest);
- bool __fastcall CheckChange(System::AnsiString Text);
- DYNAMIC void __fastcall Change(void);
- void __fastcall ConvertToDec(System::AnsiString S, Byte b, int &V, int &Code);
-
- public:
- __fastcall virtual TNumIO(Classes::TComponent* AOwner);
- __fastcall virtual ~TNumIO(void);
- virtual void __fastcall Assign(Classes::TPersistent* Source);
- __property double Value = {read=GetLabValue, write=SetLabValue};
-
- __published:
- __property AutoSelect ;
- __property AutoSize ;
- __property bool Beep = {read=FBeep, write=FBeep, nodefault};
- __property BorderStyle ;
- __property Color ;
- __property Ctl3D ;
- __property Cursor ;
- __property TDecPSep DecPlaceSep = {read=FDecPSep, write=SetDecPSep, nodefault};
- __property Enabled ;
- __property Font ;
- __property Height ;
- __property HelpContext ;
- __property HideSelection ;
- __property Hint ;
- __property TInFormat InputFormat = {read=FInFormat, write=SetInputFormat, nodefault};
- __property Left ;
- __property double RangeHigh = {read=FMaximum, write=SetRangeHigh};
- __property double RangeLow = {read=FMinimum, write=SetRangeLow};
- __property Name ;
- __property ParentColor ;
- __property ParentCtl3D ;
- __property ParentFont ;
- __property ParentShowHint ;
- __property PopupMenu ;
- __property ShowHint ;
- __property TabOrder ;
- __property TabStop ;
- __property Tag ;
- __property Text ;
- __property Top ;
- __property Visible ;
- __property Width ;
- __property OnChange ;
- __property OnClick ;
- __property OnDblClick ;
- __property OnEnter ;
- __property OnExit ;
- __property OnKeyDown ;
- __property OnKeyPress ;
- __property OnKeyUp ;
- __property OnMouseDown ;
- __property OnMouseMove ;
- __property OnMouseUp ;
- public:
- /* TWinControl.CreateParented */ __fastcall TNumIO(HWND ParentWindow) : Stdctrls::TCustomEdit(ParentWindow
- ) { }
-
- };
-
- //-- var, const, procedure ---------------------------------------------------
- extern PACKAGE void __fastcall Register(void);
-
- } /* namespace Numio */
- #if !defined(NO_IMPLICIT_NAMESPACE_USE)
- using namespace Numio;
- #endif
- //-- end unit ----------------------------------------------------------------
- #endif // NumIO
-