Develop and Download Open Source Software

zencart-clone

Browse Subversion Repository

/[zencart-clone]/Unit5.dfm

Diff of /Unit5.dfm

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

revision 13 by yamat0jp, Tue Jul 26 09:17:38 2016 UTC revision 14 by yamat0jp, Fri Jul 29 10:50:16 2016 UTC
# Line 71  object AdminPage: TAdminPage Line 71  object AdminPage: TAdminPage
71      TabOrder = 3      TabOrder = 3
72      OnClick = IWButton4Click      OnClick = IWButton4Click
73    end    end
   object IWGrid1: TIWGrid  
     Left = 128  
     Top = 128  
     Width = 300  
     Height = 150  
     BorderColors.Color = clNone  
     BorderColors.Light = clNone  
     BorderColors.Dark = clNone  
     BGColor = clNone  
     BorderSize = 1  
     BorderStyle = tfDefault  
     Caption = 'IWGrid1'  
     CellPadding = 0  
     CellSpacing = 0  
     Font.Color = clNone  
     Font.Size = 10  
     Font.Style = []  
     FrameBuffer = 40  
     Lines = tlAll  
     UseFrame = False  
     UseSize = True  
     OnRender = IWGrid1Render  
     FriendlyName = 'IWGrid1'  
     ColumnCount = 5  
     RowCount = 1  
     ShowEmptyCells = True  
     ShowInvisibleRows = True  
     ScrollToCurrentRow = False  
   end  
74    object IWCheckBox1: TIWCheckBox    object IWCheckBox1: TIWCheckBox
75      Left = 224      Left = 224
76      Top = 173      Top = 173
# Line 114  object AdminPage: TAdminPage Line 85  object AdminPage: TAdminPage
85      SubmitOnAsyncEvent = True      SubmitOnAsyncEvent = True
86      Style = stNormal      Style = stNormal
87      TabOrder = 4      TabOrder = 4
     OnChange = IWCheckBox1Change  
