StoreQuery.dfm
上传用户:tangpei45
上传日期:2013-07-14
资源大小:9104k
文件大小:3k
源码类别:

百货/超市行业

开发平台:

C++ Builder

  1. object fmStoreQuery: TfmStoreQuery
  2.   Left = 211
  3.   Top = 246
  4.   Width = 557
  5.   Height = 298
  6.   Caption = #24211#23384#26597#35810
  7.   Color = clBtnFace
  8.   Font.Charset = ANSI_CHARSET
  9.   Font.Color = clWindowText
  10.   Font.Height = -12
  11.   Font.Name = #23435#20307
  12.   Font.Style = []
  13.   FormStyle = fsMDIChild
  14.   OldCreateOrder = False
  15.   Position = poDefault
  16.   Visible = True
  17.   OnClose = FormClose
  18.   OnCreate = FormCreate
  19.   PixelsPerInch = 96
  20.   TextHeight = 12
  21.   object Panel1: TPanel
  22.     Left = 0
  23.     Top = 0
  24.     Width = 549
  25.     Height = 57
  26.     Align = alTop
  27.     TabOrder = 0
  28.     object Label1: TLabel
  29.       Left = 32
  30.       Top = 24
  31.       Width = 24
  32.       Height = 12
  33.       Caption = #36135#21495
  34.     end
  35.     object Label2: TLabel
  36.       Left = 152
  37.       Top = 24
  38.       Width = 48
  39.       Height = 12
  40.       Caption = #21830#21697#25340#38899
  41.     end
  42.     object Label3: TLabel
  43.       Left = 304
  44.       Top = 24
  45.       Width = 24
  46.       Height = 12
  47.       Caption = #20179#24211
  48.     end
  49.     object edGoodCode: TEdit
  50.       Left = 56
  51.       Top = 20
  52.       Width = 73
  53.       Height = 20
  54.       TabOrder = 0
  55.       Text = 'edGoodCode'
  56.     end
  57.     object edGoodPY: TEdit
  58.       Left = 200
  59.       Top = 20
  60.       Width = 73
  61.       Height = 20
  62.       TabOrder = 1
  63.       Text = 'edGoodPY'
  64.     end
  65.     object cboStore: TComboBox
  66.       Left = 328
  67.       Top = 20
  68.       Width = 97
  69.       Height = 20
  70.       ItemHeight = 12
  71.       TabOrder = 2
  72.       Text = 'cboStore'
  73.     end
  74.     object btQuery: TButton
  75.       Left = 448
  76.       Top = 16
  77.       Width = 75
  78.       Height = 25
  79.       Caption = #26597#35810
  80.       TabOrder = 3
  81.       OnClick = btQueryClick
  82.     end
  83.   end
  84.   object DBGrid1: TDBGrid
  85.     Left = 0
  86.     Top = 57
  87.     Width = 549
  88.     Height = 214
  89.     Align = alClient
  90.     DataSource = DataSource1
  91.     TabOrder = 1
  92.     TitleFont.Charset = ANSI_CHARSET
  93.     TitleFont.Color = clWindowText
  94.     TitleFont.Height = -12
  95.     TitleFont.Name = #23435#20307
  96.     TitleFont.Style = []
  97.     Columns = <
  98.       item
  99.         Expanded = False
  100.         FieldName = #36135#21495
  101.         Visible = True
  102.       end
  103.       item
  104.         Expanded = False
  105.         FieldName = #21697#21517
  106.         Width = 140
  107.         Visible = True
  108.       end
  109.       item
  110.         Expanded = False
  111.         FieldName = #21333#20301
  112.         Visible = True
  113.       end
  114.       item
  115.         Expanded = False
  116.         FieldName = #20179#24211
  117.         Width = 48
  118.         Visible = True
  119.       end
  120.       item
  121.         Expanded = False
  122.         FieldName = #24211#23384#25968#37327
  123.         Width = 56
  124.         Visible = True
  125.       end
  126.       item
  127.         Expanded = False
  128.         FieldName = #24211#23384#21333#20215
  129.         Width = 54
  130.         Visible = True
  131.       end
  132.       item
  133.         Expanded = False
  134.         FieldName = #24211#23384#37329#39069
  135.         Width = 57
  136.         Visible = True
  137.       end>
  138.   end
  139.   object Query1: TQuery
  140.     Active = True
  141.     DatabaseName = 'db'
  142.     SQL.Strings = (
  143.       
  144.         'select a.'#36135#21495',b.'#21697#21517','#25340#38899#32534#30721','#21333#20301','#20179#24211','#24211#23384#25968#37327','#24211#23384#21333#20215','#24211#23384#37329#39069' from '#24211#23384#24211' as a,'#21830#21697#28165#21333' as' +
  145.         ' b where a.'#36135#21495'=b.'#36135#21495)
  146.     Left = 520
  147.     Top = 128
  148.   end
  149.   object DataSource1: TDataSource
  150.     DataSet = Query1
  151.     Left = 512
  152.     Top = 88
  153.   end
  154. end