-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy pathMainModule.dfm
More file actions
142 lines (142 loc) · 2.99 KB
/
MainModule.dfm
File metadata and controls
142 lines (142 loc) · 2.99 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
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
object UniMainModule: TUniMainModule
OldCreateOrder = False
MonitoredKeys.Keys = <>
Height = 451
Width = 395
object UniConnection1: TUniConnection
ProviderName = 'MySQL'
Port = 3306
Database = 'dbapsi'
Username = 'root'
Server = 'localhost'
Connected = True
LoginPrompt = False
Left = 32
Top = 16
EncryptedPassword = 'CEFFCDFFCCFFCBFF'
end
object UniConnectDialog1: TUniConnectDialog
DatabaseLabel = 'Database'
PortLabel = 'Port'
ProviderLabel = 'Provider'
Caption = 'Connect'
UsernameLabel = 'User Name'
PasswordLabel = 'Password'
ServerLabel = 'Server'
ConnectButton = 'Connect'
CancelButton = 'Cancel'
Left = 128
Top = 16
end
object MySQLUniProvider1: TMySQLUniProvider
Left = 224
Top = 16
end
object UniPetani: TUniQuery
Connection = UniConnection1
SQL.Strings = (
'select * from tdatapetani')
Left = 32
Top = 80
end
object UniBibit: TUniQuery
Connection = UniConnection1
SQL.Strings = (
'select * from tdatabibit')
Active = True
Left = 32
Top = 136
end
object UniDBPetani: TUniDataSource
DataSet = UniPetani
Left = 96
Top = 80
end
object UniDBBibit: TUniDataSource
DataSet = UniBibit
Left = 96
Top = 136
end
object qtampil: TUniQuery
Connection = UniConnection1
Left = 296
Top = 16
end
object UniPupuk: TUniQuery
Connection = UniConnection1
SQL.Strings = (
'select * from tdatapupuk')
Active = True
Left = 32
Top = 192
end
object UniDBPupuk: TUniDataSource
DataSet = UniPupuk
Left = 96
Top = 192
end
object qrefresh: TUniQuery
Connection = UniConnection1
Left = 344
Top = 16
end
object UniTani: TUniQuery
Connection = UniConnection1
SQL.Strings = (
'select * from tdatabtani')
Active = True
Left = 224
Top = 80
end
object UniDBTani: TUniDataSource
DataSet = UniTani
Left = 288
Top = 80
end
object qbtani: TUniQuery
Connection = UniConnection1
Left = 344
Top = 80
end
object qregis: TUniQuery
Connection = UniConnection1
Left = 344
Top = 192
end
object UniRegis: TUniQuery
Connection = UniConnection1
SQL.Strings = (
'select * from tdataregis')
Active = True
Left = 224
Top = 192
end
object UniDBRegis: TUniDataSource
DataSet = UniRegis
Left = 288
Top = 192
end
object qpetani: TUniQuery
Connection = UniConnection1
Left = 152
Top = 80
end
object UniPeng: TUniQuery
Connection = UniConnection1
SQL.Strings = (
'select * from tdatapengepul')
Active = True
Left = 224
Top = 136
end
object UniDBPeng: TUniDataSource
DataSet = UniPeng
Left = 288
Top = 136
end
object qpeng: TUniQuery
Connection = UniConnection1
Left = 344
Top = 136
end
end