xtool/contrib/mORMot/SQLite3/Samples/20 - DTO interface based se.../Project20Client.dpr

22 lines
406 B
ObjectPascal

program Project20Client;
// first line of uses clause must be {$I SynDprUses.inc}
uses
{$I SynDprUses.inc}
Forms,
{$ifdef FPC}
Interfaces,
{$endif}
Project20ClientMain in 'Project20ClientMain.pas' {Form1},
Project20Interface in 'Project20Interface.pas';
{$ifndef FPC}
{$R *.res}
{$endif}
begin
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.Run;
end.