huiyuankaunit.dfm

这是一个用DELPHI编写的信息系统,为KTV管理信息系统,对很多学习信息的同学有很大帮助

        Width = 97
        Height = 25
        Caption = #36864#20986
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -14
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 1
        OnClick = Button2Click
      end
      object DBEdit2: TDBEdit
        Left = 87
        Top = 74
        Width = 201
        Height = 24
        DataField = #21345#21495
        DataSource = DataSource1
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 2
      end
      object DBEdit3: TDBEdit
        Left = 87
        Top = 111
        Width = 97
        Height = 24
        DataField = #22995#21517
        DataSource = DataSource1
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 3
      end
      object DBComboBox1: TDBComboBox
        Left = 291
        Top = 111
        Width = 57
        Height = 24
        DataField = #24615#21035
        DataSource = DataSource1
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = #23435#20307
        Font.Style = []
        ItemHeight = 16
        Items.Strings = (
          #30007
          #22899)
        ParentFont = False
        TabOrder = 4
      end
      object DBEdit4: TDBEdit
        Left = 87
        Top = 148
        Width = 201
        Height = 24
        DataField = #22320#22336
        DataSource = DataSource1
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 5
      end
      object DBEdit5: TDBEdit
        Left = 87
        Top = 186
        Width = 201
        Height = 24
        DataField = #32852#31995#30005#35805
        DataSource = DataSource1
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 6
      end
      object DBComboBox2: TDBComboBox
        Left = 87
        Top = 223
        Width = 89
        Height = 24
        DataField = #29366#24577
        DataSource = DataSource1
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = #23435#20307
        Font.Style = []
        ItemHeight = 16
        Items.Strings = (
          #21457#34892
          #25346#22833
          #31105#29992
          #36807#26399)
        ParentFont = False
        TabOrder = 7
      end
      object DBComboBox3: TDBComboBox
        Left = 291
        Top = 223
        Width = 113
        Height = 24
        DataField = #31867#22411
        DataSource = DataSource1
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = #23435#20307
        Font.Style = []
        ItemHeight = 16
        Items.Strings = (
          #37329#21345
          #38134#21345
          #26222#36890#20250#21592#21345)
        ParentFont = False
        TabOrder = 8
      end
      object DBEdit6: TDBEdit
        Left = 87
        Top = 260
        Width = 97
        Height = 24
        DataField = #21457#21345#26085#26399
        DataSource = DataSource1
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 9
      end
      object DBEdit7: TDBEdit
        Left = 291
        Top = 260
        Width = 97
        Height = 24
        DataField = #25130#27490#26085#26399
        DataSource = DataSource1
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 10
      end
      object DBEdit8: TDBEdit
        Left = 87
        Top = 298
        Width = 97
        Height = 24
        DataField = #29983#26085
        DataSource = DataSource1
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 11
      end
      object DBEdit9: TDBEdit
        Left = 87
        Top = 335
        Width = 97
        Height = 24
        DataField = #32047#35745#28040#36153
        DataSource = DataSource1
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 12
      end
      object DBEdit10: TDBEdit
        Left = 87
        Top = 373
        Width = 97
        Height = 24
        DataField = #35777#20214#21517
        DataSource = DataSource1
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 13
      end
      object Button4: TButton
        Left = 552
        Top = 312
        Width = 75
        Height = 25
        Caption = #28155#21152#29031#29255
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -14
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 14
        OnClick = Button4Click
      end
      object DBEdit11: TDBEdit
        Left = 291
        Top = 297
        Width = 97
        Height = 24
        DataField = #31215#20998
        DataSource = DataSource1
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 15
      end
      object DBEdit12: TDBEdit
        Left = 291
        Top = 372
        Width = 166
        Height = 24
        DataField = #35777#20214#21495
        DataSource = DataSource1
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 16
      end
      object DBImage1: TDBImage
        Left = 471
        Top = 96
        Width = 217
        Height = 193
        DataField = #22270#29255
        DataSource = DataSource1
        TabOrder = 17
      end
    end
  end
  object DataSource1: TDataSource
    DataSet = Table1
    Left = 288
  end
  object Table1: TTable
    Active = True
    DatabaseName = 'mydb'
    TableName = #21345#21457#34892
    Left = 248
  end
  object Query1: TQuery
    DatabaseName = 'mydb'
    SQL.Strings = (
      'select *'
      'from '#21345#21457#34892
      'where '#21345#21495'=:cno')
    Left = 336
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'cno'
        ParamType = ptUnknown
      end>
  end
  object DataSource2: TDataSource
    DataSet = Query1
    Left = 376
  end
  object OpenPictureDialog1: TOpenPictureDialog
    Left = 496
    Top = 320
  end
end