📄 elv_reg.pas
字号:
{$I DFS.INC}
unit ELV_Reg;
interface
procedure Register;
implementation
uses
{$IFDEF DFS_NO_DSGNINTF}
DesignIntf,
DesignEditors,
{$ELSE}
DsgnIntf,
{$ENDIF}
Classes, DFSAbout, EnhListView,
{$IFDEF DFS_COMPILER_2}
ExtColEd,
{$ENDIF}
ExtListView;
procedure Register;
begin
RegisterComponents('DFS', [TdfsEnhListView]);
RegisterPropertyEditor(TypeInfo(TdfsEnhLVSaveSettings), NIL, '', TClassProperty);
RegisterComponents('DFS', [TdfsExtListView]);
RegisterPropertyEditor(TypeInfo(TdfsExtLVSaveSettings), NIL, '', TClassProperty);
{$IFDEF DFS_COMPILER_2}
RegisterPropertyEditor(TypeInfo(TdfsExtListColumns), NIL, '',
TdfsExtListColumnsProperty);
{$ENDIF}
RegisterPropertyEditor(TypeInfo(string), TCustomEnhListView, 'Version',
TDFSVersionProperty);
end;
end.
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -