home *** CD-ROM | disk | FTP | other *** search
/ Chip 2001 September / Chip_2001-09_cd1.bin / zkuste / delphi / kolekce / d12345 / MISC.ZIP / Vedit.hpp < prev    next >
Encoding:
C/C++ Source or Header  |  2001-05-09  |  4.3 KB  |  132 lines
  1. // Borland C++ Builder
  2. // Copyright (c) 1995, 1998 by Borland International
  3. // All rights reserved
  4.  
  5. // (DO NOT EDIT: machine generated header) 'Vedit.pas' rev: 3.00
  6.  
  7. #ifndef VeditHPP
  8. #define VeditHPP
  9. #include <Graphics.hpp>
  10. #include <Controls.hpp>
  11. #include <StdCtrls.hpp>
  12. #include <Forms.hpp>
  13. #include <Windows.hpp>
  14. #include <SysUtils.hpp>
  15. #include <Classes.hpp>
  16. #include <Misc.hpp>
  17. #include <SysInit.hpp>
  18. #include <System.hpp>
  19.  
  20. //-- user supplied -----------------------------------------------------------
  21.  
  22. namespace Vedit
  23. {
  24. //-- type declarations -------------------------------------------------------
  25. enum TDisplayType { dtInteger, dtBinary, dtHex, dtReal };
  26.  
  27. class DELPHICLASS TVEdit;
  28. class PASCALIMPLEMENTATION TVEdit : public Stdctrls::TCustomEdit 
  29. {
  30.     typedef Stdctrls::TCustomEdit inherited;
  31.     
  32. private:
  33.     TDisplayType FDisplayType;
  34.     Byte FDecimals;
  35.     TFloatFormat FFloatFormat;
  36.     Extended FMin;
  37.     Extended FMax;
  38.     Extended FValue;
  39.     Classes::TNotifyEvent FOnAssignment;
  40.     Classes::TNotifyEvent FOnDisplayTypeChange;
  41.     System::AnsiString __fastcall GetBinary();
  42.     System::AnsiString __fastcall GetHexadecimal();
  43.     int __fastcall GetInteger(void);
  44.     void __fastcall SetDecimals(Byte Value);
  45.     void __fastcall SetFloatFormat(Sysutils::TFloatFormat Value);
  46.     void __fastcall SetDisplayType(TDisplayType Value);
  47.     void __fastcall SetBinary(System::AnsiString Value);
  48.     void __fastcall SetHexadecimal(System::AnsiString Value);
  49.     void __fastcall SetInteger(int Value);
  50.     void __fastcall SetReal(Extended Value);
  51.     
  52. protected:
  53.     DYNAMIC void __fastcall KeyPress(char &Key);
  54.     DYNAMIC void __fastcall KeyUp(Word &Key, Classes::TShiftState Shift);
  55.     virtual void __fastcall DoAssignment(void);
  56.     virtual void __fastcall DoDisplayTypeChange(void);
  57.     DYNAMIC void __fastcall DoExit(void);
  58.     virtual void __fastcall DoText(void);
  59.     virtual void __fastcall DoValue(void);
  60.     
  61. public:
  62.     __fastcall virtual TVEdit(Classes::TComponent* AOwner);
  63.     virtual bool __fastcall KeyOK(char Key);
  64.     
  65. __published:
  66.     __property System::AnsiString AsBinary = {read=GetBinary, write=SetBinary, stored=false};
  67.     __property System::AnsiString AsHex = {read=GetHexadecimal, write=SetHexadecimal, stored=false};
  68.     __property Extended AsReal = {read=FValue, write=SetReal, stored=false};
  69.     __property int AsInteger = {read=GetInteger, write=SetInteger, stored=false, nodefault};
  70.     __property Byte Decimals = {read=FDecimals, write=SetDecimals, nodefault};
  71.     __property Sysutils::TFloatFormat FloatFormat = {read=FFloatFormat, write=SetFloatFormat, nodefault
  72.         };
  73.     __property Extended Min = {read=FMin, write=FMin};
  74.     __property Extended Max = {read=FMax, write=FMax};
  75.     __property TDisplayType DisplayType = {read=FDisplayType, write=SetDisplayType, nodefault};
  76.     __property Classes::TNotifyEvent OnAssignment = {read=FOnAssignment, write=FOnAssignment};
  77.     __property Classes::TNotifyEvent OnDisplayTypeChange = {read=FOnDisplayTypeChange, write=FOnDisplayTypeChange
  78.         };
  79.     __property AutoSelect ;
  80.     __property AutoSize ;
  81.     __property BorderStyle ;
  82.     __property CharCase ;
  83.     __property Color ;
  84.     __property Ctl3D ;
  85.     __property DragCursor ;
  86.     __property Enabled ;
  87.     __property Font ;
  88.     __property HideSelection ;
  89.     __property MaxLength ;
  90.     __property OEMConvert ;
  91.     __property ParentColor ;
  92.     __property ParentCtl3D ;
  93.     __property ParentFont ;
  94.     __property ParentShowHint ;
  95.     __property PasswordChar ;
  96.     __property ReadOnly ;
  97.     __property ShowHint ;
  98.     __property TabOrder ;
  99.     __property TabStop ;
  100.     __property Text ;
  101.     __property Visible ;
  102.     __property OnChange ;
  103.     __property OnClick ;
  104.     __property OnDblClick ;
  105.     __property OnDragDrop ;
  106.     __property OnDragOver ;
  107.     __property OnEndDrag ;
  108.     __property OnEnter ;
  109.     __property OnExit ;
  110.     __property OnKeyDown ;
  111.     __property OnKeyPress ;
  112.     __property OnKeyUp ;
  113.     __property OnMouseDown ;
  114.     __property OnMouseMove ;
  115.     __property OnMouseUp ;
  116. public:
  117.     /* TWinControl.CreateParented */ __fastcall TVEdit(HWND ParentWindow) : Stdctrls::TCustomEdit(ParentWindow
  118.         ) { }
  119.     /* TWinControl.Destroy */ __fastcall virtual ~TVEdit(void) { }
  120.     
  121. };
  122.  
  123. //-- var, const, procedure ---------------------------------------------------
  124. #define TVEdit_VERSION (Byte)(100)
  125.  
  126. }    /* namespace Vedit */
  127. #if !defined(NO_IMPLICIT_NAMESPACE_USE)
  128. using namespace Vedit;
  129. #endif
  130. //-- end unit ----------------------------------------------------------------
  131. #endif    // Vedit
  132.