addbooktolist.dfm

现在家庭藏书越来越多

  OldCreateOrder = False
  Position = poDesktopCenter
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 13
  object lbl1: TLabel
    Left = 8
    Top = 16
    Width = 48
    Height = 16
    Caption = #25152#23646#31867#21035
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object lbl2: TLabel
    Left = 176
    Top = 16
    Width = 24
    Height = 16
    Caption = #32534#21495
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object lbl3: TLabel
    Left = 24
    Top = 56
    Width = 24
    Height = 16
    Caption = #20070#21517
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object lbl4: TLabel
    Left = 24
    Top = 96
    Width = 24
    Height = 16
    Caption = #20316#32773
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object lbl5: TLabel
    Left = 168
    Top = 96
    Width = 36
    Height = 16
    Caption = #20986#29256#31038
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object lbl6: TLabel
    Left = 24
    Top = 136
    Width = 24
    Height = 16
    Caption = #37329#39069
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object lbl7: TLabel
    Left = 16
    Top = 160
    Width = 330
    Height = 13
    Caption = 
      '----------------------------------------------------------------' +
      '----------------------------------------------'
  end
  object cbb1: TComboBox
    Left = 64
    Top = 12
    Width = 105
    Height = 21
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ItemHeight = 13
    ParentFont = False
    TabOrder = 0
    OnChange = cbb1Change
    Items.Strings = (
      #35745#31639#26426
      #38750#35745#31639#26426)
  end
  object edt1: TEdit
    Left = 216
    Top = 12
    Width = 113
    Height = 21
    Enabled = False
    ReadOnly = True
    TabOrder = 1
  end
  object edt2: TEdit
    Left = 64
    Top = 52
    Width = 265
    Height = 21
    TabOrder = 2
  end
  object edt3: TEdit
    Left = 64
    Top = 92
    Width = 105
    Height = 21
    TabOrder = 3
  end
  object edt4: TEdit
    Left = 216
    Top = 92
    Width = 113
    Height = 21
    TabOrder = 4
  end
  object edt5: TEdit
    Left = 64
    Top = 132
    Width = 105
    Height = 21
    TabOrder = 5
  end
  object chk1: TCheckBox
    Left = 184
    Top = 134
    Width = 105
    Height = 17
    Caption = #26377#26080#20809#30424
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 6
  end
  object btn1: TButton
    Left = 288
    Top = 176
    Width = 57
    Height = 25
    Caption = #28155#21152
    TabOrder = 7
    OnClick = btn1Click
  end
  object ADOTable1: TADOTable
    Left = 176
    Top = 40
  end
end