88      Checked = False      Checked = False
89      FriendlyName = 'IWCheckBox1'      FriendlyName = 'IWCheckBox1'
90    end    end
91    object IWDBLabel1: TIWDBLabel    object IWDBLabel1: TIWDBLabel
92      Left = 280      Left = 239
93      Top = 78      Top = 78
94      Width = 13      Width = 13
95      Height = 16      Height = 16
# Line 128  object AdminPage: TAdminPage Line 98  object AdminPage: TAdminPage
98      Font.Style = []      Font.Style = []
99      HasTabOrder = False      HasTabOrder = False
100      DataField = 'ID'      DataField = 'ID'
101      DataSource = DataModule3.user_info      DataSource = user_info
102      FriendlyName = 'IWDBLabel1'      FriendlyName = 'IWDBLabel1'
103    end    end
104    object IWDBLabel2: TIWDBLabel    object IWDBLabel2: TIWDBLabel
# Line 141  object AdminPage: TAdminPage Line 111  object AdminPage: TAdminPage
111      Font.Style = []      Font.Style = []
112      HasTabOrder = False      HasTabOrder = False
113      DataField = 'ADDRESS'      DataField = 'ADDRESS'
114      DataSource = DataModule3.user_info      DataSource = user_info
115      FriendlyName = 'IWDBLabel2'      FriendlyName = 'IWDBLabel2'
116    end    end
117    object IWDBGrid1: TIWDBGrid    object IWDBGrid1: TIWDBGrid
# Line 167  object AdminPage: TAdminPage Line 137  object AdminPage: TAdminPage
137      UseSize = True      UseSize = True
138      ScrollToCurrentRow = False      ScrollToCurrentRow = False
139      Columns = <>      Columns = <>
140      DataSource = DataModule3.user_info      DataSource = user_info
141      FooterRowCount = 0      FooterRowCount = 0
142      FriendlyName = 'IWDBGrid1'      FriendlyName = 'IWDBGrid1'
143      FromStart = True      FromStart = True
# Line 192  object AdminPage: TAdminPage Line 162  object AdminPage: TAdminPage
162      Confirmations.Delete = 'Are you sure you want to delete this record?'      Confirmations.Delete = 'Are you sure you want to delete this record?'
163      Confirmations.Post = 'Are you sure you want to update this record?'      Confirmations.Post = 'Are you sure you want to update this record?'
164      Confirmations.Cancel = 'Are you sure you want to cancel your changes to this record?'      Confirmations.Cancel = 'Are you sure you want to cancel your changes to this record?'
165      DataSource = DataModule3.order      DataSource = user_info
166      FriendlyName = 'IWDBNavigator1'      FriendlyName = 'IWDBNavigator1'
167      ImageHeight = 24      ImageHeight = 24
168      ImageWidth = 24      ImageWidth = 24
169      VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast]      VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast]
170      Orientation = orHorizontal      Orientation = orHorizontal
171        OnFirst = IWDBNavigator1First
172        OnPrior = IWDBNavigator1Prior
173        OnNext = IWDBNavigator1Next
174        OnLast = IWDBNavigator1Last
175    end    end
176    object IWButton5: TIWButton    object IWButton5: TIWButton
177      Left = 136      Left = 136
# Line 213  object AdminPage: TAdminPage Line 187  object AdminPage: TAdminPage
187      TabOrder = 6      TabOrder = 6
188      OnClick = IWButton5Click      OnClick = IWButton5Click
189    end    end
190      object IWDBGrid2: TIWDBGrid
191        Left = 128
192        Top = 128
193        Width = 300
194        Height = 150
195        BorderColors.Color = clNone
196        BorderColors.Light = clNone
197        BorderColors.Dark = clNone
198        BGColor = clNone
199        BorderSize = 1
200        BorderStyle = tfDefault
201        Caption = 'IWDBGrid2'
202        CellPadding = 0
203        CellSpacing = 0
204        Font.Color = clNone
205        Font.Size = 10
206        Font.Style = []
207        FrameBuffer = 40
208        Lines = tlAll
209        UseFrame = True
210        UseSize = True
211        ScrollToCurrentRow = False
212        Columns = <
213          item
214            Alignment = taLeftJustify
215            BGColor = clNone
216            DoSubmitValidation = True
217            Font.Color = clNone
218            Font.Size = 10
219            Font.Style = []
220            Header = False
221            Height = '0'
222            ShowHint = True
223            VAlign = vaMiddle
224            Visible = True
225            Width = '0'
226            Wrap = False
227            RawText = False
228            Css = ''
229            BlobCharLimit = 0
230            CompareHighlight = hcNone
231            DataField = 'ORDER'
232            Title.Alignment = taCenter
233            Title.BGColor = clNone
234            Title.DoSubmitValidation = True
235            Title.Font.Color = clNone
236            Title.Font.Size = 10
237            Title.Font.Style = []
238            Title.Header = False
239            Title.Height = '0'
240            Title.ShowHint = True
241            Title.Text = #26085#20184
242            Title.VAlign = vaMiddle
243            Title.Visible = True
244            Title.Width = '0'
245            Title.Wrap = False
246            Title.RawText = True
247          end
248          item
249            Alignment = taLeftJustify
250            BGColor = clNone
251            DoSubmitValidation = True
252            Font.Color = clNone
253            Font.Size = 10
254            Font.Style = []
255            Header = False
256            Height = '0'
257            ShowHint = True
258            VAlign = vaMiddle
259            Visible = True
260            Width = '0'
261            Wrap = False
262            RawText = False
263            Css = ''
264            BlobCharLimit = 0
265            CompareHighlight = hcNone
266            DataField = 'NAME'
267            Title.Alignment = taCenter
268            Title.BGColor = clNone
269            Title.DoSubmitValidation = True
270            Title.Font.Color = clNone
271            Title.Font.Size = 10
272            Title.Font.Style = []
273            Title.Header = False
274            Title.Height = '0'
275            Title.ShowHint = True
276            Title.Text = #12372#27880#25991
277            Title.VAlign = vaMiddle
278            Title.Visible = True
279            Title.Width = '0'
280            Title.Wrap = False
281            Title.RawText = True
282          end
283          item
284            Alignment = taLeftJustify
285            BGColor = clNone
286            DoSubmitValidation = True
287            Font.Color = clNone
288            Font.Size = 10
289            Font.Style = []
290            Header = False
291            Height = '0'
292            ShowHint = True
293            VAlign = vaMiddle
294            Visible = True
295            Width = '0'
296            Wrap = False
297            RawText = False
298            Css = ''
299            BlobCharLimit = 0
300            CompareHighlight = hcNone
301            DataField = 'MAKER'
302            Title.Alignment = taCenter
303            Title.BGColor = clNone
304            Title.DoSubmitValidation = True
305            Title.Font.Color = clNone
306            Title.Font.Size = 10
307            Title.Font.Style = []
308            Title.Header = False
309            Title.Height = '0'
310            Title.ShowHint = True
311            Title.Text = #12513#12540#12459#12540
312            Title.VAlign = vaMiddle
313            Title.Visible = True
314            Title.Width = '0'
315            Title.Wrap = False
316            Title.RawText = True
317          end
318          item
319            Alignment = taLeftJustify
320            BGColor = clNone
321            DoSubmitValidation = True
322            Font.Color = clNone
323            Font.Size = 10
324            Font.Style = []
325            Header = False
326            Height = '0'
327            ShowHint = True
328            VAlign = vaMiddle
329            Visible = True
330            Width = '0'
331            Wrap = False
332            RawText = False
333            Css = ''
334            BlobCharLimit = 0
335            CompareHighlight = hcNone
336            DataField = 'VOLUME'
337            Title.Alignment = taCenter
338            Title.BGColor = clNone
339            Title.DoSubmitValidation = True
340            Title.Font.Color = clNone
341            Title.Font.Size = 10
342            Title.Font.Style = []
343            Title.Header = False
344            Title.Height = '0'
345            Title.ShowHint = True
346            Title.Text = #20491#25968
347            Title.VAlign = vaMiddle
348            Title.Visible = True
349            Title.Width = '0'
350            Title.Wrap = False
351            Title.RawText = True
352          end
353          item
354            Alignment = taLeftJustify
355            BGColor = clNone
356            DoSubmitValidation = True
357            Font.Color = clNone
358            Font.Size = 10
359            Font.Style = []
360            Header = False
361            Height = '0'
362            ShowHint = True
363            VAlign = vaMiddle
364            Visible = True
365            Width = '0'
366            Wrap = False
367            RawText = False
368            Css = ''
369            BlobCharLimit = 0
370            CompareHighlight = hcNone
371            DataField = 'CHECKVALUE'
372            LinkField = 'CHECKVALUE'
373            Title.Alignment = taCenter
374            Title.BGColor = clNone
375            Title.DoSubmitValidation = True
376            Title.Font.Color = clNone
377            Title.Font.Size = 10
378            Title.Font.Style = []
379            Title.Header = False
380            Title.Height = '0'
381            Title.ShowHint = True
382            Title.Text = #30330#36865#28168#12415
383            Title.VAlign = vaMiddle
384            Title.Visible = True
385            Title.Width = '0'
386            Title.Wrap = False
387            Title.RawText = True
388          end>
389        DataSource = DataModule3.item_info
390        FooterRowCount = 0
391        FriendlyName = 'IWDBGrid2'
392        FromStart = True
393        HighlightColor = clNone
394        HighlightRows = False
395        Options = [dgShowTitles]
396        RefreshMode = rmAutomatic
397        RowLimit = 0
398        RollOver = False
399        RowClick = False
400        RollOverColor = clNone
401        RowHeaderColor = clNone
402        RowAlternateColor = clNone
403        RowCurrentColor = clNone
404        TabOrder = -1
405      end
406    object IWTemplateProcessorHTML1: TIWTemplateProcessorHTML    object IWTemplateProcessorHTML1: TIWTemplateProcessorHTML
407      TagType = ttIntraWeb      TagType = ttIntraWeb
408      Templates.Default = 'admin.htm'      Templates.Default = 'admin.htm'
409      Left = 264      Left = 264
410      Top = 200      Top = 200
411    end    end
412      object FDQuery1: TFDQuery
413        AfterScroll = FDQuery1AfterScroll
414        Connection = DataModule3.FDConnection1
415        SQL.Strings = (
416          'select id,address,email from order_data,user_info'
417          ' where order_data.number = user_info.number;')
418        Left = 456
419        Top = 192
420      end
421      object user_info: TDataSource
422        DataSet = FDQuery1
423        Left = 456
424        Top = 256
425      end
426  end  end
Legend:
Removed from v.13  
changed lines
  Added in v.14
Back to OSDN">Back to OSDN
 ViewVC Help
Powered by ViewVC 1.1.26  
About OSDN
Find Software
Develop Software
Help