home *** CD-ROM | disk | FTP | other *** search
/ Chip 2001 October / Chip_2001-10_cd1.bin / zkuste / delphi / kompon / d123456 / CHEMPLOT.ZIP / TPlot / Demo / Normal.dpr < prev    next >
Text File  |  2001-06-26  |  404b  |  25 lines

  1. program Normal;
  2.  
  3. uses
  4. {$IFDEF WIN32}
  5.   Forms,
  6. {$ENDIF}
  7. {$IFDEF LINUX}
  8.   QForms,
  9. {$ENDIF}
  10.   Normal1 in 'Normal1.pas' {MainForm};
  11.  
  12. {$R *.res}
  13.  
  14. begin
  15.   Application.Initialize;
  16. {$IFDEF WIN32}
  17.   Application.Title := 'Normal for Windows';
  18. {$ENDIF}
  19. {$IFDEF LINUX}
  20.   Application.Title := 'Normal for Linux';
  21. {$ENDIF}
  22.   Application.CreateForm(TMainForm, MainForm);
  23.   Application.Run;
  24. end.
  25.