Develop and Download Open Source Software

Browse Subversion Repository

Annotation of /Unit1.dfm

Parent Directory Parent Directory | Revision Log Revision Log


Revision 15 - (hide annotations) (download)
Fri Aug 5 10:33:26 2016 UTC (7 years, 7 months ago) by yamat0jp
File size: 13762 byte(s)
TDataSetNotifyEventの切り替え方法がはっきりわかりませんでしたが適当に実装しました。
1 yamat0jp 2 object IWForm1: TIWForm1
2 yamat0jp 1 Left = 0
3     Top = 0
4 yamat0jp 2 Width = 577
5 yamat0jp 5 Height = 716
6     RenderInvisibleControls = False
7 yamat0jp 1 OnRender = IWAppFormRender
8     AllowPageAccess = True
9     ConnectionMode = cmAny
10     OnCreate = IWAppFormCreate
11     Background.Fixed = False
12     LayoutMgr = IWTemplateProcessorHTML1
13     HandleTabs = False
14     LeftToRight = True
15     LockUntilLoaded = True
16     LockOnSubmit = True
17     ShowHint = True
18     XPTheme = True
19     DesignLeft = 8
20     DesignTop = 8
21 yamat0jp 2 object IWLabel1: TIWLabel
22     Left = 153
23     Top = 192
24     Width = 99
25 yamat0jp 1 Height = 16
26     Font.Color = clNone
27     Font.Size = 10
28     Font.Style = []
29     HasTabOrder = False
30 yamat0jp 2 FriendlyName = 'IWLabel1'
31     Caption = #12424#12358#12371#12381#12466#12473#12488#27096
32 yamat0jp 1 end
33     object IWDBLabel1: TIWDBLabel
34 yamat0jp 2 Left = 153
35     Top = 175
36 yamat0jp 1 Width = 36
37     Height = 16
38     Font.Color = clNone
39     Font.Size = 10
40     Font.Style = []
41     HasTabOrder = False
42     DataField = 'NAME'
43 yamat0jp 2 DataSource = DataModule3.user
44 yamat0jp 1 FriendlyName = 'IWDBLabel1'
45     end
46 yamat0jp 2 object IWLink1: TIWLink
47     Left = 286
48     Top = 191
49     Width = 92
50     Height = 17
51     Alignment = taLeftJustify
52     Color = clNone
53     Font.Color = clNone
54     Font.Size = 10
55     Font.Style = [fsUnderline]
56     DoSubmitValidation = False
57     FriendlyName = 'IWLink1'
58     OnClick = IWLink1Click
59     TabOrder = 0
60     RawText = False
61     Caption = #12518#12540#12470#12540#30331#37682
62     end
63     object IWLabel6: TIWLabel
64 yamat0jp 8 Left = 329
65     Top = 143
66 yamat0jp 1 Width = 49
67     Height = 16
68     Font.Color = clNone
69     Font.Size = 10
70     Font.Style = []
71     HasTabOrder = False
72 yamat0jp 2 FriendlyName = 'IWLabel6'
73 yamat0jp 1 Caption = #26908#32034#20013
74     end
75 yamat0jp 2 object IWGrid1: TIWGrid
76 yamat0jp 5 Left = 52
77     Top = 240
78     Width = 429
79 yamat0jp 2 Height = 150
80     BorderColors.Color = clNone
81     BorderColors.Light = clNone
82     BorderColors.Dark = clNone
83     BGColor = clNone
84 yamat0jp 5 BorderSize = 2
85 yamat0jp 2 BorderStyle = tfDefault
86 yamat0jp 5 Caption = #21830#21697#19968#35239
87     CellPadding = 10
88     CellSpacing = 10
89 yamat0jp 1 Font.Color = clNone
90     Font.Size = 10
91 yamat0jp 2 Font.Style = []
92     FrameBuffer = 40
93     Lines = tlAll
94     UseFrame = False
95     UseSize = True
96     FriendlyName = 'IWGrid1'
97     ColumnCount = 4
98 yamat0jp 5 OnCellClick = IWGrid1CellClick
99 yamat0jp 2 RowCount = 1
100     ShowEmptyCells = True
101     ShowInvisibleRows = True
102     ScrollToCurrentRow = False
103     end
104     object IWText1: TIWText
105 yamat0jp 8 Left = 41
106     Top = 136
107 yamat0jp 2 Width = 145
108 yamat0jp 5 Height = 36
109 yamat0jp 2 BGColor = clNone
110     ConvertSpaces = False
111     Font.Color = clNone
112     Font.Size = 10
113     Font.Style = []
114     FriendlyName = 'IWText1'
115     Lines.Strings = (
116 yamat0jp 5 #12356#12425#12387#12375#12419#12356#12414#12379
117     #12469#12452#12531#12452#12531#12375#12390#12367#12384#12373#12356)
118 yamat0jp 1 RawText = False
119 yamat0jp 2 UseFrame = False
120     WantReturns = True
121 yamat0jp 1 end
122 yamat0jp 5 object IWLink3: TIWLink
123     Left = 400
124 yamat0jp 7 Top = 142
125 yamat0jp 5 Width = 65
126     Height = 17
127     Alignment = taLeftJustify
128     Color = clNone
129     Font.Color = clNone
130     Font.Size = 10
131     Font.Style = [fsUnderline]
132     DoSubmitValidation = False
133     FriendlyName = 'IWLink3'
134     OnClick = IWLink3Click
135 yamat0jp 10 TabOrder = 9
136 yamat0jp 8 RawText = False
137     Caption = #30331#37682#24773#22577
138     end
139     object IWLink5: TIWLink
140     Left = 375
141     Top = 165
142     Width = 127
143     Height = 17
144     Alignment = taLeftJustify
145     Color = clNone
146     Font.Color = clNone
147     Font.Size = 10
148     Font.Style = [fsUnderline]
149     DoSubmitValidation = False
150     FriendlyName = 'IWLink5'
151     OnClick = IWLink5Click
152 yamat0jp 15 TabOrder = 10
153 yamat0jp 5 RawText = False
154 yamat0jp 8 Caption = #12497#12473#12527#12540#12489#12362#24536#12428#12398#26041
155 yamat0jp 5 end
156 yamat0jp 10 object IWLink6: TIWLink
157     Left = 509
158     Top = 504
159     Width = 65
160     Height = 17
161     Alignment = taLeftJustify
162     Color = clNone
163     Font.Color = clNone
164     Font.Size = 10
165     Font.Style = [fsUnderline]
166     DoSubmitValidation = False
167     FriendlyName = 'IWLink6'
168     OnClick = IWLink6Click
169     TabOrder = 14
170     RawText = False
171     Caption = 'IWLink6'
172     end
173 yamat0jp 15 object IWLink7: TIWLink
174     Left = 509
175     Top = 542
176     Width = 65
177     Height = 17
178     Alignment = taLeftJustify
179     Color = clNone
180     Font.Color = clNone
181     Font.Size = 10
182     Font.Style = [fsUnderline]
183     DoSubmitValidation = False
184     FriendlyName = 'IWLink7'
185     OnClick = IWLink6Click
186     TabOrder = 15
187     RawText = False
188     Caption = 'IWLink7'
189     end
190 yamat0jp 1 object IWRegion1: TIWRegion
191 yamat0jp 2 Left = 16
192     Top = 192
193     Width = 122
194     Height = 97
195     RenderInvisibleControls = True
196 yamat0jp 1 BorderOptions.NumericWidth = 1
197     BorderOptions.BorderWidth = cbwNumeric
198     BorderOptions.Style = cbsSolid
199     BorderOptions.Color = clNone
200 yamat0jp 2 object IWLabel2: TIWLabel
201 yamat0jp 1 Left = 1
202     Top = 1
203 yamat0jp 2 Width = 120
204 yamat0jp 1 Height = 16
205     Align = alTop
206     Font.Color = clNone
207     Font.Size = 10
208     Font.Style = []
209     HasTabOrder = False
210 yamat0jp 2 FriendlyName = 'IWLabel2'
211 yamat0jp 1 Caption = #12459#12486#12468#12522
212 yamat0jp 2 ExplicitLeft = 0
213     ExplicitTop = 40
214     ExplicitWidth = 58
215 yamat0jp 1 end
216     object IWList1: TIWList
217     Left = 1
218     Top = 17
219 yamat0jp 2 Width = 120
220     Height = 79
221 yamat0jp 1 Align = alClient
222     FriendlyName = 'IWList1'
223     Font.Color = clNone
224     Font.Size = 10
225     Font.Style = []
226     Numbered = False
227 yamat0jp 2 ExplicitLeft = 8
228     ExplicitTop = 48
229     ExplicitWidth = 116
230     ExplicitHeight = 24
231 yamat0jp 1 end
232     end
233 yamat0jp 2 object IWRegion2: TIWRegion
234     Left = 16
235     Top = 304
236     Width = 122
237     Height = 107
238     RenderInvisibleControls = True
239 yamat0jp 1 BorderOptions.NumericWidth = 1
240     BorderOptions.BorderWidth = cbwNumeric
241     BorderOptions.Style = cbsSolid
242     BorderOptions.Color = clNone
243     object IWLabel3: TIWLabel
244     Left = 1
245     Top = 1
246 yamat0jp 2 Width = 120
247 yamat0jp 1 Height = 16
248     Align = alTop
249     Font.Color = clNone
250     Font.Size = 10
251     Font.Style = []
252     HasTabOrder = False
253     FriendlyName = 'IWLabel3'
254     Caption = #26032#30528#21830#21697
255 yamat0jp 2 ExplicitLeft = 0
256     ExplicitTop = 32
257     ExplicitWidth = 58
258 yamat0jp 1 end
259     object IWLabel4: TIWLabel
260     Left = 1
261 yamat0jp 2 Top = 90
262     Width = 120
263 yamat0jp 1 Height = 16
264     Align = alBottom
265     Font.Color = clNone
266     Font.Size = 10
267     Font.Style = []
268     HasTabOrder = False
269     FriendlyName = 'IWLabel4'
270     Caption = 'IWLabel4'
271 yamat0jp 2 ExplicitLeft = 0
272     ExplicitTop = 32
273     ExplicitWidth = 58
274 yamat0jp 1 end
275 yamat0jp 5 object IWImage1: TIWImage
276 yamat0jp 2 Left = 25
277 yamat0jp 1 Top = 23
278 yamat0jp 2 Width = 64
279     Height = 61
280 yamat0jp 1 RenderSize = False
281     StyleRenderOptions.RenderSize = False
282     BorderOptions.Width = 0
283     TabOrder = -1
284     UseSize = False
285 yamat0jp 5 FriendlyName = 'IWImage1'
286     TransparentColor = clNone
287     JpegOptions.CompressionQuality = 90
288     JpegOptions.Performance = jpBestSpeed
289     JpegOptions.ProgressiveEncoding = False
290     JpegOptions.Smoothing = True
291 yamat0jp 1 end
292     end
293 yamat0jp 2 object IWRegion3: TIWRegion
294     Left = 17
295     Top = 417
296     Width = 201
297     Height = 57
298     RenderInvisibleControls = True
299     BorderOptions.NumericWidth = 1
300     BorderOptions.BorderWidth = cbwNumeric
301     BorderOptions.Style = cbsSolid
302     BorderOptions.Color = clNone
303     object IWEdit1: TIWEdit
304     Left = 16
305     Top = 16
306     Width = 121
307     Height = 21
308     Font.Color = clNone
309     Font.Size = 10
310     Font.Style = []
311     FriendlyName = 'IWEdit1'
312     SubmitOnAsyncEvent = True
313 yamat0jp 5 TabOrder = 1
314 yamat0jp 2 end
315     object IWButton1: TIWButton
316     Left = 143
317     Top = 16
318     Width = 50
319     Height = 25
320     Caption = #26908#32034
321     Color = clBtnFace
322     Font.Color = clNone
323     Font.Size = 10
324     Font.Style = []
325     FriendlyName = 'IWButton1'
326 yamat0jp 8 TabOrder = 2
327 yamat0jp 2 OnClick = IWButton1Click
328     end
329     end
330 yamat0jp 1 object IWRegion4: TIWRegion
331 yamat0jp 2 Left = 376
332     Top = 192
333     Width = 129
334 yamat0jp 3 Height = 105
335 yamat0jp 2 RenderInvisibleControls = True
336 yamat0jp 1 BorderOptions.NumericWidth = 1
337     BorderOptions.BorderWidth = cbwNumeric
338     BorderOptions.Style = cbsSolid
339     BorderOptions.Color = clNone
340 yamat0jp 2 object IWEdit2: TIWEdit
341     Left = 24
342     Top = 21
343     Width = 81
344     Height = 21
345 yamat0jp 3 Hint = 'EMAIL'
346 yamat0jp 1 Font.Color = clNone
347     Font.Size = 10
348     Font.Style = []
349 yamat0jp 2 FriendlyName = 'IWEdit2'
350     SubmitOnAsyncEvent = True
351 yamat0jp 15 TabOrder = 3
352 yamat0jp 1 end
353 yamat0jp 2 object IWEdit3: TIWEdit
354     Left = 24
355 yamat0jp 3 Top = 48
356 yamat0jp 2 Width = 81
357     Height = 21
358     Hint = 'PASSWORD'
359 yamat0jp 1 Font.Color = clNone
360     Font.Size = 10
361     Font.Style = []
362 yamat0jp 2 FriendlyName = 'IWEdit3'
363     SubmitOnAsyncEvent = True
364     TabOrder = 5
365     PasswordPrompt = True
366 yamat0jp 1 end
367 yamat0jp 2 object IWLink2: TIWLink
368     Left = 40
369 yamat0jp 3 Top = 75
370 yamat0jp 2 Width = 65
371     Height = 17
372     Alignment = taLeftJustify
373     Color = clNone
374     Font.Color = clNone
375     Font.Size = 10
376     Font.Style = [fsUnderline]
377     DoSubmitValidation = False
378     FriendlyName = 'IWLink2'
379     OnClick = IWLink2Click
380     TabOrder = 6
381     RawText = False
382     Caption = #12525#12464#12452#12531
383     end
384 yamat0jp 1 end
385 yamat0jp 2 object IWRegion5: TIWRegion
386     Left = 375
387     Top = 332
388     Width = 129
389 yamat0jp 1 Height = 60
390 yamat0jp 2 RenderInvisibleControls = True
391 yamat0jp 1 BorderOptions.NumericWidth = 1
392     BorderOptions.BorderWidth = cbwNumeric
393     BorderOptions.Style = cbsSolid
394     BorderOptions.Color = clNone
395 yamat0jp 2 object IWLabel7: TIWLabel
396 yamat0jp 1 Left = 1
397     Top = 1
398 yamat0jp 2 Width = 127
399 yamat0jp 1 Height = 16
400     Align = alTop
401     Font.Color = clNone
402     Font.Size = 10
403     Font.Style = []
404     HasTabOrder = False
405 yamat0jp 2 FriendlyName = 'IWLabel3'
406 yamat0jp 1 Caption = #12458#12531#12521#12452#12531#12398#12362#23458#27096
407 yamat0jp 2 ExplicitLeft = 8
408 yamat0jp 1 ExplicitTop = 24
409 yamat0jp 2 ExplicitWidth = 106
410 yamat0jp 1 end
411     end
412     object IWRegion6: TIWRegion
413 yamat0jp 2 Left = 376
414     Top = 414
415     Width = 127
416     Height = 60
417     RenderInvisibleControls = True
418 yamat0jp 1 BorderOptions.NumericWidth = 1
419     BorderOptions.BorderWidth = cbwNumeric
420     BorderOptions.Style = cbsSolid
421     BorderOptions.Color = clNone
422 yamat0jp 2 object IWLabel8: TIWLabel
423     Left = 1
424     Top = 1
425     Width = 125
426     Height = 16
427     Align = alTop
428 yamat0jp 1 Font.Color = clNone
429     Font.Size = 10
430     Font.Style = []
431 yamat0jp 2 HasTabOrder = False
432     FriendlyName = 'IWLabel8'
433     Caption = #12471#12519#12483#12500#12531#12464#12459#12540#12488
434     ExplicitLeft = 0
435     ExplicitTop = 24
436     ExplicitWidth = 118
437 yamat0jp 1 end
438 yamat0jp 2 object IWList2: TIWList
439     Left = 1
440     Top = 17
441     Width = 125
442 yamat0jp 5 Height = 25
443 yamat0jp 2 Align = alClient
444     FriendlyName = 'IWList2'
445 yamat0jp 1 Font.Color = clNone
446     Font.Size = 10
447     Font.Style = []
448 yamat0jp 2 Numbered = False
449     ExplicitLeft = 8
450     ExplicitTop = 16
451     ExplicitWidth = 116
452     ExplicitHeight = 24
453 yamat0jp 1 end
454 yamat0jp 5 object IWLink4: TIWLink
455     Left = 1
456     Top = 42
457     Width = 125
458     Height = 17
459     Align = alBottom
460     Alignment = taLeftJustify
461     Color = clNone
462     Font.Color = clNone
463     Font.Size = 10
464     Font.Style = [fsUnderline]
465     DoSubmitValidation = False
466     FriendlyName = 'IWLink4'
467     OnClick = IWLink4Click
468 yamat0jp 10 TabOrder = 8
469 yamat0jp 5 RawText = False
470     Caption = #12459#12540#12488#12395#31227#21205
471     ExplicitLeft = 32
472     ExplicitTop = 24
473     ExplicitWidth = 65
474     end
475 yamat0jp 1 end
476     object IWRegion7: TIWRegion
477 yamat0jp 2 Left = 239
478     Top = 413
479     Width = 104
480 yamat0jp 1 Height = 60
481 yamat0jp 2 RenderInvisibleControls = True
482 yamat0jp 1 BorderOptions.NumericWidth = 1
483     BorderOptions.BorderWidth = cbwNumeric
484     BorderOptions.Style = cbsSolid
485     BorderOptions.Color = clNone
486 yamat0jp 2 object IWLabel5: TIWLabel
487 yamat0jp 1 Left = 1
488     Top = 1
489 yamat0jp 2 Width = 102
490 yamat0jp 1 Height = 16
491     Align = alTop
492     Font.Color = clNone
493     Font.Size = 10
494     Font.Style = []
495     HasTabOrder = False
496 yamat0jp 2 FriendlyName = 'IWLabel5'
497     Caption = #26368#36817#12398#12372#27880#25991
498     ExplicitLeft = -32
499 yamat0jp 1 ExplicitTop = 24
500     ExplicitWidth = 58
501     end
502     object IWList3: TIWList
503     Left = 1
504     Top = 17
505 yamat0jp 2 Width = 102
506 yamat0jp 1 Height = 42
507     Align = alClient
508     FriendlyName = 'IWList3'
509     Font.Color = clNone
510     Font.Size = 10
511     Font.Style = []
512     Numbered = False
513 yamat0jp 2 ExplicitLeft = -8
514 yamat0jp 1 ExplicitTop = 16
515     ExplicitWidth = 116
516     ExplicitHeight = 24
517     end
518     end
519 yamat0jp 5 inline IWFrame8: TIWFrame8
520     Left = 52
521     Top = 496
522     Width = 429
523     Height = 217
524 yamat0jp 8 TabOrder = 7
525 yamat0jp 5 Visible = False
526     ExplicitLeft = 52
527     ExplicitTop = 496
528     ExplicitHeight = 217
529     inherited IWFrameRegion: TIWRegion
530     Height = 217
531 yamat0jp 8 TabOrder = 7
532 yamat0jp 5 ExplicitHeight = 217
533 yamat0jp 15 inherited IWImage1: TIWImage
534     Width = 97
535     Height = 129
536     ExplicitWidth = 97
537     ExplicitHeight = 129
538     end
539     inherited IWDBLabel2: TIWDBLabel
540     Width = 44
541     DataField = 'STOCK'
542     ExplicitWidth = 44
543     end
544 yamat0jp 5 inherited IWButton1: TIWButton
545     OnClick = IWFrame8IWButton1Click
546     end
547     inherited IWLink1: TIWLink
548     OnClick = IWFrame8IWLink1Click
549     end
550     end
551     end
552 yamat0jp 8 inline IWFrame1: TIWFrame1
553     Left = -76
554     Top = 0
555     Width = 653
556     Height = 131
557     TabOrder = 8
558     ExplicitLeft = -76
559     inherited IWFrameRegion: TIWRegion
560     TabOrder = 13
561     ExplicitWidth = 653
562     ExplicitHeight = 131
563     end
564     end
565 yamat0jp 1 object IWTemplateProcessorHTML1: TIWTemplateProcessorHTML
566     TagType = ttIntraWeb
567 yamat0jp 2 Templates.Default = 'toppage.htm'
568     Left = 256
569 yamat0jp 1 Top = 224
570     end
571     end

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