Develop and Download Open Source Software

zencart-clone

Browse Subversion Repository

/[zencart-clone]/Unit11.dfm

Annotation of /Unit11.dfm

Parent Directory Parent Directory | Revision Log Revision Log

Revision 15 - (hide annotations) (download)
Fri Aug 5 10:33:26 2016 UTC (7 years, 8 months ago) by yamat0jp
File size: 10705 byte(s) 
TDataSetNotifyEventの切り替え方法がはっきりわかりませんでしたが適当に実装しました。
1 yamat0jp 15 object AdminFile: TAdminFile
2     Left = 0
3     Top = 0
4     Width = 464
5     Height = 591
6     RenderInvisibleControls = True
7     AllowPageAccess = True
8     ConnectionMode = cmAny
9     OnCreate = IWAppFormCreate
10     OnDestroy = IWAppFormDestroy
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     object IWGrid1: TIWGrid
22     Left = 60
23     Top = 416
24     Width = 300
25     Height = 150
26     BorderColors.Color = clNone
27     BorderColors.Light = clNone
28     BorderColors.Dark = clNone
29     BGColor = clNone
30     BorderSize = 1
31     BorderStyle = tfDefault
32     Caption = 'IWGrid1'
33     CellPadding = 0
34     CellSpacing = 0
35     Font.Color = clNone
36     Font.Size = 10
37     Font.Style = []
38     FrameBuffer = 40
39     Lines = tlAll
40     UseFrame = False
41     UseSize = True
42     OnRender = IWGrid1Render
43     FriendlyName = 'IWGrid1'
44     ColumnCount = 5
45     OnCellClick = IWGrid1CellClick
46     RowCount = 1
47     ShowEmptyCells = True
48     ShowInvisibleRows = True
49     ScrollToCurrentRow = False
50     end
51     object IWButton2: TIWButton
52     Left = 369
53     Top = 472
54     Width = 75
55     Height = 25
56     Caption = 'IWButton2'
57     Color = clBtnFace
58     Font.Color = clNone
59     Font.Size = 10
60     Font.Style = []
61     FriendlyName = 'IWButton2'
62     TabOrder = 8
63     OnClick = IWButton2Click
64     end
65     object IWRegion1: TIWRegion
66     Left = 1
67     Top = 1
68     Width = 428
69     Height = 397
70     RenderInvisibleControls = True
71     BorderOptions.NumericWidth = 1
72     BorderOptions.BorderWidth = cbwNumeric
73     BorderOptions.Style = cbsSolid
74     BorderOptions.Color = clNone
75     object IWImage1: TIWImage
76     Left = 284
77     Top = 14
78     Width = 159
79     Height = 181
80     RenderSize = False
81     StyleRenderOptions.RenderSize = False
82     BorderOptions.Width = 0
83     TabOrder = -1
84     UseSize = False
85     Picture.Data = {
86     0954506E67496D61676589504E470D0A1A0A0000000D494844520000009F0000
87     00B50802000000CE4EBAE7000000017352474200AECE1CE90000000467414D41
88     0000B18F0BFC6105000000097048597300000EC300000EC301C76FA864000003
89     504944415478DAEDD841769A40008061BC4BEDA2CF13E0099203E408745937D9
90     65D95D3776198F9003D813C413F8B2487A17AA09C8308CA4B6D03E7FFF7FA502
91     238F0F066552966566D026EA8253979CBAE4D425A72E3975C9A94B4E5D72EA92
92     53979CBAE4D425A72E3975C9A94B4E5D72EA9253979CBAE4D425A72E3975C9A9
93     4B4E5D72EA9253979CBAE4D425A72E3975C9A94B4E5D72EA9253979CBAE4D425
94     A72E3975C9A94B4E5D72EA9253979CBAE406D3FDF17972BDCAF2E5CBE3970FAD
95     0FB375797F75C2403FBFCFA78B4DF5261ACF4E6B60DDC8E34F74FF6E430B1B54
96     375B2EB78BC5AC5151F7FF36ACEEBABC7D9E4F1F6EEACB3742AAAFEF7DFD736E
97     7BC3FD64BD1BF4EE695A6F5EEC964D9B29BC68AD7A98D75B4B524BC39D08772E
98     DAEC6C1B5AF7FE6AFF625B1DB51029FCBC3ACEB3A3C7B0ABBB43A90F79F5F640
99     13AEBC5BF6EDE363783A6DC3D556457CCABC2E0B5FBFBF73E7D3F0BAE1CBE655
100     74FCB22CF1497AB4C4AAED13A50FA3D9B2F3753D8B30778631749BC39D259C93
101     5BF48DD6D54D69674727E7B76BBCF36DCD20AD39B909303B8FA2DBBA53FE53DD
102     57A8BC7D5937843DBA800B35D148BAD5EC99E79BCD6CF899F9A86E0FE13B3333
103     E236DB6934DDC30459247F55453F71FA47FB6DDDC8A9F584A5BDEC6DEFF2E0D7
104     DF2AFAA73E7FBE3DFB0729E3E9D647B038F11F51E259D529F7DDF03B8AF5CBA7
105     AFD11FB4553DF0FAE6E13A1E24B8FB02EEBA97FC9C797F8A3CDD01087BBA20DD
106     EE5F61E64FA9A00BD2BDC0D425A72E3975C9A94B4E5D72EA9253979CBAE4D425
107     A72E3975C9A94B4E5D72EA9253979CBAE4D425A72E3975C9A94B4E5D72EA9253
108     979CBAE4D425A72E3975C9A94B4E5D72EA9253979CBAE4D425A72E3975C9A94B
109     4E5D72EA9253979CBAE4D425A72E3975C9A94B4E5D72EA9253979CBAE4D425A7
110     2E3975C9A94B4E5D72EA9253979CBAE4D425A72E3975C9A94B4E5D72EA925397
111     9CBAE4D425A72E3975C9A94B4E5D72EA9253979CBAE4D425A72E3975C9A94B4E
112     5D72EA9253979CBAE4D425A72E3975C9A94B4E5D72EA9253979CBAE4D425A72E
113     3975C9A94B4E5D72EA9253979CBAE4D425A72E3975C9A94B4E5D72EA9253979C
114     BAE4D425A72E3975C9A94B4E5D72EA9253979CBAE4D425A72E3975C9A94B4E5D
115     72EA9253979CBAE4D425A72E3975C9FD02598B44D3B431312C0000000049454E
116     44AE426082}
117     FriendlyName = 'IWImage1'
118     TransparentColor = clNone
119     JpegOptions.CompressionQuality = 90
120     JpegOptions.Performance = jpBestSpeed
121     JpegOptions.ProgressiveEncoding = False
122     JpegOptions.Smoothing = True
123     end
124     object IWDBText1: TIWDBText
125     Left = 148
126     Top = 17
127     Width = 121
128     Height = 121
129     ConvertSpaces = False
130     DataField = 'COMMENT'
131     DataSource = DataModule3.view
132     FriendlyName = 'IWDBText1'
133     Font.Color = clNone
134     Font.Size = 10
135     Font.Style = []
136     RawText = False
137     UseFrame = False
138     WantReturns = True
139     end
140     object IWDBNavigator1: TIWDBNavigator
141     Left = 43
142     Top = 335
143     Width = 300
144     Height = 28
145     Confirmations.Delete = 'Are you sure you want to delete this record?'
146     Confirmations.Post = 'Are you sure you want to update this record?'
147     Confirmations.Cancel = 'Are you sure you want to cancel your changes to this record?'
148     DataSource = DataModule3.view
149     FriendlyName = 'IWDBNavigator1'
150     ImageHeight = 24
151     ImageWidth = 24
152     VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbInsert, nbDelete, nbEdit, nbPost, nbCancel, nbRefresh]
153     Orientation = orHorizontal
154     OnInsert = IWDBNavigator1Insert
155     OnDelete = IWDBNavigator1Post
156     OnPost = IWDBNavigator1Post
157     OnBeforeAction = IWDBNavigator1BeforeAction
158     end
159     object IWDBEdit6: TIWDBEdit
160     Left = 80
161     Top = 225
162     Width = 121
163     Height = 21
164     Font.Color = clNone
165     Font.Size = 10
166     Font.Style = []
167     FriendlyName = 'IWDBEdit6'
168     SubmitOnAsyncEvent = True
169     TabOrder = 1
170     AutoEditable = False
171     DataField = 'WEIGHT'
172     PasswordPrompt = False
173     DataSource = DataModule3.view
174     end
175     object IWDBEdit5: TIWDBEdit
176     Left = 80
177     Top = 184
178     Width = 121
179     Height = 21
180     Font.Color = clNone
181     Font.Size = 10
182     Font.Style = []
183     FriendlyName = 'IWDBEdit5'
184     MaxLength = 80
185     SubmitOnAsyncEvent = True
186     TabOrder = 2
187     AutoEditable = False
188     DataField = 'PRICE'
189     PasswordPrompt = False
190     DataSource = DataModule3.view
191     end
192     object IWDBEdit4: TIWDBEdit
193     Left = 284
194     Top = 300
195     Width = 121
196     Height = 21
197     Font.Color = clNone
198     Font.Size = 10
199     Font.Style = []
200     FriendlyName = 'IWDBEdit4'
201     SubmitOnAsyncEvent = True
202     TabOrder = 4
203     AutoEditable = False
204     DataField = 'STOCK'
205     PasswordPrompt = False
206     DataSource = DataModule3.view
207     end
208     object IWDBEdit3: TIWDBEdit
209     Left = 284
210     Top = 263
211     Width = 121
212     Height = 21
213     Font.Color = clNone
214     Font.Size = 10
215     Font.Style = []
216     FriendlyName = 'IWDBEdit3'
217     MaxLength = 80
218     SubmitOnAsyncEvent = True
219     TabOrder = 5
220     AutoEditable = False
221     DataField = 'CATEGORY'
222     PasswordPrompt = False
223     DataSource = DataModule3.view
224     end
225     object IWDBEdit2: TIWDBEdit
226     Left = 284
227     Top = 225
228     Width = 121
229     Height = 21
230     Font.Color = clNone
231     Font.Size = 10
232     Font.Style = []
233     FriendlyName = 'IWDBEdit2'
234     MaxLength = 480
235     SubmitOnAsyncEvent = True
236     TabOrder = 6
237     AutoEditable = False
238     DataField = 'MAKER'
239     PasswordPrompt = False
240     DataSource = DataModule3.view
241     end
242     object IWDBEdit1: TIWDBEdit
243     Left = 284
244     Top = 184
245     Width = 121
246     Height = 21
247     Font.Color = clNone
248     Font.Size = 10
249     Font.Style = []
250     FriendlyName = 'IWDBEdit1'
251     MaxLength = 480
252     SubmitOnAsyncEvent = True
253     TabOrder = 7
254     AutoEditable = False
255     DataField = 'NAME'
256     PasswordPrompt = False
257     DataSource = DataModule3.view
258     end
259     object IWButton1: TIWButton
260     Left = 284
261     Top = 144
262     Width = 75
263     Height = 25
264     Caption = 'IWButton1'
265     Color = clBtnFace
266     Font.Color = clNone
267     Font.Size = 10
268     Font.Style = []
269     FriendlyName = 'IWButton1'
270     TabOrder = 3
271     OnClick = IWButton1Click
272     end
273     object IWLabel1: TIWLabel
274     Left = 220
275     Top = 189
276     Width = 49
277     Height = 16
278     Font.Color = clNone
279     Font.Size = 10
280     Font.Style = []
281     HasTabOrder = False
282     FriendlyName = 'IWLabel1'
283     Caption = #21830#21697#21517
284     end
285     object IWLabel2: TIWLabel
286     Left = 220
287     Top = 230
288     Width = 66
289     Height = 16
290     Font.Color = clNone
291     Font.Size = 10
292     Font.Style = []
293     HasTabOrder = False
294     FriendlyName = 'IWLabel2'
295     Caption = #12513#12540#12459#12540#21517
296     end
297     object IWLabel3: TIWLabel
298     Left = 220
299     Top = 263
300     Width = 47
301     Height = 16
302     Font.Color = clNone
303     Font.Size = 10
304     Font.Style = []
305     HasTabOrder = False
306     FriendlyName = 'IWLabel3'
307     Caption = #12459#12486#12468#12522
308     end
309     object IWLabel4: TIWLabel
310     Left = 220
311     Top = 305
312     Width = 49
313     Height = 16
314     Font.Color = clNone
315     Font.Size = 10
316     Font.Style = []
317     HasTabOrder = False
318     FriendlyName = 'IWLabel4'
319     Caption = #22312#24235#25968
320     end
321     object IWLabel5: TIWLabel
322     Left = 16
323     Top = 192
324     Width = 33
325     Height = 16
326     Font.Color = clNone
327     Font.Size = 10
328     Font.Style = []
329     HasTabOrder = False
330     FriendlyName = 'IWLabel5'
331     Caption = #20516#27573
332     end
333     object IWLabel6: TIWLabel
334     Left = 16
335     Top = 230
336     Width = 66
337     Height = 16
338     Font.Color = clNone
339     Font.Size = 10
340     Font.Style = []
341     HasTabOrder = False
342     FriendlyName = 'IWLabel6'
343     Caption = #21830#21697#37325#37327
344     end
345     end
346     object IWTemplateProcessorHTML1: TIWTemplateProcessorHTML
347     TagType = ttIntraWeb
348     Templates.Default = 'adminfile.htm'
349     Left = 288
350     Top = 432
351     end
352     object FDGUIxLoginDialog1: TFDGUIxLoginDialog
353     Provider = 'Forms'
354     Left = 184
355     Top = 120
356     end
357     object FileOpenDialog1: TFileOpenDialog
358     FavoriteLinks = <>
359     FileTypes = <
360     item
361     DisplayName = 'png'
362     FileMask = '*.png'
363     end>
364     Options = []
365     Left = 336
366     Top = 232
367     end
368     end
Back to OSDN">Back to OSDN
 ViewVC Help
Powered by ViewVC 1.1.26  
About OSDN
Find Software
Develop Software
Help