home *** CD-ROM | disk | FTP | other *** search
/ Chip 2001 September / Chip_2001-09_cd1.bin / zkuste / delphi / kolekce / d123456 / DFS.ZIP / ELV_Reg.pas < prev    next >
Pascal/Delphi Source File  |  2001-06-27  |  843b  |  39 lines
  1. {$I DFS.INC}
  2.  
  3. unit ELV_Reg;
  4.  
  5. interface
  6.  
  7. procedure Register;
  8.  
  9. implementation
  10.  
  11. uses
  12.   {$IFDEF DFS_NO_DSGNINTF}
  13.   DesignIntf,
  14.   DesignEditors,
  15.   {$ELSE}
  16.   DsgnIntf,
  17.   {$ENDIF}
  18.   Classes, DFSAbout, EnhListView,
  19.   {$IFDEF DFS_COMPILER_2}
  20.   ExtColEd,
  21.   {$ENDIF}
  22.   ExtListView;
  23.  
  24. procedure Register;
  25. begin
  26.   RegisterComponents('DFS', [TdfsEnhListView]);
  27.   RegisterPropertyEditor(TypeInfo(TdfsEnhLVSaveSettings), NIL, '', TClassProperty);
  28.   RegisterComponents('DFS', [TdfsExtListView]);
  29.   RegisterPropertyEditor(TypeInfo(TdfsExtLVSaveSettings), NIL, '', TClassProperty);
  30. {$IFDEF DFS_COMPILER_2}
  31.   RegisterPropertyEditor(TypeInfo(TdfsExtListColumns), NIL, '',
  32.      TdfsExtListColumnsProperty);
  33. {$ENDIF}
  34.   RegisterPropertyEditor(TypeInfo(string), TCustomEnhListView, 'Version',
  35.      TDFSVersionProperty);
  36. end;
  37.  
  38. end.
  39.