Develop and Download Open Source Software

zencart-clone

Browse Subversion Repository

/[zencart-clone]/Unit13.dfm

Annotation of /Unit13.dfm

Parent Directory Parent Directory | Revision Log Revision Log

Revision 19 - (hide annotations) (download)
Sat Aug 27 13:22:00 2016 UTC (7 years, 6 months ago) by yamat0jp
File size: 14127 byte(s) 
暫く制作から離れたいのでコミット
データベースに追加したフィールドがありますメンテナンスフォームも一応表示できます
1 yamat0jp 18 object MasterForm: TMasterForm
2 yamat0jp 17 Left = 0
3     Top = 0
4     Width = 555
5     Height = 400
6     RenderInvisibleControls = True
7     AllowPageAccess = True
8     ConnectionMode = cmAny
9     OnCreate = IWAppFormCreate
10 yamat0jp 18 OnDestroy = IWAppFormDestroy
11 yamat0jp 17 Background.Fixed = False
12 yamat0jp 18 LayoutMgr = IWTemplateProcessorHTML1
13 yamat0jp 17 HandleTabs = False
14     LeftToRight = True
15     LockUntilLoaded = True
16     LockOnSubmit = True
17     ShowHint = True
18     XPTheme = True
19     DesignLeft = 8
20     DesignTop = 8
21     object IWButton1: TIWButton
22     Left = 48
23     Top = 72
24     Width = 75
25     Height = 25
26     Caption = #25972#29702
27     Color = clBtnFace
28     Font.Color = clNone
29     Font.Size = 10
30     Font.Style = []
31     FriendlyName = 'IWButton1'
32     TabOrder = 0
33     OnClick = IWButton1Click
34     end
35     object IWRadioGroup1: TIWRadioGroup
36     Left = 160
37     Top = 56
38     Width = 89
39 yamat0jp 18 Height = 57
40 yamat0jp 17 OnClick = IWRadioGroup1Click
41     SubmitOnAsyncEvent = True
42     Editable = True
43     Font.Color = clNone
44     Font.Size = 10
45     Font.Style = []
46     FriendlyName = 'IWRadioGroup1'
47     ItemIndex = 0
48     Items.Strings = (
49     #21033#29992#38283#22987
50     #12513#12531#12486#12490#12531#12473)
51     Layout = glVertical
52     TabOrder = -1
53     end
54 yamat0jp 18 object IWDBGrid1: TIWDBGrid
55     Left = 128
56     Top = 128
57     Width = 300
58     Height = 150
59     BorderColors.Color = clNone
60     BorderColors.Light = clNone
61     BorderColors.Dark = clNone
62     BGColor = clNone
63     BorderSize = 1
64     BorderStyle = tfDefault
65     Caption = 'IWDBGrid1'
66     CellPadding = 0
67     CellSpacing = 0
68     Font.Color = clNone
69     Font.Size = 10
70     Font.Style = []
71     FrameBuffer = 40
72     Lines = tlAll
73     OnRenderCell = IWDBGrid1RenderCell
74     UseFrame = True
75     UseSize = True
76     OnRender = IWDBGrid1Render
77     ScrollToCurrentRow = False
78 yamat0jp 19 Columns = <
79     item
80     Alignment = taLeftJustify
81     BGColor = clNone
82     DoSubmitValidation = True
83     Font.Color = clNone
84     Font.Size = 10
85     Font.Style = []
86     Header = False
87     Height = '0'
88     ShowHint = True
89     VAlign = vaMiddle
90     Visible = True
91     Width = '0'
92     Wrap = False
93     RawText = False
94     Css = ''
95     BlobCharLimit = 0
96     CompareHighlight = hcNone
97     DataField = 'NAME'
98     Title.Alignment = taCenter
99     Title.BGColor = clNone
100     Title.DoSubmitValidation = True
101     Title.Font.Color = clNone
102     Title.Font.Size = 10
103     Title.Font.Style = []
104     Title.Header = False
105     Title.Height = '0'
106     Title.ShowHint = True
107     Title.Text = 'NAME'
108     Title.VAlign = vaMiddle
109     Title.Visible = True
110     Title.Width = '0'
111     Title.Wrap = False
112     Title.RawText = True
113     end
114     item
115     Alignment = taLeftJustify
116     BGColor = clNone
117     DoSubmitValidation = True
118     Font.Color = clNone
119     Font.Size = 10
120     Font.Style = []
121     Header = False
122     Height = '0'
123     ShowHint = True
124     VAlign = vaMiddle
125     Visible = True
126     Width = '0'
127     Wrap = False
128     RawText = False
129     Css = ''
130     BlobCharLimit = 0
131     CompareHighlight = hcNone
132     DataField = 'PRICE'
133     Title.Alignment = taCenter
134     Title.BGColor = clNone
135     Title.DoSubmitValidation = True
136     Title.Font.Color = clNone
137     Title.Font.Size = 10
138     Title.Font.Style = []
139     Title.Header = False
140     Title.Height = '0'
141     Title.ShowHint = True
142     Title.Text = 'PRICE'
143     Title.VAlign = vaMiddle
144     Title.Visible = True
145     Title.Width = '0'
146     Title.Wrap = False
147     Title.RawText = True
148     end
149     item
150     Alignment = taLeftJustify
151     BGColor = clNone
152     DoSubmitValidation = True
153     Font.Color = clNone
154     Font.Size = 10
155     Font.Style = []
156     Header = False
157     Height = '0'
158     ShowHint = True
159     VAlign = vaMiddle
160     Visible = True
161     Width = '0'
162     Wrap = False
163     RawText = False
164     Css = ''
165     BlobCharLimit = 0
166     CompareHighlight = hcNone
167     DataField = 'DATE'
168     Title.Alignment = taCenter
169     Title.BGColor = clNone
170     Title.DoSubmitValidation = True
171     Title.Font.Color = clNone
172     Title.Font.Size = 10
173     Title.Font.Style = []
174     Title.Header = False
175     Title.Height = '0'
176     Title.ShowHint = True
177     Title.Text = 'DATE'
178     Title.VAlign = vaMiddle
179     Title.Visible = True
180     Title.Width = '0'
181     Title.Wrap = False
182     Title.RawText = True
183     end
184     item
185     Alignment = taLeftJustify
186     BGColor = clNone
187     DoSubmitValidation = True
188     Font.Color = clNone
189     Font.Size = 10
190     Font.Style = []
191     Header = False
192     Height = '0'
193     ShowHint = True
194     VAlign = vaMiddle
195     Visible = True
196     Width = '0'
197     Wrap = False
198     RawText = False
199     Css = ''
200     BlobCharLimit = 0
201     CompareHighlight = hcNone
202     DataField = 'THUMBNAIL'
203     Title.Alignment = taCenter
204     Title.BGColor = clNone
205     Title.DoSubmitValidation = True
206     Title.Font.Color = clNone
207     Title.Font.Size = 10
208     Title.Font.Style = []
209     Title.Header = False
210     Title.Height = '0'
211     Title.ShowHint = True
212     Title.Text = 'IMAGE'
213     Title.VAlign = vaMiddle
214     Title.Visible = True
215     Title.Width = '0'
216     Title.Wrap = False
217     Title.RawText = True
218     end
219     item
220     Alignment = taLeftJustify
221     BGColor = clNone
222     DoSubmitValidation = True
223     Font.Color = clNone
224     Font.Size = 10
225     Font.Style = []
226     Header = False
227     Height = '0'
228     ShowHint = True
229     VAlign = vaMiddle
230     Visible = True
231     Width = '0'
232     Wrap = False
233     RawText = False
234     Css = ''
235     BlobCharLimit = 0
236     CompareHighlight = hcNone
237     DataField = 'MAKER'
238     Title.Alignment = taCenter
239     Title.BGColor = clNone
240     Title.DoSubmitValidation = True
241     Title.Font.Color = clNone
242     Title.Font.Size = 10
243     Title.Font.Style = []
244     Title.Header = False
245     Title.Height = '0'
246     Title.ShowHint = True
247     Title.Text = 'MAKER'
248     Title.VAlign = vaMiddle
249     Title.Visible = True
250     Title.Width = '0'
251     Title.Wrap = False
252     Title.RawText = True
253     end
254     item
255     Alignment = taLeftJustify
256     BGColor = clNone
257     DoSubmitValidation = True
258     Font.Color = clNone
259     Font.Size = 10
260     Font.Style = []
261     Header = False
262     Height = '0'
263     ShowHint = True
264     VAlign = vaMiddle
265     Visible = True
266     Width = '0'
267     Wrap = False
268     RawText = False
269     Css = ''
270     BlobCharLimit = 0
271     CompareHighlight = hcNone
272     DataField = 'CATEGORY'
273     Title.Alignment = taCenter
274     Title.BGColor = clNone
275     Title.DoSubmitValidation = True
276     Title.Font.Color = clNone
277     Title.Font.Size = 10
278     Title.Font.Style = []
279     Title.Header = False
280     Title.Height = '0'
281     Title.ShowHint = True
282     Title.Text = 'CATEGORY'
283     Title.VAlign = vaMiddle
284     Title.Visible = True
285     Title.Width = '0'
286     Title.Wrap = False
287     Title.RawText = True
288     end
289     item
290     Alignment = taLeftJustify
291     BGColor = clNone
292     DoSubmitValidation = True
293     Font.Color = clNone
294     Font.Size = 10
295     Font.Style = []
296     Header = False
297     Height = '0'
298     ShowHint = True
299     VAlign = vaMiddle
300     Visible = True
301     Width = '0'
302     Wrap = False
303     RawText = False
304     Css = ''
305     BlobCharLimit = 0
306     CompareHighlight = hcNone
307     DataField = 'STOCK'
308     Title.Alignment = taCenter
309     Title.BGColor = clNone
310     Title.DoSubmitValidation = True
311     Title.Font.Color = clNone
312     Title.Font.Size = 10
313     Title.Font.Style = []
314     Title.Header = False
315     Title.Height = '0'
316     Title.ShowHint = True
317     Title.Text = 'STOCK'
318     Title.VAlign = vaMiddle
319     Title.Visible = True
320     Title.Width = '0'
321     Title.Wrap = False
322     Title.RawText = True
323     end
324     item
325     Alignment = taLeftJustify
326     BGColor = clNone
327     DoSubmitValidation = True
328     Font.Color = clNone
329     Font.Size = 10
330     Font.Style = []
331     Header = False
332     Height = '0'
333     ShowHint = True
334     VAlign = vaMiddle
335     Visible = True
336     Width = '0'
337     Wrap = False
338     RawText = False
339     Css = ''
340     BlobCharLimit = 0
341     CompareHighlight = hcNone
342     DataField = 'WEIGHT'
343     Title.Alignment = taCenter
344     Title.BGColor = clNone
345     Title.DoSubmitValidation = True
346     Title.Font.Color = clNone
347     Title.Font.Size = 10
348     Title.Font.Style = []
349     Title.Header = False
350     Title.Height = '0'
351     Title.ShowHint = True
352     Title.Text = 'WEIGHT'
353     Title.VAlign = vaMiddle
354     Title.Visible = True
355     Title.Width = '0'
356     Title.Wrap = False
357     Title.RawText = True
358     end
359     item
360     Alignment = taLeftJustify
361     BGColor = clNone
362     DoSubmitValidation = True
363     Font.Color = clNone
364     Font.Size = 10
365     Font.Style = []
366     Header = False
367     Height = '0'
368     ShowHint = True
369     VAlign = vaMiddle
370     Visible = True
371     Width = '0'
372     Wrap = False
373     RawText = False
374     Css = ''
375     BlobCharLimit = 0
376     CompareHighlight = hcNone
377     DataField = 'ACTIVATE'
378     Title.Alignment = taCenter
379     Title.BGColor = clNone
380     Title.DoSubmitValidation = True
381     Title.Font.Color = clNone
382     Title.Font.Size = 10
383     Title.Font.Style = []
384     Title.Header = False
385     Title.Height = '0'
386     Title.ShowHint = True
387     Title.Text = 'ACTIVATE'
388     Title.VAlign = vaMiddle
389     Title.Visible = True
390     Title.Width = '0'
391     Title.Wrap = False
392     Title.RawText = True
393     end
394     item
395     Alignment = taLeftJustify
396     BGColor = clNone
397     DoSubmitValidation = True
398     Font.Color = clNone
399     Font.Size = 10
400     Font.Style = []
401     Header = False
402     Height = '0'
403     ShowHint = True
404     VAlign = vaMiddle
405     Visible = True
406     Width = '0'
407     Wrap = False
408     RawText = False
409     Css = ''
410     BlobCharLimit = 0
411     CompareHighlight = hcNone
412     Title.Alignment = taCenter
413     Title.BGColor = clNone
414     Title.DoSubmitValidation = True
415     Title.Font.Color = clNone
416     Title.Font.Size = 10
417     Title.Font.Style = []
418     Title.Header = False
419     Title.Height = '0'
420     Title.ShowHint = True
421     Title.Text = 'AGREE'
422     Title.VAlign = vaMiddle
423     Title.Visible = True
424     Title.Width = '0'
425     Title.Wrap = False
426     Title.RawText = True
427     end
428     item
429     Alignment = taLeftJustify
430     BGColor = clNone
431     DoSubmitValidation = True
432     Font.Color = clNone
433     Font.Size = 10
434     Font.Style = []
435     Header = False
436     Height = '0'
437     ShowHint = True
438     VAlign = vaMiddle
439     Visible = True
440     Width = '0'
441     Wrap = False
442     RawText = False
443     Css = ''
444     BlobCharLimit = 0
445     CompareHighlight = hcNone
446     DataField = 'SERIAL'
447     Title.Alignment = taCenter
448     Title.BGColor = clNone
449     Title.DoSubmitValidation = True
450     Title.Font.Color = clNone
451     Title.Font.Size = 10
452     Title.Font.Style = []
453     Title.Header = False
454     Title.Height = '0'
455     Title.ShowHint = True
456     Title.Text = 'SERIAL'
457     Title.VAlign = vaMiddle
458     Title.Visible = True
459     Title.Width = '0'
460     Title.Wrap = False
461     Title.RawText = True
462     end>
463 yamat0jp 18 DataSource = DataSource1
464     FooterRowCount = 0
465     FriendlyName = 'IWDBGrid1'
466     FromStart = True
467     HighlightColor = clNone
468     HighlightRows = False
469     Options = [dgShowTitles]
470     RefreshMode = rmAutomatic
471     RowLimit = 0
472     RollOver = False
473     RowClick = False
474     RollOverColor = clNone
475     RowHeaderColor = clNone
476     RowAlternateColor = clNone
477     RowCurrentColor = clNone
478     TabOrder = -1
479     end
480     object IWRadioGroup2: TIWRadioGroup
481     Left = 296
482     Top = 40
483     Width = 89
484     Height = 57
485     OnClick = IWRadioGroup2Click
486     SubmitOnAsyncEvent = True
487     Editable = True
488     Font.Color = clNone
489     Font.Size = 10
490     Font.Style = []
491     FriendlyName = 'IWRadioGroup2'
492     ItemIndex = 0
493     Items.Strings = (
494     #25215#35469#24453#12385
495     #25215#35469#28168#12415
496     #20844#38283#20013)
497     Layout = glVertical
498     TabOrder = -1
499     end
500     object IWButton2: TIWButton
501     Left = 240
502     Top = 312
503     Width = 75
504     Height = 25
505     Caption = #38281#12376#12427
506     Color = clBtnFace
507     Font.Color = clNone
508     Font.Size = 10
509     Font.Style = []
510     FriendlyName = 'IWButton2'
511     TabOrder = 1
512     OnClick = IWButton2Click
513     end
514     object DataSource1: TDataSource
515     DataSet = FDQuery1
516     Left = 472
517     Top = 184
518     end
519     object FDQuery1: TFDQuery
520     Connection = DataModule3.FDConnection1
521     SQL.Strings = (
522     'select * from item_data where agree = false;')
523     Left = 472
524     Top = 136
525     end
526     object IWTemplateProcessorHTML1: TIWTemplateProcessorHTML
527     TagType = ttIntraWeb
528     Templates.Default = 'master.htm'
529     Left = 440
530     Top = 304
531     end
532 yamat0jp 17 end
Back to OSDN">Back to OSDN
 ViewVC Help
Powered by ViewVC 1.1.26  
About OSDN
Find Software
Develop Software
Help