Develop and Download Open Source Software

Browse Subversion Repository

Diff of /Unit11.dfm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 15 by yamat0jp, Fri Aug 5 10:33:26 2016 UTC revision 19 by yamat0jp, Sat Aug 27 13:22:00 2016 UTC
# Line 1  Line 1 
1  object AdminFile: TAdminFile  object AdminFile: TAdminFile
2    Left = 0    Left = 0
3    Top = 0    Top = 0
4    Width = 464    Width = 481
5    Height = 591    Height = 692
6    RenderInvisibleControls = True    RenderInvisibleControls = True
7    AllowPageAccess = True    AllowPageAccess = True
8    ConnectionMode = cmAny    ConnectionMode = cmAny
# Line 19  object AdminFile: TAdminFile Line 19  object AdminFile: TAdminFile
19    DesignLeft = 8    DesignLeft = 8
20    DesignTop = 8    DesignTop = 8
21    object IWGrid1: TIWGrid    object IWGrid1: TIWGrid
22      Left = 60      Left = 63
23      Top = 416      Top = 413
24      Width = 300      Width = 300
25      Height = 150      Height = 150
26      BorderColors.Color = clNone      BorderColors.Color = clNone
# Line 62  object AdminFile: TAdminFile Line 62  object AdminFile: TAdminFile
62      TabOrder = 8      TabOrder = 8
63      OnClick = IWButton2Click      OnClick = IWButton2Click
64    end    end
65      object IWFileUploader1: TIWFileUploader
66        Left = 29
67        Top = 503
68        Width = 400
69        Height = 60
70        TabOrder = 9
71        TextStrings.DragText = 'Drop files here to upload'
72        TextStrings.UploadButtonText = 'Upload a file'
73        TextStrings.CancelButtonText = 'Cancel'
74        TextStrings.UploadErrorText = 'Upload failed'
75        TextStrings.MultipleFileDropNotAllowedText = 'You may only drop a single file'
76        TextStrings.OfTotalText = 'of'
77        TextStrings.RemoveButtonText = 'Remove'
78        TextStrings.TypeErrorText =
79          '{file} has an invalid extension. Only {extensions} files are all' +
80          'owed.'
81        TextStrings.SizeErrorText = '{file} is too large, maximum file size is {sizeLimit}.'
82        TextStrings.MinSizeErrorText = '{file} is too small, minimum file size is {minSizeLimit}.'
83        TextStrings.EmptyErrorText = '{file} is empty, please select files again without it.'
84        TextStrings.NoFilesErrorText = 'No files to upload.'
85        TextStrings.OnLeaveWarningText =
86          'The files are being uploaded, if you leave now the upload will b' +
87          'e cancelled.'
88        Style.ButtonOptions.Alignment = taCenter
89        Style.ButtonOptions.Font.Color = clWebWHITE
90        Style.ButtonOptions.Font.FontFamily = 'Arial, Sans-Serif, Verdana'
91        Style.ButtonOptions.Font.Size = 10
92        Style.ButtonOptions.Font.Style = []
93        Style.ButtonOptions.FromColor = clWebMAROON
94        Style.ButtonOptions.ToColor = clWebMAROON
95        Style.ButtonOptions.Height = 30
96        Style.ButtonOptions.Width = 200
97        Style.ButtonHoverOptions.Alignment = taCenter
98        Style.ButtonHoverOptions.Font.Color = clWebWHITE
99        Style.ButtonHoverOptions.Font.FontFamily = 'Arial, Sans-Serif, Verdana'
100        Style.ButtonHoverOptions.Font.Size = 10
101        Style.ButtonHoverOptions.Font.Style = []
102        Style.ButtonHoverOptions.FromColor = 214
103        Style.ButtonHoverOptions.ToColor = 214
104        Style.ListOptions.Alignment = taLeftJustify
105        Style.ListOptions.Font.Color = clWebBLACK
106        Style.ListOptions.Font.FontFamily = 'Arial, Sans-Serif, Verdana'
107        Style.ListOptions.Font.Size = 10
108        Style.ListOptions.Font.Style = []
109        Style.ListOptions.FromColor = clWebGOLD
110        Style.ListOptions.ToColor = clWebGOLD
111        Style.ListOptions.Height = 30
112        Style.ListOptions.Width = 0
113        Style.ListSuccessOptions.Alignment = taLeftJustify
114        Style.ListSuccessOptions.Font.Color = clWebWHITE
115        Style.ListSuccessOptions.Font.FontFamily = 'Arial, Sans-Serif, Verdana'
116        Style.ListSuccessOptions.Font.Size = 10
117        Style.ListSuccessOptions.Font.Style = []
118        Style.ListSuccessOptions.FromColor = clWebFORESTGREEN
119        Style.ListSuccessOptions.ToColor = clWebFORESTGREEN
120        Style.ListErrorOptions.Alignment = taLeftJustify
121        Style.ListErrorOptions.Font.Color = clWebWHITE
122        Style.ListErrorOptions.Font.FontFamily = 'Arial, Sans-Serif, Verdana'
123        Style.ListErrorOptions.Font.Size = 10
124        Style.ListErrorOptions.Font.Style = []
125        Style.ListErrorOptions.FromColor = clWebRED
126        Style.ListErrorOptions.ToColor = clWebRED
127        Style.DropAreaOptions.Alignment = taCenter
128        Style.DropAreaOptions.Font.Color = clWebWHITE
129        Style.DropAreaOptions.Font.FontFamily = 'Arial, Sans-Serif, Verdana'
130        Style.DropAreaOptions.Font.Size = 10
131        Style.DropAreaOptions.Font.Style = []
132        Style.DropAreaOptions.FromColor = clWebDARKORANGE
133        Style.DropAreaOptions.ToColor = clWebDARKORANGE
134        Style.DropAreaOptions.Height = 60
135        Style.DropAreaOptions.Width = 0
136        Style.DropAreaActiveOptions.Alignment = taCenter
137        Style.DropAreaActiveOptions.Font.Color = clWebWHITE
138        Style.DropAreaActiveOptions.Font.FontFamily = 'Arial, Sans-Serif, Verdana'
139        Style.DropAreaActiveOptions.Font.Size = 10
140        Style.DropAreaActiveOptions.Font.Style = []
141        Style.DropAreaActiveOptions.FromColor = clWebLIMEGREEN
142        Style.DropAreaActiveOptions.ToColor = clWebLIMEGREEN
143        Style.DropAreaActiveOptions.Height = 60
144        Style.DropAreaActiveOptions.Width = 0
145        AutoUpload = False
146        CssClasses.Strings = (
147          'button='
148          'button-hover='
149          'drop-area='
150          'drop-area-active='
151          'drop-area-disabled='
152          'list='
153          'upload-spinner='
154          'progress-bar='
155          'upload-file='
156          'upload-size='
157          'upload-listItem='
158          'upload-cancel='
159          'upload-success='
160          'upload-fail='
161          'success-icon='
162          'fail-icon=')
163        FriendlyName = 'IWFileUploader1'
164        Font.Color = clNone
165        Font.Size = 10
166        Font.Style = []
167      end
168      object IWDBGrid1: TIWDBGrid
169        Left = 93
170        Top = 521
171        Width = 300
172        Height = 150
173        BorderColors.Color = clNone
174        BorderColors.Light = clNone
175        BorderColors.Dark = clNone
176        BGColor = clNone
177        BorderSize = 1
178        BorderStyle = tfDefault
179        Caption = #25215#35469#24453#12385#12524#12467#12540#12489
180        CellPadding = 0
181        CellSpacing = 0
182        Font.Color = clNone
183        Font.Size = 10
184        Font.Style = []
185        FrameBuffer = 40
186        Lines = tlAll
187        UseFrame = True
188        UseSize = True
189        ScrollToCurrentRow = False
190        Columns = <
191          item
192            Alignment = taLeftJustify
193            BGColor = clNone
194            DoSubmitValidation = True
195            Font.Color = clNone
196            Font.Size = 10
197            Font.Style = []
198            Header = False
199            Height = '0'
200            ShowHint = True
201            VAlign = vaMiddle
202            Visible = True
203            Width = '0'
204            Wrap = False
205            RawText = False
206            Css = ''
207            BlobCharLimit = 0
208            CompareHighlight = hcNone
209            DataField = 'NAME'
210            Title.Alignment = taCenter
211            Title.BGColor = clNone
212            Title.DoSubmitValidation = True
213            Title.Font.Color = clNone
214            Title.Font.Size = 10
215            Title.Font.Style = []
216            Title.Header = False
217            Title.Height = '0'
218            Title.ShowHint = True
219            Title.Text = 'NAME'
220            Title.VAlign = vaMiddle
221            Title.Visible = True
222            Title.Width = '0'
223            Title.Wrap = False
224            Title.RawText = True
225          end
226          item
227            Alignment = taLeftJustify
228            BGColor = clNone
229            DoSubmitValidation = True
230            Font.Color = clNone
231            Font.Size = 10
232            Font.Style = []
233            Header = False
234            Height = '0'
235            ShowHint = True
236            VAlign = vaMiddle
237            Visible = True
238            Width = '0'
239            Wrap = False
240            RawText = False
241            Css = ''
242            BlobCharLimit = 0
243            CompareHighlight = hcNone
244            DataField = 'PRICE'
245            Title.Alignment = taCenter
246            Title.BGColor = clNone
247            Title.DoSubmitValidation = True
248            Title.Font.Color = clNone
249            Title.Font.Size = 10
250            Title.Font.Style = []
251            Title.Header = False
252            Title.Height = '0'
253            Title.ShowHint = True
254            Title.Text = 'PRICE'
255            Title.VAlign = vaMiddle
256            Title.Visible = True
257            Title.Width = '0'
258            Title.Wrap = False
259            Title.RawText = True
260          end
261          item
262            Alignment = taLeftJustify
263            BGColor = clNone
264            DoSubmitValidation = True
265            Font.Color = clNone
266            Font.Size = 10
267            Font.Style = []
268            Header = False
269            Height = '0'
270            ShowHint = True
271            VAlign = vaMiddle
272            Visible = True
273            Width = '0'
274            Wrap = False
275            RawText = False
276            Css = ''
277            BlobCharLimit = 0
278            CompareHighlight = hcNone
279            DataField = 'DATE'
280            Title.Alignment = taCenter
281            Title.BGColor = clNone
282            Title.DoSubmitValidation = True
283            Title.Font.Color = clNone
284            Title.Font.Size = 10
285            Title.Font.Style = []
286            Title.Header = False
287            Title.Height = '0'
288            Title.ShowHint = True
289            Title.Text = 'DATE'
290            Title.VAlign = vaMiddle
291            Title.Visible = True
292            Title.Width = '0'
293            Title.Wrap = False
294            Title.RawText = True
295          end
296          item
297            Alignment = taLeftJustify
298            BGColor = clNone
299            DoSubmitValidation = True
300            Font.Color = clNone
301            Font.Size = 10
302            Font.Style = []
303            Header = False
304            Height = '0'
305            ShowHint = True
306            VAlign = vaMiddle
307            Visible = True
308            Width = '0'
309            Wrap = False
310            RawText = False
311            Css = ''
312            BlobCharLimit = 0
313            CompareHighlight = hcNone
314            DataField = 'THUMBNAIL'
315            Title.Alignment = taCenter
316            Title.BGColor = clNone
317            Title.DoSubmitValidation = True
318            Title.Font.Color = clNone
319            Title.Font.Size = 10
320            Title.Font.Style = []
321            Title.Header = False
322            Title.Height = '0'
323            Title.ShowHint = True
324            Title.Text = 'THUMBNAIL'
325            Title.VAlign = vaMiddle
326            Title.Visible = True
327            Title.Width = '0'
328            Title.Wrap = False
329            Title.RawText = True
330          end
331          item
332            Alignment = taLeftJustify
333            BGColor = clNone
334            DoSubmitValidation = True
335            Font.Color = clNone
336            Font.Size = 10
337            Font.Style = []
338            Header = False
339            Height = '0'
340            ShowHint = True
341            VAlign = vaMiddle
342            Visible = True
343            Width = '0'
344            Wrap = False
345            RawText = False
346            Css = ''
347            BlobCharLimit = 0
348            CompareHighlight = hcNone
349            DataField = 'MAKER'
350            Title.Alignment = taCenter
351            Title.BGColor = clNone
352            Title.DoSubmitValidation = True
353            Title.Font.Color = clNone
354            Title.Font.Size = 10
355            Title.Font.Style = []
356            Title.Header = False
357            Title.Height = '0'
358            Title.ShowHint = True
359            Title.Text = 'MAKER'
360            Title.VAlign = vaMiddle
361            Title.Visible = True
362            Title.Width = '0'
363            Title.Wrap = False
364            Title.RawText = True
365          end
366          item
367            Alignment = taLeftJustify
368            BGColor = clNone
369            DoSubmitValidation = True
370            Font.Color = clNone
371            Font.Size = 10
372            Font.Style = []
373            Header = False
374            Height = '0'
375            ShowHint = True
376            VAlign = vaMiddle
377            Visible = True
378            Width = '0'
379            Wrap = False
380            RawText = False
381            Css = ''
382            BlobCharLimit = 0
383            CompareHighlight = hcNone
384            DataField = 'CATEGORY'
385            Title.Alignment = taCenter
386            Title.BGColor = clNone
387            Title.DoSubmitValidation = True
388            Title.Font.Color = clNone
389            Title.Font.Size = 10
390            Title.Font.Style = []
391            Title.Header = False
392            Title.Height = '0'
393            Title.ShowHint = True
394            Title.Text = 'CATEGORY'
395            Title.VAlign = vaMiddle
396            Title.Visible = True
397            Title.Width = '0'
398            Title.Wrap = False
399            Title.RawText = True
400          end
401          item
402            Alignment = taLeftJustify
403            BGColor = clNone
404            DoSubmitValidation = True
405            Font.Color = clNone
406            Font.Size = 10
407            Font.Style = []
408            Header = False
409            Height = '0'
410            ShowHint = True
411            VAlign = vaMiddle
412            Visible = True
413            Width = '0'
414            Wrap = False
415            RawText = False
416            Css = ''
417            BlobCharLimit = 0
418            CompareHighlight = hcNone
419            DataField = 'STOCK'
420            Title.Alignment = taCenter
421            Title.BGColor = clNone
422            Title.DoSubmitValidation = True
423            Title.Font.Color = clNone
424            Title.Font.Size = 10
425            Title.Font.Style = []
426            Title.Header = False
427            Title.Height = '0'
428            Title.ShowHint = True
429            Title.Text = 'STOCK'
430            Title.VAlign = vaMiddle
431            Title.Visible = True
432            Title.Width = '0'
433            Title.Wrap = False
434            Title.RawText = True
435          end
436          item
437            Alignment = taLeftJustify
438            BGColor = clNone
439            DoSubmitValidation = True
440            Font.Color = clNone
441            Font.Size = 10
442            Font.Style = []
443            Header = False
444            Height = '0'
445            ShowHint = True
446            VAlign = vaMiddle
447            Visible = True
448            Width = '0'
449            Wrap = False
450            RawText = False
451            Css = ''
452            BlobCharLimit = 0
453            CompareHighlight = hcNone
454            DataField = 'WEIGHT'
455            Title.Alignment = taCenter
456            Title.BGColor = clNone
457            Title.DoSubmitValidation = True
458            Title.Font.Color = clNone
459            Title.Font.Size = 10
460            Title.Font.Style = []
461            Title.Header = False
462            Title.Height = '0'
463            Title.ShowHint = True
464            Title.Text = 'WEIGHT'
465            Title.VAlign = vaMiddle
466            Title.Visible = True
467            Title.Width = '0'
468            Title.Wrap = False
469            Title.RawText = True
470          end
471          item
472            Alignment = taLeftJustify
473            BGColor = clNone
474            DoSubmitValidation = True
475            Font.Color = clNone
476            Font.Size = 10
477            Font.Style = []
478            Header = False
479            Height = '0'
480            ShowHint = True
481            VAlign = vaMiddle
482            Visible = True
483            Width = '0'
484            Wrap = False
485            RawText = False
486            Css = ''
487            BlobCharLimit = 0
488            CompareHighlight = hcNone
489            DataField = 'COMMENT'
490            Title.Alignment = taCenter
491            Title.BGColor = clNone
492            Title.DoSubmitValidation = True
493            Title.Font.Color = clNone
494            Title.Font.Size = 10
495            Title.Font.Style = []
496            Title.Header = False
497            Title.Height = '0'
498            Title.ShowHint = True
499            Title.Text = 'COMMENT'
500            Title.VAlign = vaMiddle
501            Title.Visible = True
502            Title.Width = '0'
503            Title.Wrap = False
504            Title.RawText = True
505          end
506          item
507            Alignment = taLeftJustify
508            BGColor = clNone
509            DoSubmitValidation = True
510            Font.Color = clNone
511            Font.Size = 10
512            Font.Style = []
513            Header = False
514            Height = '0'
515            ShowHint = True
516            VAlign = vaMiddle
517            Visible = True
518            Width = '0'
519            Wrap = False
520            RawText = False
521            Css = ''
522            BlobCharLimit = 0
523            CompareHighlight = hcNone
524            DataField = 'AGREE'
525            Title.Alignment = taCenter
526            Title.BGColor = clNone
527            Title.DoSubmitValidation = True
528            Title.Font.Color = clNone
529            Title.Font.Size = 10
530            Title.Font.Style = []
531            Title.Header = False
532            Title.Height = '0'
533            Title.ShowHint = True
534            Title.Text = 'AGREE'
535            Title.VAlign = vaMiddle
536            Title.Visible = True
537            Title.Width = '0'
538            Title.Wrap = False
539            Title.RawText = True
540          end>
541        DataSource = DataSource1
542        FooterRowCount = 0
543        FriendlyName = 'IWDBGrid1'
544        FromStart = True
545        HighlightColor = clNone
546        HighlightRows = False
547        Options = [dgShowTitles]
548        RefreshMode = rmAutomatic
549        RowLimit = 0
550        RollOver = False
551        RowClick = False
552        RollOverColor = clNone
553        RowHeaderColor = clNone
554        RowAlternateColor = clNone
555        RowCurrentColor = clNone
556        TabOrder = -1
557      end
558    object IWRegion1: TIWRegion    object IWRegion1: TIWRegion
559      Left = 1      Left = 1
560      Top = 1      Top = 1
# Line 72  object AdminFile: TAdminFile Line 565  object AdminFile: TAdminFile
565      BorderOptions.BorderWidth = cbwNumeric      BorderOptions.BorderWidth = cbwNumeric
566      BorderOptions.Style = cbsSolid      BorderOptions.Style = cbsSolid
567      BorderOptions.Color = clNone      BorderOptions.Color = clNone
     object IWImage1: TIWImage  
       Left = 284  
       Top = 14  
       Width = 159  
       Height = 181  
       RenderSize = False  
       StyleRenderOptions.RenderSize = False  
       BorderOptions.Width = 0  
       TabOrder = -1  
       UseSize = False  
       Picture.Data = {  
         0954506E67496D61676589504E470D0A1A0A0000000D494844520000009F0000  
         00B50802000000CE4EBAE7000000017352474200AECE1CE90000000467414D41  
         0000B18F0BFC6105000000097048597300000EC300000EC301C76FA864000003  
         504944415478DAEDD841769A40008061BC4BEDA2CF13E0099203E408745937D9  
         65D95D3776198F9003D813C413F8B2487A17AA09C8308CA4B6D03E7FFF7FA502  
         238F0F066552966566D026EA8253979CBAE4D425A72E3975C9A94B4E5D72EA92  
         53979CBAE4D425A72E3975C9A94B4E5D72EA9253979CBAE4D425A72E3975C9A9  
         4B4E5D72EA9253979CBAE4D425A72E3975C9A94B4E5D72EA9253979CBAE4D425  
         A72E3975C9A94B4E5D72EA9253979CBAE406D3FDF17972BDCAF2E5CBE3970FAD  
         0FB375797F75C2403FBFCFA78B4DF5261ACF4E6B60DDC8E34F74FF6E430B1B54  
         375B2EB78BC5AC5151F7FF36ACEEBABC7D9E4F1F6EEACB3742AAAFEF7DFD736E  
         7BC3FD64BD1BF4EE695A6F5EEC964D9B29BC68AD7A98D75B4B524BC39D08772E  
         DAEC6C1B5AF7FE6AFF625B1DB51029FCBC3ACEB3A3C7B0ABBB43A90F79F5F640  
         13AEBC5BF6EDE363783A6DC3D556457CCABC2E0B5FBFBF73E7D3F0BAE1CBE655  
         74FCB22CF1497AB4C4AAED13A50FA3D9B2F3753D8B30778631749BC39D259C93  
         5BF48DD6D54D69674727E7B76BBCF36DCD20AD39B909303B8FA2DBBA53FE53DD  
         57A8BC7D5937843DBA800B35D148BAD5EC99E79BCD6CF899F9A86E0FE13B3333  
         E236DB6934DDC30459247F55453F71FA47FB6DDDC8A9F584A5BDEC6DEFF2E0D7  
         DF2AFAA73E7FBE3DFB0729E3E9D647B038F11F51E259D529F7DDF03B8AF5CBA7  
         AFD11FB4553DF0FAE6E13A1E24B8FB02EEBA97FC9C797F8A3CDD01087BBA20DD  
         EE5F61E64FA9A00BD2BDC0D425A72E3975C9A94B4E5D72EA9253979CBAE4D425  
         A72E3975C9A94B4E5D72EA9253979CBAE4D425A72E3975C9A94B4E5D72EA9253  
         979CBAE4D425A72E3975C9A94B4E5D72EA9253979CBAE4D425A72E3975C9A94B  
         4E5D72EA9253979CBAE4D425A72E3975C9A94B4E5D72EA9253979CBAE4D425A7  
         2E3975C9A94B4E5D72EA9253979CBAE4D425A72E3975C9A94B4E5D72EA925397  
         9CBAE4D425A72E3975C9A94B4E5D72EA9253979CBAE4D425A72E3975C9A94B4E  
         5D72EA9253979CBAE4D425A72E3975C9A94B4E5D72EA9253979CBAE4D425A72E  
         3975C9A94B4E5D72EA9253979CBAE4D425A72E3975C9A94B4E5D72EA9253979C  
         BAE4D425A72E3975C9A94B4E5D72EA9253979CBAE4D425A72E3975C9A94B4E5D  
         72EA9253979CBAE4D425A72E3975C9FD02598B44D3B431312C0000000049454E  
         44AE426082}  
       FriendlyName = 'IWImage1'  
       TransparentColor = clNone  
       JpegOptions.CompressionQuality = 90  
       JpegOptions.Performance = jpBestSpeed  
       JpegOptions.ProgressiveEncoding = False  
       JpegOptions.Smoothing = True  
     end  
