Repository navigation
Expand file tree
/
Copy pathThinkSQL.lpr
More file actions
79 lines (76 loc) · 2.4 KB
/
Copy pathThinkSQL.lpr
File metadata and controls
79 lines (76 loc) · 2.4 KB
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
program ThinkSQL;
{ ThinkSQL Relational Database Management System
Copyright © 2000-2012 Greg Gaughan
See LICENCE.txt for details
}
{$I Defs.inc}
{.$I Optional.use} // this include must be at the top of the uses clause bellow. Adding and removing files from the project deletes it.
uses
{$I Optional.use}
uPage in 'uPage.pas',
uGlobal in 'uGlobal.pas',
uDatabase in 'uDatabase.pas',
uServer in 'uServer.pas',
uBuffer in 'uBuffer.pas',
uHeapFile in 'uHeapFile.pas',
uTuple in 'uTuple.pas',
uRelation in 'uRelation.pas',
uFile in 'uFile.pas',
uTransaction in 'uTransaction.pas',
uParser in 'uParser.pas',
uSyntax in 'uSyntax.pas',
uProcessor in 'uProcessor.pas',
uAlgebra in 'uAlgebra.pas',
uIterator in 'uIterator.pas',
uOptimiser in 'uOptimiser.pas',
uIterProject in 'uIterProject.pas',
uIterSelect in 'uIterSelect.pas',
uIterJoinNestedLoop in 'uIterJoinNestedLoop.pas',
uIterRelation in 'uIterRelation.pas',
uEvalCondExpr in 'uEvalCondExpr.pas',
uCondToCNF in 'uCondToCNF.pas',
uIterGroup in 'uIterGroup.pas',
uIterMaterialise in 'uIterMaterialise.pas',
uIterSyntaxRelation in 'uIterSyntaxRelation.pas',
uIterInsert in 'uIterInsert.pas',
uIterSort in 'uIterSort.pas',
uIterJoinMerge in 'uIterJoinMerge.pas',
uIterDelete in 'uIterDelete.pas',
uGlobalDef in 'uGlobalDef.pas',
uMain in 'uMain.pas',
uConnectionMgr in 'uConnectionMgr.pas',
uIterUpdate in 'uIterUpdate.pas',
uCLIserver in 'uCLIserver.pas',
uStmt in 'uStmt.pas',
uConstraint in 'uConstraint.pas',
uIndexFile in 'uIndexFile.pas',
uHashIndexFile in 'uHashIndexFile.pas',
uGarbage in 'uGarbage.pas',
uVirtualFile in 'uVirtualFile.pas',
uIterSet in 'uIterSet.pas',
uIterJoin in 'uIterJoin.pas',
uOS in 'uOS.pas',
uIterStmt in 'uIterStmt.pas',
uRoutine in 'uRoutine.pas',
uVariableSet in 'uVariableSet.pas',
uIterInto in 'uIterInto.pas',
uTempTape in 'uTempTape.pas',
uDatabaseMaint in 'uDatabaseMaint.pas',
uMarshalGlobal in '..\Odbc\uMarshalGlobal.pas',
uMarshal in '..\Odbc\uMarshal.pas',
uEvsHelpers in 'uEvsHelpers.pas';
{.$IFDEF WINDOWS}
{$R *.RES}
{$R version.RES}
{.$ENDIF}
begin
{.$IFDEF WINDOWS}
{$IFDEF USE_APPLICATION}
Application.Initialize; //note: only needed for OLE automation?
Application.Title := 'ThinkSQL';
Application.Run; //start Window message processing loop
{$ELSE}
uMain.main;
{$ENDIF}
{.$ENDIF}
end.