diff options
Diffstat (limited to 'apps/windoze/CBuilder5/BibleCS/rxlib/Rxcombos.hpp')
| -rw-r--r-- | apps/windoze/CBuilder5/BibleCS/rxlib/Rxcombos.hpp | 272 |
1 files changed, 272 insertions, 0 deletions
diff --git a/apps/windoze/CBuilder5/BibleCS/rxlib/Rxcombos.hpp b/apps/windoze/CBuilder5/BibleCS/rxlib/Rxcombos.hpp new file mode 100644 index 0000000..8bf3ee7 --- /dev/null +++ b/apps/windoze/CBuilder5/BibleCS/rxlib/Rxcombos.hpp @@ -0,0 +1,272 @@ +// Borland C++ Builder +// Copyright (c) 1995, 1999 by Borland International +// All rights reserved + +// (DO NOT EDIT: machine generated header) 'RxCombos.pas' rev: 5.00 + +#ifndef RxCombosHPP +#define RxCombosHPP + +#pragma delphiheader begin +#pragma option push -w- +#pragma option push -Vx +#include <Menus.hpp> // Pascal unit +#include <Forms.hpp> // Pascal unit +#include <StdCtrls.hpp> // Pascal unit +#include <Graphics.hpp> // Pascal unit +#include <Controls.hpp> // Pascal unit +#include <Classes.hpp> // Pascal unit +#include <Messages.hpp> // Pascal unit +#include <Windows.hpp> // Pascal unit +#include <SysInit.hpp> // Pascal unit +#include <System.hpp> // Pascal unit + +//-- user supplied ----------------------------------------------------------- + +namespace Rxcombos +{ +//-- type declarations ------------------------------------------------------- +typedef Stdctrls::TComboBoxStyle TOwnerDrawComboStyle; + +class DELPHICLASS TOwnerDrawComboBox; +class PASCALIMPLEMENTATION TOwnerDrawComboBox : public Stdctrls::TCustomComboBox +{ + typedef Stdctrls::TCustomComboBox inherited; + +private: + Stdctrls::TComboBoxStyle FStyle; + bool FItemHeightChanging; + void __fastcall SetComboStyle(TOwnerDrawComboStyle Value); + HIDESBASE MESSAGE void __fastcall CMFontChanged(Messages::TMessage &Message); + HIDESBASE MESSAGE void __fastcall CMRecreateWnd(Messages::TMessage &Message); + +protected: + virtual void __fastcall CreateParams(Controls::TCreateParams &Params); + virtual void __fastcall CreateWnd(void); + void __fastcall ResetItemHeight(void); + virtual int __fastcall MinItemHeight(void); + __property TOwnerDrawComboStyle Style = {read=FStyle, write=SetComboStyle, default=2}; + +public: + __fastcall virtual TOwnerDrawComboBox(Classes::TComponent* AOwner); +public: + #pragma option push -w-inl + /* TCustomComboBox.Destroy */ inline __fastcall virtual ~TOwnerDrawComboBox(void) { } + #pragma option pop + +public: + #pragma option push -w-inl + /* TWinControl.CreateParented */ inline __fastcall TOwnerDrawComboBox(HWND ParentWindow) : Stdctrls::TCustomComboBox( + ParentWindow) { } + #pragma option pop + +}; + + +#pragma option push -b- +enum TColorComboOption { coIncludeDefault, coIncludeNone }; +#pragma option pop + +typedef Set<TColorComboOption, coIncludeDefault, coIncludeNone> TColorComboOptions; + +class DELPHICLASS TColorComboBox; +class PASCALIMPLEMENTATION TColorComboBox : public TOwnerDrawComboBox +{ + typedef TOwnerDrawComboBox inherited; + +private: + Graphics::TColor FColorValue; + bool FDisplayNames; + Classes::TStrings* FColorNames; + TColorComboOptions FOptions; + Classes::TNotifyEvent FOnChange; + Graphics::TColor __fastcall GetColorValue(void); + void __fastcall SetColorValue(Graphics::TColor NewValue); + void __fastcall SetDisplayNames(bool Value); + void __fastcall SetColorNames(Classes::TStrings* Value); + void __fastcall SetOptions(TColorComboOptions Value); + void __fastcall ColorNamesChanged(System::TObject* Sender); + +protected: + virtual void __fastcall CreateWnd(void); + virtual void __fastcall DrawItem(int Index, const Windows::TRect &Rect, Windows::TOwnerDrawState State + ); + DYNAMIC void __fastcall Click(void); + DYNAMIC void __fastcall Change(void); + virtual void __fastcall PopulateList(void); + DYNAMIC void __fastcall DoChange(void); + +public: + __fastcall virtual TColorComboBox(Classes::TComponent* AOwner); + __fastcall virtual ~TColorComboBox(void); + __property Text ; + +__published: + __property Graphics::TColor ColorValue = {read=GetColorValue, write=SetColorValue, default=0}; + __property Classes::TStrings* ColorNames = {read=FColorNames, write=SetColorNames}; + __property bool DisplayNames = {read=FDisplayNames, write=SetDisplayNames, default=1}; + __property TColorComboOptions Options = {read=FOptions, write=SetOptions, default=0}; + __property Color ; + __property Ctl3D ; + __property DragMode ; + __property DragCursor ; + __property Enabled ; + __property Font ; + __property Anchors ; + __property BiDiMode ; + __property Constraints ; + __property DragKind ; + __property ParentBiDiMode ; + __property ImeMode ; + __property ImeName ; + __property ParentColor ; + __property ParentCtl3D ; + __property ParentFont ; + __property ParentShowHint ; + __property PopupMenu ; + __property ShowHint ; + __property Style ; + __property TabOrder ; + __property TabStop ; + __property Visible ; + __property Classes::TNotifyEvent OnChange = {read=FOnChange, write=FOnChange}; + __property OnClick ; + __property OnDblClick ; + __property OnDragDrop ; + __property OnDragOver ; + __property OnDropDown ; + __property OnEndDrag ; + __property OnEnter ; + __property OnExit ; + __property OnKeyDown ; + __property OnKeyPress ; + __property OnKeyUp ; + __property OnStartDrag ; + __property OnContextPopup ; + __property OnEndDock ; + __property OnStartDock ; +public: + #pragma option push -w-inl + /* TWinControl.CreateParented */ inline __fastcall TColorComboBox(HWND ParentWindow) : TOwnerDrawComboBox( + ParentWindow) { } + #pragma option pop + +}; + + +#pragma option push -b- +enum TFontDevice { fdScreen, fdPrinter, fdBoth }; +#pragma option pop + +#pragma option push -b- +enum TFontListOption { foAnsiOnly, foTrueTypeOnly, foFixedPitchOnly, foNoOEMFonts, foOEMFontsOnly, foScalableOnly, + foNoSymbolFonts }; +#pragma option pop + +typedef Set<TFontListOption, foAnsiOnly, foNoSymbolFonts> TFontListOptions; + +class DELPHICLASS TFontComboBox; +class PASCALIMPLEMENTATION TFontComboBox : public TOwnerDrawComboBox +{ + typedef TOwnerDrawComboBox inherited; + +private: + Graphics::TBitmap* FTrueTypeBMP; + Graphics::TBitmap* FDeviceBMP; + Classes::TNotifyEvent FOnChange; + TFontDevice FDevice; + bool FUpdate; + bool FUseFonts; + TFontListOptions FOptions; + void __fastcall SetFontName(const AnsiString NewFontName); + AnsiString __fastcall GetFontName(); + bool __fastcall GetTrueTypeOnly(void); + void __fastcall SetDevice(TFontDevice Value); + void __fastcall SetOptions(TFontListOptions Value); + void __fastcall SetTrueTypeOnly(bool Value); + void __fastcall SetUseFonts(bool Value); + void __fastcall Reset(void); + HIDESBASE MESSAGE void __fastcall WMFontChange(Messages::TMessage &Message); + +protected: + virtual void __fastcall PopulateList(void); + DYNAMIC void __fastcall Change(void); + DYNAMIC void __fastcall Click(void); + DYNAMIC void __fastcall DoChange(void); + virtual void __fastcall CreateWnd(void); + virtual void __fastcall DrawItem(int Index, const Windows::TRect &Rect, Windows::TOwnerDrawState State + ); + virtual int __fastcall MinItemHeight(void); + +public: + __fastcall virtual TFontComboBox(Classes::TComponent* AOwner); + __fastcall virtual ~TFontComboBox(void); + __property Text ; + +__published: + __property TFontDevice Device = {read=FDevice, write=SetDevice, default=0}; + __property AnsiString FontName = {read=GetFontName, write=SetFontName}; + __property TFontListOptions Options = {read=FOptions, write=SetOptions, default=0}; + __property bool TrueTypeOnly = {read=GetTrueTypeOnly, write=SetTrueTypeOnly, stored=false, nodefault + }; + __property bool UseFonts = {read=FUseFonts, write=SetUseFonts, default=0}; + __property Color ; + __property Ctl3D ; + __property DragMode ; + __property DragCursor ; + __property Enabled ; + __property Font ; + __property Anchors ; + __property BiDiMode ; + __property Constraints ; + __property DragKind ; + __property ParentBiDiMode ; + __property ImeMode ; + __property ImeName ; + __property ParentColor ; + __property ParentCtl3D ; + __property ParentFont ; + __property ParentShowHint ; + __property PopupMenu ; + __property ShowHint ; + __property Style ; + __property TabOrder ; + __property TabStop ; + __property Visible ; + __property Classes::TNotifyEvent OnChange = {read=FOnChange, write=FOnChange}; + __property OnClick ; + __property OnDblClick ; + __property OnDragDrop ; + __property OnDragOver ; + __property OnDropDown ; + __property OnEndDrag ; + __property OnEnter ; + __property OnExit ; + __property OnKeyDown ; + __property OnKeyPress ; + __property OnKeyUp ; + __property OnStartDrag ; + __property OnContextPopup ; + __property OnEndDock ; + __property OnStartDock ; +public: + #pragma option push -w-inl + /* TWinControl.CreateParented */ inline __fastcall TFontComboBox(HWND ParentWindow) : TOwnerDrawComboBox( + ParentWindow) { } + #pragma option pop + +}; + + +//-- var, const, procedure --------------------------------------------------- + +} /* namespace Rxcombos */ +#if !defined(NO_IMPLICIT_NAMESPACE_USE) +using namespace Rxcombos; +#endif +#pragma option pop // -w- +#pragma option pop // -Vx + +#pragma delphiheader end. +//-- end unit ---------------------------------------------------------------- +#endif // RxCombos |