-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathDataModuleUnit.dfm
52 lines (51 loc) · 1.69 KB
/
DataModuleUnit.dfm
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
object DataModule1: TDataModule1
OldCreateOrder = False
OnCreate = DataModuleCreate
OnDestroy = DataModuleDestroy
Left = 616
Top = 153
Height = 191
Width = 259
object MainConnection: TADOConnection
Connected = True
ConnectionString =
'Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source=.\DB\' +
'Base.mdb;Mode=Share Deny None;Jet OLEDB:System database="";Jet O' +
'LEDB:Registry Path="";Jet OLEDB:Database Password="";Jet OLEDB:E' +
'ngine Type=5;Jet OLEDB:Database Locking Mode=1;Jet OLEDB:Global ' +
'Partial Bulk Ops=2;Jet OLEDB:Global Bulk Transactions=1;Jet OLED' +
'B:New Database Password="";Jet OLEDB:Create System Database=Fals' +
'e;Jet OLEDB:Encrypt Database=False;Jet OLEDB:Don'#39't Copy Locale o' +
'n Compact=False;Jet OLEDB:Compact Without Replica Repair=False;J' +
'et OLEDB:SFP=False;'
LoginPrompt = False
Mode = cmShareDenyNone
Provider = 'Microsoft.Jet.OLEDB.4.0'
Left = 32
Top = 16
end
object MainQuery: TADOQuery
Connection = MainConnection
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'SELECT * FROM ((((t_main INNER JOIN t_ages ON t_main.age = t_age' +
's.id) INNER JOIN t_weights ON t_main.weight = t_weights.id) INNE' +
'R JOIN t_belts ON t_main.belt = t_belts.id) INNER JOIN t_cities ' +
'ON t_main.city = t_cities.id) INNER JOIN t_clubs ON t_main.club ' +
'= t_clubs.id;')
Left = 104
Top = 16
end
object MainDataSource: TDataSource
DataSet = MainQuery
Left = 176
Top = 16
end
object DBQuery: TADOQuery
Connection = MainConnection
Parameters = <>
Left = 32
Top = 72
end
end