568      object IWDBText1: TIWDBText      object IWDBText1: TIWDBText
569        Left = 148        Left = 148
570        Top = 17        Top = 17
# Line 139  object AdminFile: TAdminFile Line 583  object AdminFile: TAdminFile
583      end      end
584      object IWDBNavigator1: TIWDBNavigator      object IWDBNavigator1: TIWDBNavigator
585        Left = 43        Left = 43
586        Top = 335        Top = 327
587        Width = 300        Width = 300
588        Height = 28        Height = 28
589        Confirmations.Delete = 'Are you sure you want to delete this record?'        Confirmations.Delete = 'Are you sure you want to delete this record?'
# Line 151  object AdminFile: TAdminFile Line 595  object AdminFile: TAdminFile
595        ImageWidth = 24        ImageWidth = 24
596        VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbInsert, nbDelete, nbEdit, nbPost, nbCancel, nbRefresh]        VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbInsert, nbDelete, nbEdit, nbPost, nbCancel, nbRefresh]
597        Orientation = orHorizontal        Orientation = orHorizontal
598          OnEdit = IWDBNavigator1Edit
599        OnInsert = IWDBNavigator1Insert        OnInsert = IWDBNavigator1Insert
600        OnDelete = IWDBNavigator1Post        OnDelete = IWDBNavigator1Delete
601        OnPost = IWDBNavigator1Post        OnPost = IWDBNavigator1Post
602        OnBeforeAction = IWDBNavigator1BeforeAction        OnBeforeAction = IWDBNavigator1BeforeAction
603      end      end
# Line 166  object AdminFile: TAdminFile Line 611  object AdminFile: TAdminFile
611        Font.Style = []        Font.Style = []
612        FriendlyName = 'IWDBEdit6'        FriendlyName = 'IWDBEdit6'
613        SubmitOnAsyncEvent = True        SubmitOnAsyncEvent = True
614        TabOrder = 1        TabOrder = 0
615        AutoEditable = False        AutoEditable = False
616        DataField = 'WEIGHT'        DataField = 'WEIGHT'
617        PasswordPrompt = False        PasswordPrompt = False
# Line 258  object AdminFile: TAdminFile Line 703  object AdminFile: TAdminFile
703      end      end
704      object IWButton1: TIWButton      object IWButton1: TIWButton
705        Left = 284        Left = 284
706        Top = 144        Top = 145
707        Width = 75        Width = 59
708        Height = 25        Height = 25
709        Caption = 'IWButton1'        Caption = #35501#12415#36796#12415
710        Color = clBtnFace        Color = clBtnFace
711        Font.Color = clNone        Font.Color = clNone
712        Font.Size = 10        Font.Size = 10
# Line 342  object AdminFile: TAdminFile Line 787  object AdminFile: TAdminFile
787        FriendlyName = 'IWLabel6'        FriendlyName = 'IWLabel6'
788        Caption = #21830#21697#37325#37327        Caption = #21830#21697#37325#37327
789      end      end
790        object IWImage1: TIWImage
791          Left = 296
792          Top = 17
793          Width = 96
794          Height = 64
795          RenderSize = False
796          StyleRenderOptions.RenderSize = False
797          BorderOptions.Width = 0
798          TabOrder = -1
799          UseSize = False
800          FriendlyName = 'IWImage1'
801          TransparentColor = clNone
802          JpegOptions.CompressionQuality = 90
803          JpegOptions.Performance = jpBestSpeed
804          JpegOptions.ProgressiveEncoding = False
805          JpegOptions.Smoothing = True
806        end
807        object IWButton3: TIWButton
808          Left = 360
809          Top = 145
810          Width = 45
811          Height = 25
812          Caption = #21066#38500
813          Color = clBtnFace
814          Font.Color = clNone
815          Font.Size = 10
816          Font.Style = []
817          FriendlyName = 'IWButton3'
818          TabOrder = 10
819          OnClick = IWButton3Click
820        end
821        object IWDBCheckBox1: TIWDBCheckBox
822          Left = 80
823          Top = 280
824          Width = 121
825          Height = 21
826          Caption = #12450#12463#12486#12451#12502
827          Editable = True
828          Font.Color = clNone
829          Font.Size = 10
830          Font.Style = []
831          SubmitOnAsyncEvent = True
832          Style = stNormal
833          TabOrder = 11
834          AutoEditable = False
835          DataField = 'ACTIVATE'
836          DataSource = DataModule3.view
837          FriendlyName = 'IWDBCheckBox1'
838          ValueChecked = 'true'
839          ValueUnchecked = 'false'
840        end
841    end    end
842    object IWTemplateProcessorHTML1: TIWTemplateProcessorHTML    object IWTemplateProcessorHTML1: TIWTemplateProcessorHTML
843      TagType = ttIntraWeb      TagType = ttIntraWeb
# Line 349  object AdminFile: TAdminFile Line 845  object AdminFile: TAdminFile
845      Left = 288      Left = 288
846      Top = 432      Top = 432
847    end    end
   object FDGUIxLoginDialog1: TFDGUIxLoginDialog  
     Provider = 'Forms'  
     Left = 184  
     Top = 120  
   end  
848    object FileOpenDialog1: TFileOpenDialog    object FileOpenDialog1: TFileOpenDialog
849      FavoriteLinks = <>      FavoriteLinks = <>
850      FileTypes = <      FileTypes = <>
       item  
         DisplayName = 'png'  
         FileMask = '*.png'  
       end>  
851      Options = []      Options = []
852      Left = 336      Left = 337
853      Top = 232      Top = 113
854      end
855      object FDQuery1: TFDQuery
856        Connection = DataModule3.FDConnection1
857        SQL.Strings = (
858          'select * from item_Data where agree = false;')
859        Left = 424
860        Top = 600
861      end
862      object DataSource1: TDataSource
863        DataSet = FDQuery1
864        Left = 368
865        Top = 600
866    end    end
867  end  end

Legend:
Removed from v.15  
changed lines
  Added in v.19

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