23 lines
378 B
ObjectPascal
23 lines
378 B
ObjectPascal
|
program FRDemo;
|
||
|
|
|
||
|
|
{$I frx.inc}
|
||
|
|
|
||
|
|
uses
|
||
|
|
Forms,
|
||
|
|
Unit1 in 'Unit1.pas' {Form1},
|
||
|
|
Unit2 in 'Unit2.pas' {ReportData: TDataModule};
|
||
|
|
|
||
|
|
{$R *.RES}
|
||
|
|
|
||
|
|
begin
|
||
|
|
{$IfDef Delphi10}
|
||
|
|
{$IfDef DEBUG}
|
||
|
|
ReportMemoryLeaksOnShutdown := True;
|
||
|
|
{$EndIf}
|
||
|
|
{$EndIf}
|
||
|
|
Application.Initialize;
|
||
|
|
Application.CreateForm(TForm1, Form1);
|
||
|
|
Application.CreateForm(TReportData, ReportData);
|
||
|
|
Application.Run;
|
||
|
|
end.
|