flatenrol.pas
来自「comerose_flatstyle_v4.42.9.0_d7.rar」· PAS 代码 · 共 38 行
PAS
38 行
unit FlatEnrol;
interface
{$I FlatStyle.inc}
uses Classes;
procedure Register;
implementation
uses
FlatBtns, FlatCtrls, FlatBars, FlatTabs, FlatBoxs, FlatWnd,
FlatSound, FlatPanel, FlatGrids, FlatView, FlatCtrdb, FlatCode,
FlatExcel, FlatSingle;
procedure Register;
begin
RegisterComponents ('FlatStyle Vcl', [TFlatButton, TFlatSpeedButton, TFlatRadioButton, TFlatCheckBox]);
RegisterComponents ('FlatStyle Vcl', [TFlatEdit, TFlatIPEdit, TFlatMaskEdit, TFlatInteger, TFlatFloat]);
RegisterComponents ('FlatStyle Vcl', [TFlatMemo, TFlatTreeView, TFlatListView, TFlatListBox, TFlatListBoxExt]);
RegisterComponents ('FlatStyle Vcl', [TFlatCheckListBox, TFlatCheckListExt, TFlatComboBox, TFlatColorBox]);
RegisterComponents ('FlatStyle Vcl', [TFlatBarcode, TFlatGroupBox, TFlatRadioGroup, TFlatPanel]);
RegisterComponents ('FlatStyle Vcl', [TFlatLBPanel, TFlatGauge, TFlatImage, TFlatTab]);
RegisterComponents ('FlatStyle Vcl', [TFlatDrawGrid, TFlatStringGrid, TFlatSplitter]);
RegisterComponents ('FlatStyle Vcl', [TFlatScrollBar, TFlatTitleBar, TFlatProgressBar]);
RegisterComponents ('FlatStyle Sys', [TFlatAnimWnd, TFlatSound, TFlatAnimation]);
RegisterComponents ('FlatStyle Sys', [TFlatWater, TFlatHint, TFlatExcel, TFlatSingle]);
RegisterComponents ('FlatStyle DB', [TFlatDBEdit, TFlatDBMemo, TFlatDBListBox, TFlatDBMaskEdit]);
RegisterComponents ('FlatStyle DB', [TFlatDBFloat,TFlatDBInteger, TFlatDBComboBox, TFlatDBGrid]);
end;
end.
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?