cw_snspgl.~dfm

结于初学者来说这对数据库是一个很好的例子

        end
        item
          Expanded = False
          FieldName = 'py'
          Title.Alignment = taCenter
          Title.Caption = #21161#35760#30721
          Width = 56
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'kc'
          Title.Alignment = taCenter
          Title.Caption = #24211#23384
          Visible = True
        end
        item
          Alignment = taCenter
          Expanded = False
          FieldName = 'dz'
          Title.Alignment = taCenter
          Title.Caption = #25171#25240
          Visible = True
        end>
    end
    object DBNavigator1: TDBNavigator
      Left = 16
      Top = 384
      Width = 396
      Height = 25
      DataSource = DS_xm
      VisibleButtons = [nbFirst, nbLast, nbDelete, nbPost, nbCancel, nbRefresh]
      TabOrder = 1
    end
  end
  object GroupBox2: TGroupBox
    Left = 440
    Top = 40
    Width = 241
    Height = 433
    Caption = #26032#22686#39033#30446
    TabOrder = 1
    object Label8: TLabel
      Left = 32
      Top = 40
      Width = 36
      Height = 12
      Caption = #32534#30721#65306
    end
    object Label9: TLabel
      Left = 32
      Top = 80
      Width = 36
      Height = 12
      Caption = #21517#31216#65306
    end
    object Label10: TLabel
      Left = 32
      Top = 120
      Width = 36
      Height = 12
      Caption = #31867#22411#65306
    end
    object Label11: TLabel
      Left = 32
      Top = 160
      Width = 36
      Height = 12
      Caption = #36827#20215#65306
    end
    object Label16: TLabel
      Left = 32
      Top = 200
      Width = 36
      Height = 12
      Caption = #21334#20215#65306
    end
    object Label12: TLabel
      Left = 32
      Top = 232
      Width = 36
      Height = 12
      Caption = #21333#20301#65306
    end
    object Label13: TLabel
      Left = 24
      Top = 272
      Width = 48
      Height = 12
      Caption = #21161#35760#30721#65306
    end
    object Label15: TLabel
      Left = 16
      Top = 312
      Width = 60
      Height = 12
      Caption = #20801#35768#24211#23384#65306
    end
    object Label14: TLabel
      Left = 17
      Top = 408
      Width = 208
      Height = 13
      AutoSize = False
      Caption = '*'#21161#35760#30721#20026#21830#21697#21517#31216#27721#23383#23567#20889#25340#38899#23383#22836'*'
    end
    object Label17: TLabel
      Left = 16
      Top = 352
      Width = 60
      Height = 12
      Caption = #20801#35768#25171#25240#65306
    end
    object SP_bm: TMaskEdit
      Left = 72
      Top = 32
      Width = 114
      Height = 20
      EditMask = '9999;1;_'
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      MaxLength = 4
      TabOrder = 0
      Text = '    '
      OnExit = SP_bmExit
      OnKeyPress = SP_bmKeyPress
    end
    object SP_mc: TEdit
      Left = 72
      Top = 72
      Width = 121
      Height = 20
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      TabOrder = 1
      OnExit = SP_mcExit
      OnKeyPress = SP_mcKeyPress
    end
    object SP_lx: TComboBox
      Left = 72
      Top = 112
      Width = 121
      Height = 20
      AutoDropDown = True
      Style = csDropDownList
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      ItemHeight = 12
      TabOrder = 2
      OnKeyPress = SP_lxKeyPress
    end
    object SP_dj: TMaskEdit
      Left = 72
      Top = 152
      Width = 121
      Height = 20
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      TabOrder = 3
      OnKeyPress = SP_djKeyPress
    end
    object sp_mj: TMaskEdit
      Left = 72
      Top = 192
      Width = 121
      Height = 20
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      TabOrder = 4
      OnKeyPress = sp_mjKeyPress
    end
    object SP_dw: TEdit
      Left = 72
      Top = 224
      Width = 121
      Height = 20
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      TabOrder = 5
      OnKeyPress = SP_dwKeyPress
    end
    object SP_py: TMaskEdit
      Left = 72
      Top = 264
      Width = 121
      Height = 20
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      TabOrder = 6
      OnKeyPress = SP_pyKeyPress
    end
    object sp_kc: TComboBox
      Left = 72
      Top = 304
      Width = 121
      Height = 20
      Style = csDropDownList
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      ItemHeight = 12
      TabOrder = 7
      OnKeyPress = sp_kcKeyPress
      Items.Strings = (
        #26159
        #21542)
    end
    object Button1: TButton
      Left = 88
      Top = 376
      Width = 75
      Height = 25
      Caption = #22686'    '#21152
      TabOrder = 8
      OnClick = Button1Click
    end
    object dz: TComboBox
      Left = 72
      Top = 344
      Width = 121
      Height = 20
      Style = csDropDownList
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      ItemHeight = 12
      TabOrder = 9
      OnKeyPress = dzKeyPress
      Items.Strings = (
        #26159
        #21542)
    end
  end
  object DS_xm: TDataSource
    DataSet = Table1
    Left = 112
    Top = 40
  end
  object Q_lb: TQuery
    Active = True
    DatabaseName = 'Hotel'
    SQL.Strings = (
      'select * from Sn_Dtype order by TypeNo')
    Left = 544
    Top = 32
  end
  object Q_repeat: TQuery
    DatabaseName = 'Hotel'
    Left = 632
    Top = 72
  end
  object T_sp: TTable
    Active = True
    DatabaseName = 'Hotel'
    TableName = 'Sn_menu'
    Left = 488
    Top = 8
  end
  object Q_sptypeno: TQuery
    DatabaseName = 'Hotel'
    Left = 648
    Top = 168
  end
  object Table1: TTable
    Active = True
    DatabaseName = 'Hotel'
    IndexFieldNames = 'MenuNo'
    TableName = 'Sn_menu'
    Left = 72
    Top = 40
  end
end