home *** CD-ROM | disk | FTP | other *** search
/ Chip 2002 March / Chip_2002-03_cd1.bin / zkuste / delphi / kompon / d56 / MSYSINFO.ZIP / Demos / GUI / CompInfo.dpr next >
Text File  |  2002-01-04  |  995b  |  31 lines
  1. program CompInfo;
  2.  
  3. uses
  4.   Forms,
  5.   Main in 'Main.pas' {frmMain},
  6.   ProcessProps in 'ProcessProps.pas' {propProcess: TFrame},
  7.   PropsDlg in 'PropsDlg.pas' {dlgProperties},
  8.   ServiceProps in 'ServiceProps.pas' {propService: TFrame},
  9.   CounterProps in 'CounterProps.pas' {propCounter: TFrame},
  10.   WindowProps in 'WindowProps.pas' {propWindow: TFrame},
  11.   EventLogProps in 'EventLogProps.pas' {propEventLog: TFrame},
  12.   ShareProps in 'ShareProps.pas' {propShare: TFrame},
  13.   UserProps in 'UserProps.pas' {propUser: TFrame},
  14.   GroupProps in 'GroupProps.pas' {propGroup: TFrame},
  15.   RefsDlg in 'RefsDlg.pas' {dlgRefs},
  16.   Splash in 'Splash.pas' {frmSplash},
  17.   DeviceProps in 'DeviceProps.pas' {propDevice: TFrame};
  18.  
  19. {$R *.RES}
  20.  
  21. begin
  22.   Application.Initialize;
  23.   frmSplash:=TfrmSplash.Create(Application);
  24.   frmSplash.Show;
  25.   frmSplash.Update;
  26.   Application.Title := 'Computer Information';
  27.   Application.CreateForm(TfrmMain, frmMain);
  28.   frmSplash.Free;
  29.   Application.Run;
  30. end.
  31.