bookinsert.dfm

图书管理系统。可以实现简单的图书管理

object Form3: TForm3
  Left = 220
  Top = 138
  Width = 516
  Height = 394
  Caption = #20070#31821#20449#24687#28155#21152
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 8
    Top = 16
    Width = 481
    Height = 129
    Caption = #22522#26412#20449#24687
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -14
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    object Label1: TLabel
      Left = 36
      Top = 24
      Width = 56
      Height = 14
      Caption = 'ISBN'#21495#65306
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label2: TLabel
      Left = 36
      Top = 60
      Width = 63
      Height = 14
      Caption = #20070#31821#31867#21035':'
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label3: TLabel
      Left = 43
      Top = 96
      Width = 49
      Height = 14
      Caption = #20986#29256#31038':'
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label4: TLabel
      Left = 252
      Top = 24
      Width = 63
      Height = 14
      Caption = #20070#31821#21517#31216':'
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label5: TLabel
      Left = 248
      Top = 60
      Width = 63
      Height = 14
      Caption = #20316#32773#22995#21517':'
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label6: TLabel
      Left = 248
      Top = 96
      Width = 42
      Height = 14
      Caption = #25968#37327#65306
    end
    object Label7: TLabel
      Left = 352
      Top = 96
      Width = 42
      Height = 14
      Caption = #21333#20215#65306
    end
    object Edit1: TEdit
      Left = 100
      Top = 18
      Width = 121
      Height = 22
      Hint = 'sdsds'
      BevelInner = bvLowered
      BevelOuter = bvRaised
      Color = clHighlightText
      ParentShowHint = False
      ShowHint = True
      TabOrder = 0
      OnChange = Edit1Change
    end
    object Edit4: TEdit
      Left = 316
      Top = 18
      Width = 121
      Height = 22
      BevelInner = bvLowered
      BevelOuter = bvRaised
      Color = clHighlightText
      TabOrder = 1
    end
    object Edit5: TEdit
      Left = 316
      Top = 57
      Width = 121
      Height = 22
      BevelInner = bvLowered
      BevelOuter = bvRaised
      Color = clHighlightText
      TabOrder = 2
    end
    object ComboBox1: TComboBox
      Left = 100
      Top = 56
      Width = 121
      Height = 22
      ItemHeight = 14
      TabOrder = 3
      Items.Strings = (
        #38271#31687#23567#35828
        #30701#31687#23567#35828
        #21476#20856#21517#33879
        #35745#31639#26426
        #32442#32455
        #26426#26800
        #31649#29702)
    end
    object ComboBox2: TComboBox
      Left = 100
      Top = 96
      Width = 121
      Height = 22
      ItemHeight = 14
      TabOrder = 4
      Items.Strings = (
        #28165#21326#22823#23398#20986#29256#31038
        #20154#27665#37038#30005#20986#29256#31038
        #26426#26800#24037#19994#20986#29256#31038)
    end
    object Edit3: TEdit
      Left = 392
      Top = 96
      Width = 65
      Height = 22
      TabOrder = 5
    end
    object Edit2: TEdit
      Left = 288
      Top = 96
      Width = 49
      Height = 22
      Enabled = False
      TabOrder = 6
      Text = '0'
    end
  end
  object BitBtn1: TBitBtn
    Left = 104
    Top = 304
    Width = 75
    Height = 25
    Caption = #20445'   '#23384
    TabOrder = 1
    OnClick = BitBtn1Click
    Kind = bkYes
  end
  object BitBtn2: TBitBtn
    Left = 216
    Top = 304
    Width = 75
    Height = 25
    Caption = #36820'  '#22238' '
    TabOrder = 2
    OnClick = BitBtn2Click
    Kind = bkClose
  end
  object GroupBox2: TGroupBox
    Left = 16
    Top = 160
    Width = 473
    Height = 137
    Caption = #24211#23384#22270#20070#20449#24687
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 3
    object DBGrid1: TDBGrid
      Left = 16
      Top = 16
      Width = 441
      Height = 113
      DataSource = DataSource1
      TabOrder = 0
      TitleFont.Charset = GB2312_CHARSET
      TitleFont.Color = clBlack
      TitleFont.Height = -12
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
    end
  end
  object BitBtn3: TBitBtn
    Left = 328
    Top = 304
    Width = 75
    Height = 25
    Caption = #32534'  '#21495
    TabOrder = 4
    OnClick = BitBtn3Click
    Kind = bkIgnore
  end
  object DataSource1: TDataSource
    DataSet = DataModule1.ADOTable1
    Left = 32
    Top = 296
  end
end