diff options
Diffstat (limited to 'apps/windoze/CBuilder5/BibleCS/TntUnicodeControls/TntStdCtrls.hpp')
| -rw-r--r-- | apps/windoze/CBuilder5/BibleCS/TntUnicodeControls/TntStdCtrls.hpp | 575 |
1 files changed, 575 insertions, 0 deletions
diff --git a/apps/windoze/CBuilder5/BibleCS/TntUnicodeControls/TntStdCtrls.hpp b/apps/windoze/CBuilder5/BibleCS/TntUnicodeControls/TntStdCtrls.hpp new file mode 100644 index 0000000..09a434c --- /dev/null +++ b/apps/windoze/CBuilder5/BibleCS/TntUnicodeControls/TntStdCtrls.hpp @@ -0,0 +1,575 @@ +// Borland C++ Builder +// Copyright (c) 1995, 1999 by Borland International +// All rights reserved + +// (DO NOT EDIT: machine generated header) 'TntStdCtrls.pas' rev: 5.00 + +#ifndef TntStdCtrlsHPP +#define TntStdCtrlsHPP + +#pragma delphiheader begin +#pragma option push -w- +#pragma option push -Vx +#include <Menus.hpp> // Pascal unit +#include <Graphics.hpp> // Pascal unit +#include <Forms.hpp> // Pascal unit +#include <Unicode.hpp> // Pascal unit +#include <CheckLst.hpp> // Pascal unit +#include <StdCtrls.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 Tntstdctrls +{ +//-- type declarations ------------------------------------------------------- +typedef void __fastcall (__closure *TWideKeyPressEvent)(System::TObject* Sender, wchar_t &Key); + +class DELPHICLASS TTntCustomEdit; +class PASCALIMPLEMENTATION TTntCustomEdit : public Stdctrls::TCustomEdit +{ + typedef Stdctrls::TCustomEdit inherited; + +private: + HIDESBASE WideString __fastcall GetSelText(); + HIDESBASE void __fastcall SetSelText(const WideString Value); + HIDESBASE WideString __fastcall GetText(); + HIDESBASE void __fastcall SetText(const WideString Value); + +protected: + virtual void __fastcall CreateWindowHandle(const Controls::TCreateParams &Params); + +public: + __property WideString SelText = {read=GetSelText, write=SetSelText}; + __property WideString Text = {read=GetText, write=SetText}; +public: + #pragma option push -w-inl + /* TCustomEdit.Create */ inline __fastcall virtual TTntCustomEdit(Classes::TComponent* AOwner) : Stdctrls::TCustomEdit( + AOwner) { } + #pragma option pop + +public: + #pragma option push -w-inl + /* TWinControl.CreateParented */ inline __fastcall TTntCustomEdit(HWND ParentWindow) : Stdctrls::TCustomEdit( + ParentWindow) { } + #pragma option pop + #pragma option push -w-inl + /* TWinControl.Destroy */ inline __fastcall virtual ~TTntCustomEdit(void) { } + #pragma option pop + +}; + + +class DELPHICLASS TTntEdit; +class PASCALIMPLEMENTATION TTntEdit : public TTntCustomEdit +{ + typedef TTntCustomEdit inherited; + +__published: + __property Anchors ; + __property AutoSelect ; + __property AutoSize ; + __property BiDiMode ; + __property BorderStyle ; + __property CharCase ; + __property Color ; + __property Constraints ; + __property Ctl3D ; + __property DragCursor ; + __property DragKind ; + __property DragMode ; + __property Enabled ; + __property Font ; + __property HideSelection ; + __property ImeMode ; + __property ImeName ; + __property MaxLength ; + __property OEMConvert ; + __property ParentBiDiMode ; + __property ParentColor ; + __property ParentCtl3D ; + __property ParentFont ; + __property ParentShowHint ; + __property PasswordChar ; + __property PopupMenu ; + __property ReadOnly ; + __property ShowHint ; + __property TabOrder ; + __property TabStop ; + __property Text ; + __property Visible ; + __property OnChange ; + __property OnClick ; + __property OnContextPopup ; + __property OnDblClick ; + __property OnDragDrop ; + __property OnDragOver ; + __property OnEndDock ; + __property OnEndDrag ; + __property OnEnter ; + __property OnExit ; + __property OnKeyDown ; + __property OnKeyPress ; + __property OnKeyUp ; + __property OnMouseDown ; + __property OnMouseMove ; + __property OnMouseUp ; + __property OnStartDock ; + __property OnStartDrag ; +public: + #pragma option push -w-inl + /* TCustomEdit.Create */ inline __fastcall virtual TTntEdit(Classes::TComponent* AOwner) : TTntCustomEdit( + AOwner) { } + #pragma option pop + +public: + #pragma option push -w-inl + /* TWinControl.CreateParented */ inline __fastcall TTntEdit(HWND ParentWindow) : TTntCustomEdit(ParentWindow + ) { } + #pragma option pop + #pragma option push -w-inl + /* TWinControl.Destroy */ inline __fastcall virtual ~TTntEdit(void) { } + #pragma option pop + +}; + + +class DELPHICLASS TTntCustomMemo; +class PASCALIMPLEMENTATION TTntCustomMemo : public Stdctrls::TCustomMemo +{ + typedef Stdctrls::TCustomMemo inherited; + +private: + Unicode::TWideStrings* FLines; + HIDESBASE void __fastcall SetLines(const Unicode::TWideStrings* Value); + HIDESBASE WideString __fastcall GetSelText(); + HIDESBASE void __fastcall SetSelText(const WideString Value); + HIDESBASE WideString __fastcall GetText(); + HIDESBASE void __fastcall SetText(const WideString Value); + +protected: + virtual void __fastcall CreateWindowHandle(const Controls::TCreateParams &Params); + +public: + __fastcall virtual TTntCustomMemo(Classes::TComponent* AOwner); + __fastcall virtual ~TTntCustomMemo(void); + __property WideString SelText = {read=GetSelText, write=SetSelText}; + __property WideString Text = {read=GetText, write=SetText}; + __property Unicode::TWideStrings* Lines = {read=FLines, write=SetLines}; +public: + #pragma option push -w-inl + /* TWinControl.CreateParented */ inline __fastcall TTntCustomMemo(HWND ParentWindow) : Stdctrls::TCustomMemo( + ParentWindow) { } + #pragma option pop + +}; + + +class DELPHICLASS TTntMemo; +class PASCALIMPLEMENTATION TTntMemo : public TTntCustomMemo +{ + typedef TTntCustomMemo inherited; + +__published: + __property Align ; + __property Alignment ; + __property Anchors ; + __property BiDiMode ; + __property BorderStyle ; + __property Color ; + __property Constraints ; + __property Ctl3D ; + __property DragCursor ; + __property DragKind ; + __property DragMode ; + __property Enabled ; + __property Font ; + __property HideSelection ; + __property ImeMode ; + __property ImeName ; + __property Lines ; + __property MaxLength ; + __property OEMConvert ; + __property ParentBiDiMode ; + __property ParentColor ; + __property ParentCtl3D ; + __property ParentFont ; + __property ParentShowHint ; + __property PopupMenu ; + __property ReadOnly ; + __property ScrollBars ; + __property ShowHint ; + __property TabOrder ; + __property TabStop ; + __property Visible ; + __property WantReturns ; + __property WantTabs ; + __property WordWrap ; + __property OnChange ; + __property OnClick ; + __property OnContextPopup ; + __property OnDblClick ; + __property OnDragDrop ; + __property OnDragOver ; + __property OnEndDock ; + __property OnEndDrag ; + __property OnEnter ; + __property OnExit ; + __property OnKeyDown ; + __property OnKeyPress ; + __property OnKeyUp ; + __property OnMouseDown ; + __property OnMouseMove ; + __property OnMouseUp ; + __property OnStartDock ; + __property OnStartDrag ; +public: + #pragma option push -w-inl + /* TTntCustomMemo.Create */ inline __fastcall virtual TTntMemo(Classes::TComponent* AOwner) : TTntCustomMemo( + AOwner) { } + #pragma option pop + #pragma option push -w-inl + /* TTntCustomMemo.Destroy */ inline __fastcall virtual ~TTntMemo(void) { } + #pragma option pop + +public: + #pragma option push -w-inl + /* TWinControl.CreateParented */ inline __fastcall TTntMemo(HWND ParentWindow) : TTntCustomMemo(ParentWindow + ) { } + #pragma option pop + +}; + + +class DELPHICLASS TTntComboBoxStrings; +class PASCALIMPLEMENTATION TTntComboBoxStrings : public Unicode::TWideStrings +{ + typedef Unicode::TWideStrings inherited; + +protected: + virtual WideString __fastcall Get(int Index); + virtual int __fastcall GetCount(void); + virtual System::TObject* __fastcall GetObject(int Index); + virtual void __fastcall PutObject(int Index, System::TObject* AObject); + virtual void __fastcall SetUpdateState(bool Updating); + +public: + Stdctrls::TCustomComboBox* ComboBox; + virtual int __fastcall Add(const WideString S); + virtual void __fastcall Clear(void); + virtual void __fastcall Delete(int Index); + virtual int __fastcall IndexOf(const WideString S); + virtual void __fastcall Insert(int Index, const WideString S); +public: + #pragma option push -w-inl + /* TWideStrings.Create */ inline __fastcall TTntComboBoxStrings(void) : Unicode::TWideStrings() { } + + #pragma option pop + #pragma option push -w-inl + /* TWideStrings.Destroy */ inline __fastcall virtual ~TTntComboBoxStrings(void) { } + #pragma option pop + +}; + + +__interface ITntComboBox; +typedef System::DelphiInterface<ITntComboBox> _di_ITntComboBox; +__interface ITntComboBox : public IUnknown +{ + +public: + virtual Unicode::TWideStrings* __fastcall GetItems(void) = 0 ; + virtual void __fastcall SetItems(const Unicode::TWideStrings* Value) = 0 ; + virtual int __fastcall GetSelLength(void) = 0 ; + virtual int __fastcall GetSelStart(void) = 0 ; + virtual WideString __fastcall GetSelText(void) = 0 ; + virtual void __fastcall SetSelLength(int Value) = 0 ; + virtual void __fastcall SetSelStart(int Value) = 0 ; + virtual void __fastcall SetSelText(const WideString Value) = 0 ; + virtual WideString __fastcall GetText(void) = 0 ; + virtual void __fastcall SetText(const WideString Value) = 0 ; + virtual int __fastcall GetItemIndex(void) = 0 ; + virtual void __fastcall SetItemIndex(const int Value) = 0 ; + __property int SelLength = {read=GetSelLength, write=SetSelLength}; + __property int SelStart = {read=GetSelStart, write=SetSelStart}; + __property WideString SelText = {read=GetSelText, write=SetSelText}; + __property WideString Text = {read=GetText, write=SetText}; + __property Unicode::TWideStrings* Items = {read=GetItems, write=SetItems}; + __property int ItemIndex = {read=GetItemIndex, write=SetItemIndex}; +}; + +class DELPHICLASS TTntCustomComboBox; +class PASCALIMPLEMENTATION TTntCustomComboBox : public Stdctrls::TCustomComboBox +{ + typedef Stdctrls::TCustomComboBox inherited; + +private: + Unicode::TWideStrings* FItems; + Unicode::TWideStrings* __fastcall GetItems(void); + HIDESBASE void __fastcall SetItems(const Unicode::TWideStrings* Value); + HIDESBASE int __fastcall GetSelLength(void); + HIDESBASE void __fastcall SetSelLength(int Value); + HIDESBASE int __fastcall GetSelStart(void); + HIDESBASE void __fastcall SetSelStart(int Value); + HIDESBASE WideString __fastcall GetSelText(); + HIDESBASE void __fastcall SetSelText(const WideString Value); + HIDESBASE WideString __fastcall GetText(); + HIDESBASE void __fastcall SetText(const WideString Value); + HIDESBASE int __fastcall GetItemIndex(void); + HIDESBASE void __fastcall SetItemIndex(const int Value); + HIDESBASE MESSAGE void __fastcall CNCommand(Messages::TWMCommand &Message); + +protected: + virtual void __fastcall DoEditCharMsg(Messages::TWMKey &Message); + virtual void __fastcall CreateWnd(void); + virtual void __fastcall ComboWndProc(Messages::TMessage &Message, HWND ComboWnd, void * ComboProc); + + DYNAMIC void __fastcall KeyPress(char &Key); + +public: + __fastcall virtual TTntCustomComboBox(Classes::TComponent* AOwner); + __fastcall virtual ~TTntCustomComboBox(void); + virtual void __fastcall CreateWindowHandle(const Controls::TCreateParams &Params); + __property WideString SelText = {read=GetSelText, write=SetSelText}; + __property WideString Text = {read=GetText, write=SetText}; + __property Unicode::TWideStrings* Items = {read=GetItems, write=SetItems}; +public: + #pragma option push -w-inl + /* TWinControl.CreateParented */ inline __fastcall TTntCustomComboBox(HWND ParentWindow) : Stdctrls::TCustomComboBox( + ParentWindow) { } + #pragma option pop + +private: + void *__ITntComboBox; /* Tntstdctrls::ITntComboBox */ + +public: + operator ITntComboBox*(void) { return (ITntComboBox*)&__ITntComboBox; } + +}; + + +class DELPHICLASS TTntComboBox; +class PASCALIMPLEMENTATION TTntComboBox : public TTntCustomComboBox +{ + typedef TTntCustomComboBox inherited; + +__published: + __property Style ; + __property Anchors ; + __property BiDiMode ; + __property Color ; + __property Constraints ; + __property Ctl3D ; + __property DragCursor ; + __property DragKind ; + __property DragMode ; + __property DropDownCount ; + __property Enabled ; + __property Font ; + __property ImeMode ; + __property ImeName ; + __property ItemHeight ; + __property MaxLength ; + __property ParentBiDiMode ; + __property ParentColor ; + __property ParentCtl3D ; + __property ParentFont ; + __property ParentShowHint ; + __property PopupMenu ; + __property ShowHint ; + __property Sorted ; + __property TabOrder ; + __property TabStop ; + __property Text ; + __property Visible ; + __property OnChange ; + __property OnClick ; + __property OnContextPopup ; + __property OnDblClick ; + __property OnDragDrop ; + __property OnDragOver ; + __property OnDrawItem ; + __property OnDropDown ; + __property OnEndDock ; + __property OnEndDrag ; + __property OnEnter ; + __property OnExit ; + __property OnKeyDown ; + __property OnKeyPress ; + __property OnKeyUp ; + __property OnMeasureItem ; + __property OnStartDock ; + __property OnStartDrag ; + __property Items ; +public: + #pragma option push -w-inl + /* TTntCustomComboBox.Create */ inline __fastcall virtual TTntComboBox(Classes::TComponent* AOwner) + : TTntCustomComboBox(AOwner) { } + #pragma option pop + #pragma option push -w-inl + /* TTntCustomComboBox.Destroy */ inline __fastcall virtual ~TTntComboBox(void) { } + #pragma option pop + +public: + #pragma option push -w-inl + /* TWinControl.CreateParented */ inline __fastcall TTntComboBox(HWND ParentWindow) : TTntCustomComboBox( + ParentWindow) { } + #pragma option pop + +}; + + +class DELPHICLASS TTntCustomListBox; +class PASCALIMPLEMENTATION TTntCustomListBox : public Stdctrls::TCustomListBox +{ + typedef Stdctrls::TCustomListBox inherited; + +private: + Unicode::TWideStrings* FItems; + HIDESBASE void __fastcall SetItems(const Unicode::TWideStrings* Value); + +protected: + virtual void __fastcall DrawItem(int Index, const /*Windows::*/TRect &Rect, Windows::TOwnerDrawState State + ); + +public: + __fastcall virtual TTntCustomListBox(Classes::TComponent* AOwner); + __fastcall virtual ~TTntCustomListBox(void); + virtual void __fastcall CreateWindowHandle(const Controls::TCreateParams &Params); + +__published: + __property Unicode::TWideStrings* Items = {read=FItems, write=SetItems}; +public: + #pragma option push -w-inl + /* TWinControl.CreateParented */ inline __fastcall TTntCustomListBox(HWND ParentWindow) : Stdctrls::TCustomListBox( + ParentWindow) { } + #pragma option pop + +}; + + +class DELPHICLASS TTntListBox; +class PASCALIMPLEMENTATION TTntListBox : public TTntCustomListBox +{ + typedef TTntCustomListBox inherited; + +__published: + __property Align ; + __property Anchors ; + __property BiDiMode ; + __property BorderStyle ; + __property Color ; + __property Columns ; + __property Constraints ; + __property Ctl3D ; + __property DragCursor ; + __property DragKind ; + __property DragMode ; + __property Enabled ; + __property ExtendedSelect ; + __property Font ; + __property ImeMode ; + __property ImeName ; + __property IntegralHeight ; + __property ItemHeight ; + __property Items ; + __property MultiSelect ; + __property ParentBiDiMode ; + __property ParentColor ; + __property ParentCtl3D ; + __property ParentFont ; + __property ParentShowHint ; + __property PopupMenu ; + __property ShowHint ; + __property Sorted ; + __property Style ; + __property TabOrder ; + __property TabStop ; + __property TabWidth ; + __property Visible ; + __property OnClick ; + __property OnContextPopup ; + __property OnDblClick ; + __property OnDragDrop ; + __property OnDragOver ; + __property OnDrawItem ; + __property OnEndDock ; + __property OnEndDrag ; + __property OnEnter ; + __property OnExit ; + __property OnKeyDown ; + __property OnKeyPress ; + __property OnKeyUp ; + __property OnMeasureItem ; + __property OnMouseDown ; + __property OnMouseMove ; + __property OnMouseUp ; + __property OnStartDock ; + __property OnStartDrag ; +public: + #pragma option push -w-inl + /* TTntCustomListBox.Create */ inline __fastcall virtual TTntListBox(Classes::TComponent* AOwner) : + TTntCustomListBox(AOwner) { } + #pragma option pop + #pragma option push -w-inl + /* TTntCustomListBox.Destroy */ inline __fastcall virtual ~TTntListBox(void) { } + #pragma option pop + +public: + #pragma option push -w-inl + /* TWinControl.CreateParented */ inline __fastcall TTntListBox(HWND ParentWindow) : TTntCustomListBox( + ParentWindow) { } + #pragma option pop + +}; + + +class DELPHICLASS TTntCheckListBox; +class PASCALIMPLEMENTATION TTntCheckListBox : public Checklst::TCheckListBox +{ + typedef Checklst::TCheckListBox inherited; + +private: + Unicode::TWideStrings* FItems; + HIDESBASE void __fastcall SetItems(const Unicode::TWideStrings* Value); + void __fastcall DrawItemStub(Controls::TWinControl* Control, int Index, const /*Windows::*/TRect &Rect, + Windows::TOwnerDrawState State); + +protected: + virtual void __fastcall DrawItem(int Index, const /*Windows::*/TRect &Rect, Windows::TOwnerDrawState State + ); + +public: + __fastcall virtual TTntCheckListBox(Classes::TComponent* AOwner); + __fastcall virtual ~TTntCheckListBox(void); + virtual void __fastcall CreateWindowHandle(const Controls::TCreateParams &Params); + +__published: + __property Unicode::TWideStrings* Items = {read=FItems, write=SetItems}; +public: + #pragma option push -w-inl + /* TWinControl.CreateParented */ inline __fastcall TTntCheckListBox(HWND ParentWindow) : Checklst::TCheckListBox( + ParentWindow) { } + #pragma option pop + +}; + + +//-- var, const, procedure --------------------------------------------------- +extern PACKAGE void __fastcall Register(void); + +} /* namespace Tntstdctrls */ +#if !defined(NO_IMPLICIT_NAMESPACE_USE) +using namespace Tntstdctrls; +#endif +#pragma option pop // -w- +#pragma option pop // -Vx + +#pragma delphiheader end. +//-- end unit ---------------------------------------------------------------- +#endif // TntStdCtrls |