source upload
This commit is contained in:
17
contrib/mORMot/SQLite3/Samples/07 - SynTest/SynTest.dpr
Normal file
17
contrib/mORMot/SQLite3/Samples/07 - SynTest/SynTest.dpr
Normal file
@@ -0,0 +1,17 @@
|
||||
program SynTest;
|
||||
|
||||
{$APPTYPE CONSOLE}
|
||||
|
||||
uses
|
||||
{$I SynDprUses.inc} // use FastMM4 on older Delphi, or set FPC threads
|
||||
SynTestTest;
|
||||
|
||||
begin
|
||||
with TTestSuit.Create do
|
||||
try
|
||||
Run;
|
||||
readln;
|
||||
finally
|
||||
Free;
|
||||
end;
|
||||
end.
|
Reference in New Issue
Block a user