secreg.~pas

来自「一个基于不需引擎的文件管理系统,使用了许多界面比较好的控件」· ~PAS 代码 · 共 22 行

unit SecReg;

interface

procedure Register;

implementation

uses
 classes,uSecDialogs,
 {$IFDEF  VER140} DesignEditors, DesignIntf {$ELSE}
 {$IFDEF  VER150} DesignEditors, DesignIntf {$ELSE} DsgnIntf {$ENDIF}{$ENDIF};

procedure Register;
begin
  RegisterComponents('Samples', [TSecFindDialog]);
  RegisterComponents('Samples', [TSecReplaceDialog]);
  RegisterComponents('Samples', [TFastImage]);
end;

end.