ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/public/ibx/branches/udr/testsuite/testsuite.dpr
Revision: 345
Committed: Mon Aug 23 14:22:29 2021 UTC (10 months, 1 week ago) by tony
Original Path: ibx/trunk/fbintf/testsuite/testsuite.dpr
File size: 872 byte(s)
Log Message:
Merged into public release
Line User Rev File contents
1 tony 56 program testsuite;
2    
3     {$APPTYPE CONSOLE}
4    
5     {$R *.res}
6    
7     uses
8 tony 143 SysUtils,
9 tony 56 Test1 in 'Test1.pas',
10     Test3 in 'Test3.pas',
11     Test4 in 'Test4.pas',
12     Test5 in 'Test5.pas',
13     Test6 in 'Test6.pas',
14     Test7 in 'Test7.pas',
15     Test8 in 'Test8.pas',
16     Test9 in 'Test9.pas',
17     Test10 in 'Test10.pas',
18     Test11 in 'Test11.pas',
19     Test12 in 'Test12.pas',
20     Test13 in 'Test13.pas',
21     Test14 in 'Test14.pas',
22     Test15 in 'Test15.pas',
23     Test16 in 'Test16.pas',
24 tony 315 Test17 in 'Test17.pas',
25     Test18 in 'Test18.pas',
26     Test2 in 'Test2.pas',
27     TestApplication in 'testApp\TestApplication.pas',
28 tony 345 FBTestApp in 'FBTestApp.pas',
29     Test19 in 'Test19.pas',
30     Test20 in 'Test20.pas';
31 tony 56
32     var
33 tony 315 Application: TTestApplication;
34     begin
35     Application := TTestApplication.Create(nil);
36     Application.Title:='Firebird API Test Suite';
37     Application.Run;
38     Application.Free;
39 tony 56 end.