Develop and Download Open Source Software

Browse Subversion Repository

Annotation of /Unit3.dfm

Parent Directory Parent Directory | Revision Log Revision Log


Revision 18 - (hide annotations) (download)
Sat Aug 27 11:00:30 2016 UTC (7 years, 7 months ago) by yamat0jp
File size: 10559 byte(s)
データの更新をメンテナンス中に限定した
コミットファイルの設定を見直し

問題点はRecordCountを使った検索件数表示
1 yamat0jp 2 object DataModule3: TDataModule3
2     OldCreateOrder = False
3 yamat0jp 14 Height = 333
4 yamat0jp 15 Width = 428
5 yamat0jp 2 object FDQuery1: TFDQuery
6     Connection = FDConnection1
7 yamat0jp 18 SQL.Strings = (
8     '')
9 yamat0jp 2 Left = 64
10     Top = 32
11     end
12     object FDTable1: TFDTable
13     Active = True
14 yamat0jp 3 IndexFieldNames = 'NUMBER'
15 yamat0jp 2 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 yamat0jp 1 end
26 yamat0jp 2 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 yamat0jp 12 object FDTable1ADDRESS2: TWideStringField
41     FieldName = 'ADDRESS2'
42     Origin = 'ADDRESS2'
43     Size = 480
44     end
45 yamat0jp 2 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 yamat0jp 11 object FDTable1DATE: TDateField
55     FieldName = 'DATE'
56     Origin = '"DATE"'
57     end
58 yamat0jp 1 end
59 yamat0jp 2 object FDTable2: TFDTable
60     Active = True
61 yamat0jp 18 Filtered = True
62 yamat0jp 3 FilterOptions = [foCaseInsensitive]
63 yamat0jp 15 IndexFieldNames = 'MASTER'
64 yamat0jp 2 Connection = FDConnection1
65     UpdateOptions.UpdateTableName = 'ITEM_DATA'
66     TableName = 'ITEM_DATA'
67     Left = 144
68     Top = 88
69     object FDTable2NAME: TWideStringField
70     FieldName = 'NAME'
71     Origin = 'NAME'
72     Size = 480
73     end
74     object FDTable2MAKER: TWideStringField
75     FieldName = 'MAKER'
76     Origin = 'MAKER'
77     Size = 480
78     end
79     object FDTable2STOCK: TIntegerField
80     FieldName = 'STOCK'
81     Origin = 'STOCK'
82     end
83     object FDTable2WEIGHT: TIntegerField
84     FieldName = 'WEIGHT'
85     Origin = 'WEIGHT'
86     end
87     object FDTable2DATE: TDateField
88     FieldName = 'DATE'
89     Origin = '"DATE"'
90     end
91 yamat0jp 4 object FDTable2COMMENT: TWideMemoField
92 yamat0jp 2 FieldName = 'COMMENT'
93     Origin = 'COMMENT'
94 yamat0jp 4 BlobType = ftWideMemo
95 yamat0jp 2 end
96     object FDTable2CATEGORY: TWideStringField
97     FieldName = 'CATEGORY'
98     Origin = 'CATEGORY'
99     Size = 80
100     end
101     object FDTable2IMAGE: TBlobField
102     FieldName = 'IMAGE'
103     Origin = 'IMAGE'
104     end
105     object FDTable2PRICE: TIntegerField
106     FieldName = 'PRICE'
107     Origin = 'PRICE'
108     Required = True
109     end
110     object FDTable2THUMBNAIL: TBlobField
111     FieldName = 'THUMBNAIL'
112     Origin = 'THUMBNAIL'
113     end
114     object FDTable2SERIAL: TIntegerField
115     FieldName = 'SERIAL'
116     Origin = 'SERIAL'
117     end
118     object FDTable2MASTER: TIntegerField
119     FieldName = 'MASTER'
120     Origin = 'MASTER'
121     end
122 yamat0jp 18 object FDTable2AGREE: TBooleanField
123     FieldName = 'AGREE'
124     Origin = 'AGREE'
125     end
126 yamat0jp 2 end
127     object item: TDataSource
128     DataSet = FDTable2
129     Left = 144
130     Top = 144
131     end
132     object user: TDataSource
133     DataSet = FDTable1
134     Left = 64
135     Top = 144
136     end
137     object FDConnection1: TFDConnection
138     Params.Strings = (
139     'User_Name=sysdba'
140     'Password=masterkey'
141 yamat0jp 11 'CharacterSet=UTF8'
142 yamat0jp 2
143 yamat0jp 11 'Database=C:\Users\yamat\Documents\Embarcadero\Studio\Projects\my' +
144     'app\zencart\Win32\Release\wwwroot\db\MYCART.GDB'
145 yamat0jp 2 'DriverID=IB')
146     Connected = True
147 yamat0jp 15 Left = 240
148 yamat0jp 2 Top = 32
149     end
150     object FDTable3: TFDTable
151     Active = True
152     Connection = FDConnection1
153     UpdateOptions.UpdateTableName = 'FORM_DATA'
154     TableName = 'FORM_DATA'
155     Left = 240
156     Top = 88
157     object FDTable3NAME: TWideStringField
158     FieldName = 'NAME'
159     Origin = 'NAME'
160     Size = 80
161     end
162     object FDTable3BGCOLOR: TIntegerField
163     FieldName = 'BGCOLOR'
164     Origin = 'BGCOLOR'
165     end
166 yamat0jp 9 object FDTable3MAILPASS: TWideStringField
167     FieldName = 'MAILPASS'
168     Origin = 'MAILPASS'
169     Size = 80
170     end
171     object FDTable3MAILUSER: TWideStringField
172     FieldName = 'MAILUSER'
173     Origin = 'MAILUSER'
174     Size = 80
175     end
176     object FDTable3MAILHOST: TWideStringField
177     FieldName = 'MAILHOST'
178     Origin = 'MAILHOST'
179     Size = 80
180     end
181 yamat0jp 2 end
182     object form: TDataSource
183     DataSet = FDTable3
184     Left = 240
185     Top = 144
186     end
187 yamat0jp 12 object FDTable5: TFDTable
188     Active = True
189 yamat0jp 13 IndexFieldNames = 'ORDER'
190 yamat0jp 12 MasterSource = order
191     MasterFields = 'ORDER'
192     Connection = FDConnection1
193     UpdateOptions.UpdateTableName = 'ITEM_INFO'
194     TableName = 'ITEM_INFO'
195     Left = 144
196     Top = 208
197     object FDTable5VOLUME: TIntegerField
198     FieldName = 'VOLUME'
199     Origin = 'VOLUME'
200     end
201     object FDTable5NAME: TWideStringField
202     FieldName = 'NAME'
203     Origin = 'NAME'
204     Size = 80
205     end
206     object FDTable5MAKER: TWideStringField
207     FieldName = 'MAKER'
208     Origin = 'MAKER'
209     Size = 80
210     end
211     object FDTable5PRICE: TIntegerField
212     FieldName = 'PRICE'
213     Origin = 'PRICE'
214     end
215 yamat0jp 13 object FDTable5CHECKVALUE: TBooleanField
216     FieldName = 'CHECKVALUE'
217     Origin = 'CHECKVALUE'
218     end
219 yamat0jp 12 object FDTable5KEYFIELD: TIntegerField
220     FieldName = 'KEYFIELD'
221     Origin = 'KEYFIELD'
222     end
223     object FDTable5ORDER: TIntegerField
224     FieldName = 'ORDER'
225     Origin = '"ORDER"'
226     end
227 yamat0jp 17 object FDTable5SERIAL: TIntegerField
228     FieldName = 'SERIAL'
229     Origin = 'SERIAL'
230     end
231 yamat0jp 12 end
232     object item_info: TDataSource
233     DataSet = FDTable5
234     Left = 144
235     Top = 264
236     end
237     object FDTable6: TFDTable
238     Active = True
239     IndexFieldNames = 'ORDER'
240     Connection = FDConnection1
241     UpdateOptions.UpdateTableName = 'ORDER_DATA'
242     TableName = 'ORDER_DATA'
243     Left = 240
244     Top = 208
245     object FDTable6NUMBER: TIntegerField
246     FieldName = 'NUMBER'
247     Origin = 'NUMBER'
248     end
249     object FDTable6ORDER: TIntegerField
250     FieldName = 'ORDER'
251     Origin = '"ORDER"'
252     end
253     object FDTable6DATE: TDateField
254     FieldName = 'DATE'
255     Origin = '"DATE"'
256     end
257     object FDTable6PRICE: TIntegerField
258     FieldName = 'PRICE'
259     Origin = 'PRICE'
260     end
261     object FDTable6LASTORDER: TDateField
262     FieldName = 'LASTORDER'
263     Origin = 'LASTORDER'
264     end
265     end
266     object order: TDataSource
267     DataSet = FDTable6
268     Left = 240
269     Top = 264
270     end
271 yamat0jp 14 object FDTable4: TFDTable
272     Active = True
273     Connection = FDConnection1
274     UpdateOptions.UpdateTableName = 'USER_INFO'
275     TableName = 'USER_INFO'
276     Left = 64
277     Top = 208
278     object FDTable4NUMBER: TIntegerField
279     FieldName = 'NUMBER'
280     Origin = 'NUMBER'
281     end
282     object FDTable4ID: TWideStringField
283     FieldName = 'ID'
284     Origin = 'ID'
285     Size = 80
286     end
287     object FDTable4ADDRESS: TWideStringField
288     FieldName = 'ADDRESS'
289     Origin = 'ADDRESS'
290     Size = 480
291     end
292     object FDTable4EMAIL: TWideStringField
293     FieldName = 'EMAIL'
294     Origin = 'EMAIL'
295     Size = 480
296     end
297     end
298 yamat0jp 15 object FDTransaction1: TFDTransaction
299     Connection = FDConnection1
300     Left = 336
301     Top = 248
302     end
303     object FDTable7: TFDTable
304     Active = True
305     Filtered = True
306     Connection = FDConnection1
307     UpdateOptions.UpdateTableName = 'ADMINCODE'
308     TableName = 'ADMINCODE'
309     Left = 336
310     Top = 88
311     object FDTable7NAME: TWideStringField
312     FieldName = 'NAME'
313     Origin = 'NAME'
314     Size = 80
315     end
316     object FDTable7NUMBER: TIntegerField
317     FieldName = 'NUMBER'
318     Origin = 'NUMBER'
319     end
320     object FDTable7EMAIL: TWideStringField
321     FieldName = 'EMAIL'
322     Origin = 'EMAIL'
323     Size = 480
324     end
325     object FDTable7BANK: TWideStringField
326     FieldName = 'BANK'
327     Origin = 'BANK'
328     Size = 80
329     end
330     object FDTable7TEL: TWideStringField
331     FieldName = 'TEL'
332     Origin = 'TEL'
333     Size = 80
334     end
335     object FDTable7ADDRESS: TWideStringField
336     FieldName = 'ADDRESS'
337     Origin = 'ADDRESS'
338     Size = 480
339     end
340     object FDTable7PASSWORD: TWideStringField
341     FieldName = 'PASSWORD'
342     Origin = '"PASSWORD"'
343     Size = 480
344     end
345     end
346     object DataSource1: TDataSource
347     DataSet = FDTable7
348     Left = 336
349     Top = 144
350     end
351     object FDTableView: TFDTable
352     Active = True
353 yamat0jp 18 AfterInsert = FDTableViewAfterInsert
354 yamat0jp 15 Filtered = True
355 yamat0jp 18 Filter = 'agree = true'
356 yamat0jp 15 Connection = FDConnection1
357     UpdateOptions.UpdateTableName = '"VIEW"'
358     TableName = '"VIEW"'
359     Left = 336
360     Top = 32
361     object FDTableViewNAME: TWideStringField
362     FieldName = 'NAME'
363     Origin = 'NAME'
364     Size = 480
365     end
366     object FDTableViewMAKER: TWideStringField
367     FieldName = 'MAKER'
368     Origin = 'MAKER'
369     Size = 480
370     end
371     object FDTableViewSTOCK: TIntegerField
372     FieldName = 'STOCK'
373     Origin = 'STOCK'
374     end
375     object FDTableViewWEIGHT: TIntegerField
376     FieldName = 'WEIGHT'
377     Origin = 'WEIGHT'
378     end
379     object FDTableViewDATE: TDateField
380     FieldName = 'DATE'
381     Origin = '"DATE"'
382     end
383     object FDTableViewCATEGORY: TWideStringField
384     FieldName = 'CATEGORY'
385     Origin = 'CATEGORY'
386     Size = 80
387     end
388     object FDTableViewTHUMBNAIL: TBlobField
389     FieldName = 'THUMBNAIL'
390     Origin = 'THUMBNAIL'
391     end
392     object FDTableViewIMAGE: TBlobField
393     FieldName = 'IMAGE'
394     Origin = 'IMAGE'
395     end
396     object FDTableViewPRICE: TIntegerField
397     FieldName = 'PRICE'
398     Origin = 'PRICE'
399     end
400     object FDTableViewCOMMENT: TWideMemoField
401     FieldName = 'COMMENT'
402     Origin = 'COMMENT'
403     BlobType = ftWideMemo
404     end
405     object FDTableViewMASTER: TIntegerField
406     FieldName = 'MASTER'
407     Origin = 'MASTER'
408     end
409     object FDTableViewSERIAL: TIntegerField
410     FieldName = 'SERIAL'
411     Origin = 'SERIAL'
412     end
413 yamat0jp 18 object FDTableViewACTIVATE: TBooleanField
414     FieldName = 'ACTIVATE'
415     Origin = 'ACTIVATE'
416     end
417     object FDTableViewAGREE: TBooleanField
418     FieldName = 'AGREE'
419     Origin = 'AGREE'
420     end
421 yamat0jp 15 end
422     object view: TDataSource
423     DataSet = FDTableView
424     Left = 144
425     Top = 32
426     end
427 yamat0jp 1 end

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