50 lines
1.2 KiB
ObjectPascal
50 lines
1.2 KiB
ObjectPascal
{
|
|
* HelpEgs.dpr
|
|
*
|
|
* Project file for Version Information Component HelpEgs demo program.
|
|
*
|
|
* $Rev: 1119 $
|
|
* $Date: 2013-01-14 00:39:57 +0000 (Mon, 14 Jan 2013) $
|
|
*
|
|
* Any copyright in this file is dedicated to the Public Domain.
|
|
* http://creativecommons.org/publicdomain/zero/1.0/
|
|
}
|
|
|
|
program HelpEgs;
|
|
|
|
{$UNDEF Supports_RTLNameSpaces}
|
|
{$IFDEF CONDITIONALEXPRESSIONS}
|
|
{$IF CompilerVersion >= 15.0} // >= Delphi 7
|
|
{$WARN UNSAFE_CODE OFF}
|
|
{$IFEND}
|
|
{$IF CompilerVersion >= 23.0} // Delphi XE2
|
|
{$DEFINE Supports_RTLNameSpaces}
|
|
{$IFEND}
|
|
{$ENDIF}
|
|
|
|
uses
|
|
{$IFDEF Supports_RTLNameSpaces}
|
|
Vcl.Forms,
|
|
{$ELSE}
|
|
Forms,
|
|
{$ENDIF}
|
|
FmMain in 'FmMain.pas' {MainForm},
|
|
FmEg1 in 'FmEg1.pas' {EgForm1},
|
|
FmEg2 in 'FmEg2.pas' {EgForm2},
|
|
FmEg3 in 'FmEg3.pas' {EgForm3},
|
|
FmEg4 in 'FmEg4.pas' {EgForm4};
|
|
|
|
{$R *.RES}
|
|
{$R MultiVer.res}
|
|
|
|
begin
|
|
Application.Title := 'TPJVersionInfo Help Examples';
|
|
Application.Initialize;
|
|
Application.CreateForm(TMainForm, MainForm);
|
|
Application.CreateForm(TEgForm1, EgForm1);
|
|
Application.CreateForm(TEgForm2, EgForm2);
|
|
Application.CreateForm(TEgForm3, EgForm3);
|
|
Application.CreateForm(TEgForm4, EgForm4);
|
|
Application.Run;
|
|
end.
|