{*****************************************************************************} { } { Tnt Delphi Unicode Controls } { http://www.tntware.com/delphicontrols/unicode/ } { Version: 2.3.0 } { } { Copyright (c) 2002-2007, Troy Wolbrink (troy.wolbrink@tntware.com) } { } {*****************************************************************************} unit TntUnicodeVcl_Register; {$INCLUDE ..\Source\TntCompilers.inc} interface { TODO: Install program (handle Std, Prof, Ent versions) (ie. no database stuff for personal edition) } { TODO: $IFDEF DelphiPersonalEdition } procedure Register; implementation uses Classes, DB, TntForms, TntMenus, TntStdCtrls, TntCheckLst, TntGrids, TntExtCtrls, TntComCtrls, TntButtons, TntDB, TntDBCtrls, TntDBGrids, TntActnList, TntDialogs, TntExtDlgs, DesignIntf; 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 {$IFDEF COMPILER_9_UP} // ForceDemandLoadState(dlDisable); {$ENDIF} // ------- 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]); RegisterComponents(TNT_WIN32, [TTntToolBar]); { -- 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); RegisterClass(TTntToolButton); end; end.