Develop and Download Open Source Software

Browse Subversion Repository

Contents of /Unit3.dfm

Parent Directory Parent Directory | Revision Log Revision Log


Revision 12 - (show annotations) (download)
Sun Jul 24 06:09:44 2016 UTC (7 years, 8 months ago) by yamat0jp
File size: 7489 byte(s)
エラーは出てしまいますがORDER_DATAを第3正規化できたのでチェック前にコミット
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 MasterSource = order
185 MasterFields = 'NUMBER'
186 Connection = FDConnection1
187 UpdateOptions.UpdateTableName = 'USER_INFO'
188 TableName = 'USER_INFO'
189 Left = 64
190 Top = 208
191 object FDTable4NUMBER: TIntegerField
192 FieldName = 'NUMBER'
193 Origin = 'NUMBER'
194 end
195 object FDTable4ID: TWideStringField
196 FieldName = 'ID'
197 Origin = 'ID'
198 Size = 80
199 end
200 object FDTable4ADDRESS: TWideStringField
201 FieldName = 'ADDRESS'
202 Origin = 'ADDRESS'
203 Size = 480
204 end
205 object FDTable4EMAIL: TWideStringField
206 FieldName = 'EMAIL'
207 Origin = 'EMAIL'
208 Size = 480
209 end
210 object FDTable4DATE: TDateField
211 FieldName = 'DATE'
212 Origin = '"DATE"'
213 end
214 end
215 object FDTable5: TFDTable
216 Active = True
217 MasterSource = order
218 MasterFields = 'ORDER'
219 Connection = FDConnection1
220 UpdateOptions.UpdateTableName = 'ITEM_INFO'
221 TableName = 'ITEM_INFO'
222 Left = 144
223 Top = 208
224 object FDTable5VOLUME: TIntegerField
225 FieldName = 'VOLUME'
226 Origin = 'VOLUME'
227 end
228 object FDTable5SERIAL: TIntegerField
229 FieldName = 'SERIAL'
230 Origin = 'SERIAL'
231 end
232 object FDTable5NAME: TWideStringField
233 FieldName = 'NAME'
234 Origin = 'NAME'
235 Size = 80
236 end
237 object FDTable5MAKER: TWideStringField
238 FieldName = 'MAKER'
239 Origin = 'MAKER'
240 Size = 80
241 end
242 object FDTable5PRICE: TIntegerField
243 FieldName = 'PRICE'
244 Origin = 'PRICE'
245 end
246 object FDTable5KEYFIELD: TIntegerField
247 FieldName = 'KEYFIELD'
248 Origin = 'KEYFIELD'
249 end
250 object FDTable5ORDER: TIntegerField
251 FieldName = 'ORDER'
252 Origin = '"ORDER"'
253 end
254 end
255 object user_info: TDataSource
256 DataSet = FDTable4
257 Left = 64
258 Top = 264
259 end
260 object item_info: TDataSource
261 DataSet = FDTable5
262 Left = 144
263 Top = 264
264 end
265 object FDTable6: TFDTable
266 Active = True
267 IndexFieldNames = 'ORDER'
268 Connection = FDConnection1
269 UpdateOptions.UpdateTableName = 'ORDER_DATA'
270 TableName = 'ORDER_DATA'
271 Left = 240
272 Top = 208
273 object FDTable6NUMBER: TIntegerField
274 FieldName = 'NUMBER'
275 Origin = 'NUMBER'
276 end
277 object FDTable6ORDER: TIntegerField
278 FieldName = 'ORDER'
279 Origin = '"ORDER"'
280 end
281 object FDTable6CHECKVALUE: TBooleanField
282 FieldName = 'CHECKVALUE'
283 Origin = 'CHECKVALUE'
284 end
285 object FDTable6DATE: TDateField
286 FieldName = 'DATE'
287 Origin = '"DATE"'
288 end
289 object FDTable6PRICE: TIntegerField
290 FieldName = 'PRICE'
291 Origin = 'PRICE'
292 end
293 object FDTable6LASTORDER: TDateField
294 FieldName = 'LASTORDER'
295 Origin = 'LASTORDER'
296 end
297 end
298 object order: TDataSource
299 DataSet = FDTable6
300 Left = 240
301 Top = 264
302 end
303 end

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