// 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 // Pascal unit #include // Pascal unit #include // Pascal unit #include // Pascal unit #include // Pascal unit #include // Pascal unit #include // Pascal unit #include // Pascal unit #include // Pascal unit #include // Pascal unit #include // Pascal unit #include // 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 _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