Develop and Download Open Source Software

Browse Subversion Repository

Contents of /Unit5.dfm

Parent Directory Parent Directory | Revision Log Revision Log


Revision 17 - (show annotations) (download)
Wed Aug 24 12:31:07 2016 UTC (7 years, 6 months ago) by yamat0jp
File size: 10950 byte(s)
ご注文内容発送フォームがしっくりいくようになりました。
1 object AdminPage: TAdminPage
2 Left = 0
3 Top = 0
4 Width = 555
5 Height = 400
6 RenderInvisibleControls = False
7 AllowPageAccess = True
8 ConnectionMode = cmAny
9 OnCreate = IWAppFormCreate
10 Background.Fixed = False
11 LayoutMgr = IWTemplateProcessorHTML1
12 HandleTabs = False
13 LeftToRight = True
14 LockUntilLoaded = True
15 LockOnSubmit = True
16 ShowHint = True
17 XPTheme = True
18 DesignLeft = 8
19 DesignTop = 8
20 object IWButton1: TIWButton
21 Left = 136
22 Top = 312
23 Width = 75
24 Height = 25
25 Caption = #19968#35239
26 Color = clBtnFace
27 Font.Color = clNone
28 Font.Size = 10
29 Font.Style = []
30 FriendlyName = 'IWButton1'
31 TabOrder = 0
32 OnClick = IWButton1Click
33 end
34 object IWButton2: TIWButton
35 Left = 320
36 Top = 344
37 Width = 75
38 Height = 25
39 Caption = #32013#21697#26360
40 Color = clBtnFace
41 Font.Color = clNone
42 Font.Size = 10
43 Font.Style = []
44 FriendlyName = 'IWButton2'
45 TabOrder = 1
46 end
47 object IWButton3: TIWButton
48 Left = 392
49 Top = 344
50 Width = 75
51 Height = 25
52 Caption = #37197#36865#34920
53 Color = clBtnFace
54 Font.Color = clNone
55 Font.Size = 10
56 Font.Style = []
57 FriendlyName = 'IWButton3'
58 TabOrder = 2
59 end
60 object IWButton4: TIWButton
61 Left = 464
62 Top = 344
63 Width = 75
64 Height = 25
65 Caption = #25147#12427
66 Color = clBtnFace
67 Font.Color = clNone
68 Font.Size = 10
69 Font.Style = []
70 FriendlyName = 'IWButton4'
71 TabOrder = 3
72 OnClick = IWButton4Click
73 end
74 object IWCheckBox1: TIWCheckBox
75 Left = 32
76 Top = 128
77 Width = 121
78 Height = 21
79 Visible = False
80 Caption = 'IWCheckBox1'
81 Editable = True
82 Font.Color = clNone
83 Font.Size = 10
84 Font.Style = []
85 SubmitOnAsyncEvent = True
86 Style = stNormal
87 TabOrder = 4
88 OnChange = IWCheckBox1Change
89 Checked = False
90 FriendlyName = 'IWCheckBox1'
91 end
92 object IWDBLabel1: TIWDBLabel
93 Left = 239
94 Top = 78
95 Width = 13
96 Height = 16
97 Font.Color = clNone
98 Font.Size = 10
99 Font.Style = []
100 HasTabOrder = False
101 DataField = 'ID'
102 DataSource = user_info
103 FriendlyName = 'IWDBLabel1'
104 end
105 object IWDBLabel2: TIWDBLabel
106 Left = 128
107 Top = 61
108 Width = 60
109 Height = 16
110 Font.Color = clNone
111 Font.Size = 10
112 Font.Style = []
113 HasTabOrder = False
114 DataField = 'ADDRESS'
115 DataSource = user_info
116 FriendlyName = 'IWDBLabel2'
117 end
118 object IWDBGrid1: TIWDBGrid
119 Left = 352
120 Top = 13
121 Width = 200
122 Height = 109
123 BorderColors.Color = clNone
124 BorderColors.Light = clNone
125 BorderColors.Dark = clNone
126 BGColor = clNone
127 BorderSize = 1
128 BorderStyle = tfDefault
129 Caption = 'IWDBGrid1'
130 CellPadding = 0
131 CellSpacing = 0
132 Font.Color = clNone
133 Font.Size = 10
134 Font.Style = []
135 FrameBuffer = 40
136 Lines = tlAll
137 UseFrame = True
138 UseSize = True
139 ScrollToCurrentRow = False
140 Columns = <>
141 DataSource = user_info
142 FooterRowCount = 0
143 FriendlyName = 'IWDBGrid1'
144 FromStart = True
145 HighlightColor = clNone
146 HighlightRows = False
147 Options = [dgShowTitles]
148 RefreshMode = rmAutomatic
149 RowLimit = 0
150 RollOver = False
151 RowClick = False
152 RollOverColor = clNone
153 RowHeaderColor = clNone
154 RowAlternateColor = clNone
155 RowCurrentColor = clNone
156 TabOrder = -1
157 end
158 object IWDBNavigator1: TIWDBNavigator
159 Left = 239
160 Top = 296
161 Width = 120
162 Height = 28
163 Confirmations.Delete = 'Are you sure you want to delete this record?'
164 Confirmations.Post = 'Are you sure you want to update this record?'
165 Confirmations.Cancel = 'Are you sure you want to cancel your changes to this record?'
166 DataSource = user_info
167 FriendlyName = 'IWDBNavigator1'
168 ImageHeight = 24
169 ImageWidth = 24
170 VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast]
171 Orientation = orHorizontal
172 OnFirst = IWDBNavigator1First
173 OnPrior = IWDBNavigator1Prior
174 OnNext = IWDBNavigator1Next
175 OnLast = IWDBNavigator1Last
176 end
177 object IWButton5: TIWButton
178 Left = 136
179 Top = 352
180 Width = 75
181 Height = 25
182 Caption = #25972#29702
183 Color = clBtnFace
184 Font.Color = clNone
185 Font.Size = 10
186 Font.Style = []
187 FriendlyName = 'IWButton5'
188 TabOrder = 6
189 OnClick = IWButton5Click
190 end
191 object IWDBGrid2: TIWDBGrid
192 Left = 128
193 Top = 128
194 Width = 300
195 Height = 150
196 BorderColors.Color = clNone
197 BorderColors.Light = clNone
198 BorderColors.Dark = clNone
199 BGColor = clNone
200 BorderSize = 1
201 BorderStyle = tfDefault
202 Caption = 'IWDBGrid2'
203 CellPadding = 0
204 CellSpacing = 0
205 Font.Color = clNone
206 Font.Size = 10
207 Font.Style = []
208 FrameBuffer = 40
209 Lines = tlAll
210 OnRenderCell = IWDBGrid2RenderCell
211 UseFrame = True
212 UseSize = True
213 OnRender = IWDBGrid2Render
214 ScrollToCurrentRow = False
215 Columns = <
216 item
217 Alignment = taLeftJustify
218 BGColor = clNone
219 DoSubmitValidation = True
220 Font.Color = clNone
221 Font.Size = 10
222 Font.Style = []
223 Header = False
224 Height = '0'
225 ShowHint = True
226 VAlign = vaMiddle
227 Visible = True
228 Width = '0'
229 Wrap = False
230 RawText = False
231 Css = ''
232 BlobCharLimit = 0
233 CompareHighlight = hcNone
234 DataField = 'ORDER'
235 Title.Alignment = taCenter
236 Title.BGColor = clNone
237 Title.DoSubmitValidation = True
238 Title.Font.Color = clNone
239 Title.Font.Size = 10
240 Title.Font.Style = []
241 Title.Header = False
242 Title.Height = '0'
243 Title.ShowHint = True
244 Title.Text = #26085#20184
245 Title.VAlign = vaMiddle
246 Title.Visible = True
247 Title.Width = '0'
248 Title.Wrap = False
249 Title.RawText = True
250 end
251 item
252 Alignment = taLeftJustify
253 BGColor = clNone
254 DoSubmitValidation = True
255 Font.Color = clNone
256 Font.Size = 10
257 Font.Style = []
258 Header = False
259 Height = '0'
260 ShowHint = True
261 VAlign = vaMiddle
262 Visible = True
263 Width = '0'
264 Wrap = False
265 RawText = False
266 Css = ''
267 BlobCharLimit = 0
268 CompareHighlight = hcNone
269 DataField = 'NAME'
270 Title.Alignment = taCenter
271 Title.BGColor = clNone
272 Title.DoSubmitValidation = True
273 Title.Font.Color = clNone
274 Title.Font.Size = 10
275 Title.Font.Style = []
276 Title.Header = False
277 Title.Height = '0'
278 Title.ShowHint = True
279 Title.Text = #12372#27880#25991
280 Title.VAlign = vaMiddle
281 Title.Visible = True
282 Title.Width = '0'
283 Title.Wrap = False
284 Title.RawText = True
285 end
286 item
287 Alignment = taLeftJustify
288 BGColor = clNone
289 DoSubmitValidation = True
290 Font.Color = clNone
291 Font.Size = 10
292 Font.Style = []
293 Header = False
294 Height = '0'
295 ShowHint = True
296 VAlign = vaMiddle
297 Visible = True
298 Width = '0'
299 Wrap = False
300 RawText = False
301 Css = ''
302 BlobCharLimit = 0
303 CompareHighlight = hcNone
304 DataField = 'MAKER'
305 Title.Alignment = taCenter
306 Title.BGColor = clNone
307 Title.DoSubmitValidation = True
308 Title.Font.Color = clNone
309 Title.Font.Size = 10
310 Title.Font.Style = []
311 Title.Header = False
312 Title.Height = '0'
313 Title.ShowHint = True
314 Title.Text = #12513#12540#12459#12540
315 Title.VAlign = vaMiddle
316 Title.Visible = True
317 Title.Width = '0'
318 Title.Wrap = False
319 Title.RawText = True
320 end
321 item
322 Alignment = taLeftJustify
323 BGColor = clNone
324 DoSubmitValidation = True
325 Font.Color = clNone
326 Font.Size = 10
327 Font.Style = []
328 Header = False
329 Height = '0'
330 ShowHint = True
331 VAlign = vaMiddle
332 Visible = True
333 Width = '0'
334 Wrap = False
335 RawText = False
336 Css = ''
337 BlobCharLimit = 0
338 CompareHighlight = hcNone
339 DataField = 'VOLUME'
340 Title.Alignment = taCenter
341 Title.BGColor = clNone
342 Title.DoSubmitValidation = True
343 Title.Font.Color = clNone
344 Title.Font.Size = 10
345 Title.Font.Style = []
346 Title.Header = False
347 Title.Height = '0'
348 Title.ShowHint = True
349 Title.Text = #20491#25968
350 Title.VAlign = vaMiddle
351 Title.Visible = True
352 Title.Width = '0'
353 Title.Wrap = False
354 Title.RawText = True
355 end
356 item
357 Alignment = taLeftJustify
358 BGColor = clNone
359 DoSubmitValidation = True
360 Font.Color = clNone
361 Font.Size = 10
362 Font.Style = []
363 Header = False
364 Height = '0'
365 ShowHint = True
366 VAlign = vaMiddle
367 Visible = True
368 Width = '0'
369 Wrap = False
370 RawText = False
371 Css = ''
372 BlobCharLimit = 0
373 CompareHighlight = hcNone
374 Title.Alignment = taCenter
375 Title.BGColor = clNone
376 Title.DoSubmitValidation = True
377 Title.Font.Color = clNone
378 Title.Font.Size = 10
379 Title.Font.Style = []
380 Title.Header = False
381 Title.Height = '0'
382 Title.ShowHint = True
383 Title.Text = #30330#36865#28168#12415
384 Title.VAlign = vaMiddle
385 Title.Visible = True
386 Title.Width = '0'
387 Title.Wrap = False
388 Title.RawText = True
389 end>
390 DataSource = DataModule3.item_info
391 FooterRowCount = 0
392 FriendlyName = 'IWDBGrid2'
393 FromStart = True
394 HighlightColor = clNone
395 HighlightRows = False
396 Options = [dgShowTitles]
397 RefreshMode = rmAutomatic
398 RowLimit = 0
399 RollOver = False
400 RowClick = False
401 RollOverColor = clNone
402 RowHeaderColor = clNone
403 RowAlternateColor = clNone
404 RowCurrentColor = clNone
405 TabOrder = -1
406 end
407 object IWTemplateProcessorHTML1: TIWTemplateProcessorHTML
408 TagType = ttIntraWeb
409 Templates.Default = 'admin.htm'
410 Left = 264
411 Top = 200
412 end
413 object FDQuery1: TFDQuery
414 AfterScroll = FDQuery1AfterScroll
415 Connection = DataModule3.FDConnection1
416 SQL.Strings = (
417 'select id,address,email from order_data,user_info'
418 ' where order_data.number = user_info.number;')
419 Left = 456
420 Top = 192
421 end
422 object user_info: TDataSource
423 DataSet = FDQuery1
424 Left = 456
425 Top = 256
426 end
427 end

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