1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
|
{*****************************************************************************}
{ }
{ Tnt Delphi Unicode Controls }
{ http://tnt.ccci.org/delphi_unicode_controls/ }
{ Version: 2.1.11 }
{ }
{ Copyright (c) 2002-2004, Troy Wolbrink (troy.wolbrink@ccci.org) }
{ }
{*****************************************************************************}
unit TntUnicodeVcl_Register;
{$INCLUDE ..\TntCompilers.inc}
interface
procedure Register;
implementation
uses
Classes, DB, TntForms, TntMenus, TntStdCtrls, TntCheckLst, TntGrids, TntExtCtrls, TntComCtrls,
TntButtons, TntDB, TntDBCtrls, TntDBGrids, TntActnList, TntDialogs, TntExtDlgs;
const
TNT_STANDARD = 'Tnt Standard';
TNT_ADDITIONAL = 'Tnt Additional';
TNT_WIN32 = 'Tnt Win32';
TNT_DATA_CONTROLS = 'Tnt Data Controls';
TNT_DIALOGS = 'Tnt Dialogs';
procedure Register;
begin
// ------- Standard -------
RegisterComponents(TNT_STANDARD, [TTntMainMenu]);
RegisterComponents(TNT_STANDARD, [TTntPopupMenu]);
RegisterComponents(TNT_STANDARD, [TTntLabel]);
RegisterComponents(TNT_STANDARD, [TTntEdit]);
RegisterComponents(TNT_STANDARD, [TTntMemo]);
RegisterComponents(TNT_STANDARD, [TTntButton]);
RegisterComponents(TNT_STANDARD, [TTntCheckBox]);
RegisterComponents(TNT_STANDARD, [TTntRadioButton]);
RegisterComponents(TNT_STANDARD, [TTntListBox]);
RegisterComponents(TNT_STANDARD, [TTntComboBox]);
RegisterComponents(TNT_STANDARD, [TTntScrollBar]);
RegisterComponents(TNT_STANDARD, [TTntGroupBox]);
RegisterComponents(TNT_STANDARD, [TTntRadioGroup]);
RegisterComponents(TNT_STANDARD, [TTntPanel]);
RegisterComponents(TNT_STANDARD, [TTntActionList]);
// ------- Additional -------
RegisterComponents(TNT_ADDITIONAL, [TTntBitBtn]);
RegisterComponents(TNT_ADDITIONAL, [TTntSpeedButton]);
{ -- TTntMaskEdit goes here -- }
RegisterComponents(TNT_ADDITIONAL, [TTntStringGrid]);
RegisterComponents(TNT_ADDITIONAL, [TTntDrawGrid]);
RegisterComponents(TNT_ADDITIONAL, [TTntImage]);
RegisterComponents(TNT_ADDITIONAL, [TTntShape]);
RegisterComponents(TNT_ADDITIONAL, [TTntBevel]);
RegisterComponents(TNT_ADDITIONAL, [TTntScrollBox]);
RegisterComponents(TNT_ADDITIONAL, [TTntCheckListBox]);
RegisterComponents(TNT_ADDITIONAL, [TTntSplitter]);
RegisterComponents(TNT_ADDITIONAL, [TTntStaticText]);
RegisterComponents(TNT_ADDITIONAL, [TTntControlBar]);
// ------- Win32 -------
RegisterComponents(TNT_WIN32, [TTntTabControl]);
RegisterComponents(TNT_WIN32, [TTntPageControl]);
RegisterComponents(TNT_WIN32, [TTntRichEdit]);
RegisterComponents(TNT_WIN32, [TTntTrackBar]);
RegisterComponents(TNT_WIN32, [TTntProgressBar]);
RegisterComponents(TNT_WIN32, [TTntUpDown]);
{ -- TTntHotKey goes here -- }
{ -- TTntAnimate goes here -- }
RegisterComponents(TNT_WIN32, [TTntDateTimePicker]);
RegisterComponents(TNT_WIN32, [TTntMonthCalendar]);
RegisterComponents(TNT_WIN32, [TTntTreeView]);
RegisterComponents(TNT_WIN32, [TTntListView]);
{ -- TTntHeader goes here -- }
RegisterComponents(TNT_WIN32, [TTntStatusBar]);
{ -- TTntToolBar goes here -- }
{ -- TTntCoolBar goes here -- }
RegisterComponents(TNT_WIN32, [TTntPageScroller]);
{ -- TTntComboBoxEx goes here -- }
// ------- System -------
RegisterComponents(TNT_ADDITIONAL, [TTntPaintBox]);
{ -- TTntMediaPlayer goes here -- }
{ -- TTntOleContainer goes here -- }
// ------- Data Controls -------
RegisterComponents(TNT_DATA_CONTROLS, [TTntDBGrid]);
{ -- TTntDBNavigator goes here -- }
RegisterComponents(TNT_DATA_CONTROLS, [TTntDBText]);
RegisterComponents(TNT_DATA_CONTROLS, [TTntDBEdit]);
RegisterComponents(TNT_DATA_CONTROLS, [TTntDBMemo]);
{ -- TTntDBImage goes here -- }
{ -- TTntDBListBox goes here -- }
RegisterComponents(TNT_DATA_CONTROLS, [TTntDBComboBox]);
RegisterComponents(TNT_DATA_CONTROLS, [TTntDBCheckBox]);
RegisterComponents(TNT_DATA_CONTROLS, [TTntDBRadioGroup]);
{ -- TTntDBLookupListBox goes here -- }
{ -- TTntDBLookupComboBox goes here -- }
RegisterComponents(TNT_DATA_CONTROLS, [TTntDBRichEdit]);
{ -- TTntDBCtrlGrid here -- }
{ -- TTntDBLookupListBox goes here -- }
{ -- TTntDBChart goes here -- }
// ------- Dialogs -------
RegisterComponents(TNT_DIALOGS, [TTntOpenDialog]);
RegisterComponents(TNT_DIALOGS, [TTntSaveDialog]);
RegisterComponents(TNT_DIALOGS, [TTntOpenPictureDialog]);
RegisterComponents(TNT_DIALOGS, [TTntSavePictureDialog]);
// --------- Fields --------------
RegisterTntFields;
// --------- Classes --------------
RegisterClass(TTntMenuItem);
RegisterClass(TTntTabSheet);
end;
end.
|
