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