david
2e21f1b77a
git-svn-id: https://192.168.0.254/svn/Componentes.Terceros.TntUnicodeControls@3 efe25200-c253-4202-ad9d-beff95d3544d
133 lines
5.3 KiB
ObjectPascal
133 lines
5.3 KiB
ObjectPascal
|
|
{*****************************************************************************}
|
|
{ }
|
|
{ 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.
|