*** empty log message ***

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