Develop and Download Open Source Software

Browse Subversion Repository

Contents of /Unit11.dfm

Parent Directory Parent Directory | Revision Log Revision Log


Revision 15 - (show annotations) (download)
Fri Aug 5 10:33:26 2016 UTC (7 years, 7 months ago) by yamat0jp
File size: 10705 byte(s)
TDataSetNotifyEventの切り替え方法がはっきりわかりませんでしたが適当に実装しました。
1 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