home *** CD-ROM | disk | FTP | other *** search
/ Chip 2002 March / Chip_2002-03_cd1.bin / zkuste / delphi / kolekce / d123456 / SIMONS.ZIP / Units / SimonReg.pas < prev    next >
Encoding:
Pascal/Delphi Source File  |  2001-12-16  |  1.1 KB  |  35 lines
  1. unit Simonreg;
  2.  
  3. interface
  4.  
  5. {$I SRDefine.inc}
  6.  
  7. procedure Register;
  8.  
  9. implementation
  10.  
  11. uses Classes, EnhEdit, IniList, OvalBtn, RackCtls, SRCal, SRChkBox,
  12.      SRColBtn, SRGrad, SRLabel, SRValEdt, SRWave
  13.      {$IFDEF SR_Delphi2_Up}, SRClock{$ENDIF}
  14.      {$IFDEF SR_Delphi3_Up}, SRDlgs{$ENDIF};
  15.  
  16. procedure Register;
  17. begin
  18.   RegisterComponents('Simon', [TButtonPanel, TScrewPanel, TLEDButton, TOvalButton, TSRColorButton,
  19.                                TSRCheckBox, TEnhancedCheckbox,
  20.                                TEnhancedEdit, TLEDDisplay, TSRLabel,
  21.                                TNumericEdit, TSliderEdit, TSRValueEdit,
  22.                                TLEDMeter, TSRCalendar, TSRGradient,
  23.                                TSRWavePlayer, TIniList]);
  24.   {$IFDEF SR_Delphi2_Up}
  25.   RegisterComponents('Simon', [TSRClock]);
  26.   {$ENDIF}
  27.   {$IFDEF SR_Delphi3_Up}
  28.   RegisterComponents('Simon', [TCSVOpenDialog, TCSVSaveDialog,
  29.                                TExtOpenDialog, TExtSaveDialog,
  30.                                TSliderOpenDialog, TSliderSaveDialog]);
  31.   {$ENDIF}
  32. end;
  33.  
  34. end.
  35.