Develop and Download Open Source Software

Browse Subversion Repository

Contents of /Unit3.dfm

Parent Directory Parent Directory | Revision Log Revision Log


Revision 13 - (show annotations) (download)
Tue Jul 26 09:17:38 2016 UTC (7 years, 8 months ago) by yamat0jp
File size: 7455 byte(s)
だいぶ完成
1 object DataModule3: TDataModule3
2 OldCreateOrder = False
3 Height = 350
4 Width = 314
5 object FDQuery1: TFDQuery
6 Connection = FDConnection1
7 SQL.Strings = (
8 'select number,id,email from order_data group by number;')
9 Left = 64
10 Top = 32
11 end
12 object FDTable1: TFDTable
13 Active = True
14 IndexFieldNames = 'NUMBER'
15 Connection = FDConnection1
16 UpdateOptions.UpdateTableName = 'USER_DATA'
17 TableName = 'USER_DATA'
18 Left = 64
19 Top = 88
20 object FDTable1NAME: TWideStringField
21 FieldName = 'NAME'
22 Origin = 'NAME'
23 Required = True
24 Size = 80
25 end
26 object FDTable1EMAIL: TWideStringField
27 FieldName = 'EMAIL'
28 Origin = 'EMAIL'
29 Size = 80
30 end
31 object FDTable1BIRTH: TDateField
32 FieldName = 'BIRTH'
33 Origin = 'BIRTH'
34 end
35 object FDTable1ADDRESS: TWideStringField
36 FieldName = 'ADDRESS'
37 Origin = 'ADDRESS'
38 Size = 480
39 end
40 object FDTable1ADDRESS2: TWideStringField
41 FieldName = 'ADDRESS2'
42 Origin = 'ADDRESS2'
43 Size = 480
44 end
45 object FDTable1PASSWORD: TWideStringField
46 FieldName = 'PASSWORD'
47 Origin = '"PASSWORD"'
48 Size = 80
49 end
50 object FDTable1NUMBER: TIntegerField
51 FieldName = 'NUMBER'
52 Origin = 'NUMBER'
53 end
54 object FDTable1DATE: TDateField
55 FieldName = 'DATE'
56 Origin = '"DATE"'
57 end
58 end
59 object FDTable2: TFDTable
60 Active = True
61 FilterOptions = [foCaseInsensitive]
62 IndexFieldNames = 'SERIAL'
63 Connection = FDConnection1
64 UpdateOptions.UpdateTableName = 'ITEM_DATA'
65 TableName = 'ITEM_DATA'
66 Left = 144
67 Top = 88
68 object FDTable2NAME: TWideStringField
69 FieldName = 'NAME'
70 Origin = 'NAME'
71 Size = 480
72 end
73 object FDTable2MAKER: TWideStringField
74 FieldName = 'MAKER'
75 Origin = 'MAKER'
76 Size = 480
77 end
78 object FDTable2STOCK: TIntegerField
79 FieldName = 'STOCK'
80 Origin = 'STOCK'
81 end
82 object FDTable2WEIGHT: TIntegerField
83 FieldName = 'WEIGHT'
84 Origin = 'WEIGHT'
85 end
86 object FDTable2DATE: TDateField
87 FieldName = 'DATE'
88 Origin = '"DATE"'
89 end
90 object FDTable2COMMENT: TWideMemoField
91 FieldName = 'COMMENT'
92 Origin = 'COMMENT'
93 BlobType = ftWideMemo
94 end
95 object FDTable2CATEGORY: TWideStringField
96 FieldName = 'CATEGORY'
97 Origin = 'CATEGORY'
98 Size = 80
99 end
100 object FDTable2IMAGE: TBlobField
101 FieldName = 'IMAGE'
102 Origin = 'IMAGE'
103 end
104 object FDTable2PRICE: TIntegerField
105 FieldName = 'PRICE'
106 Origin = 'PRICE'
107 Required = True
108 end
109 object FDTable2THUMBNAIL: TBlobField
110 FieldName = 'THUMBNAIL'
111 Origin = 'THUMBNAIL'
112 end
113 object FDTable2SERIAL: TIntegerField
114 FieldName = 'SERIAL'
115 Origin = 'SERIAL'
116 end
117 object FDTable2MASTER: TIntegerField
118 FieldName = 'MASTER'
119 Origin = 'MASTER'
120 end
121 end
122 object item: TDataSource
123 DataSet = FDTable2
124 Left = 144
125 Top = 144
126 end
127 object user: TDataSource
128 DataSet = FDTable1
129 Left = 64
130 Top = 144
131 end
132 object FDConnection1: TFDConnection
133 Params.Strings = (
134 'User_Name=sysdba'
135 'Password=masterkey'
136 'CharacterSet=UTF8'
137
138 'Database=C:\Users\yamat\Documents\Embarcadero\Studio\Projects\my' +
139 'app\zencart\Win32\Release\wwwroot\db\MYCART.GDB'
140 'DriverID=IB')
141 Connected = True
142 Left = 232
143 Top = 32
144 end
145 object FDTable3: TFDTable
146 Active = True
147 Connection = FDConnection1
148 UpdateOptions.UpdateTableName = 'FORM_DATA'
149 TableName = 'FORM_DATA'
150 Left = 240
151 Top = 88
152 object FDTable3NAME: TWideStringField
153 FieldName = 'NAME'
154 Origin = 'NAME'
155 Size = 80
156 end
157 object FDTable3BGCOLOR: TIntegerField
158 FieldName = 'BGCOLOR'
159 Origin = 'BGCOLOR'
160 end
161 object FDTable3MAILPASS: TWideStringField
162 FieldName = 'MAILPASS'
163 Origin = 'MAILPASS'
164 Size = 80
165 end
166 object FDTable3MAILUSER: TWideStringField
167 FieldName = 'MAILUSER'
168 Origin = 'MAILUSER'
169 Size = 80
170 end
171 object FDTable3MAILHOST: TWideStringField
172 FieldName = 'MAILHOST'
173 Origin = 'MAILHOST'
174 Size = 80
175 end
176 end
177 object form: TDataSource
178 DataSet = FDTable3
179 Left = 240
180 Top = 144
181 end
182 object FDTable4: TFDTable
183 Active = True
184 IndexFieldNames = 'NUMBER'
185 MasterSource = order
186 MasterFields = 'NUMBER'
187 Connection = FDConnection1
188 UpdateOptions.UpdateTableName = 'USER_INFO'
189 TableName = 'USER_INFO'
190 Left = 64
191 Top = 208
192 object FDTable4NUMBER: TIntegerField
193 FieldName = 'NUMBER'
194 Origin = 'NUMBER'
195 end
196 object FDTable4ID: TWideStringField
197 FieldName = 'ID'
198 Origin = 'ID'
199 Size = 80
200 end
201 object FDTable4ADDRESS: TWideStringField
202 FieldName = 'ADDRESS'
203 Origin = 'ADDRESS'
204 Size = 480
205 end
206 object FDTable4EMAIL: TWideStringField
207 FieldName = 'EMAIL'
208 Origin = 'EMAIL'
209 Size = 480
210 end
211 end
212 object FDTable5: TFDTable
213 Active = True
214 IndexFieldNames = 'ORDER'
215 MasterSource = order
216 MasterFields = 'ORDER'
217 Connection = FDConnection1
218 UpdateOptions.UpdateTableName = 'ITEM_INFO'
219 TableName = 'ITEM_INFO'
220 Left = 144
221 Top = 208
222 object FDTable5VOLUME: TIntegerField
223 FieldName = 'VOLUME'
224 Origin = 'VOLUME'
225 end
226 object FDTable5SERIAL: TIntegerField
227 FieldName = 'SERIAL'
228 Origin = 'SERIAL'
229 end
230 object FDTable5NAME: TWideStringField
231 FieldName = 'NAME'
232 Origin = 'NAME'
233 Size = 80
234 end
235 object FDTable5MAKER: TWideStringField
236 FieldName = 'MAKER'
237 Origin = 'MAKER'
238 Size = 80
239 end
240 object FDTable5PRICE: TIntegerField
241 FieldName = 'PRICE'
242 Origin = 'PRICE'
243 end
244 object FDTable5CHECKVALUE: TBooleanField
245 FieldName = 'CHECKVALUE'
246 Origin = 'CHECKVALUE'
247 end
248 object FDTable5KEYFIELD: TIntegerField
249 FieldName = 'KEYFIELD'
250 Origin = 'KEYFIELD'
251 end
252 object FDTable5ORDER: TIntegerField
253 FieldName = 'ORDER'
254 Origin = '"ORDER"'
255 end
256 end
257 object user_info: TDataSource
258 DataSet = FDQuery1
259 Left = 64
260 Top = 264
261 end
262 object item_info: TDataSource
263 DataSet = FDTable5
264 Left = 144
265 Top = 264
266 end
267 object FDTable6: TFDTable
268 Active = True
269 IndexFieldNames = 'ORDER'
270 Connection = FDConnection1
271 UpdateOptions.UpdateTableName = 'ORDER_DATA'
272 TableName = 'ORDER_DATA'
273 Left = 240
274 Top = 208
275 object FDTable6NUMBER: TIntegerField
276 FieldName = 'NUMBER'
277 Origin = 'NUMBER'
278 end
279 object FDTable6ORDER: TIntegerField
280 FieldName = 'ORDER'
281 Origin = '"ORDER"'
282 end
283 object FDTable6DATE: TDateField
284 FieldName = 'DATE'
285 Origin = '"DATE"'
286 end
287 object FDTable6PRICE: TIntegerField
288 FieldName = 'PRICE'
289 Origin = 'PRICE'
290 end
291 object FDTable6LASTORDER: TDateField
292 FieldName = 'LASTORDER'
293 Origin = 'LASTORDER'
294 end
295 end
296 object order: TDataSource
297 DataSet = FDTable6
298 Left = 240
299 Top = 264
300 end
301 end

Back to OSDN">Back to OSDN
ViewVC Help
Powered by ViewVC 1.1.26