borrowfrm.~dfm

基于Interbase的图书管理系统

      Caption = #22270#20070#20449#24687#21345
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clPurple
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 1
      object Panel2: TPanel
        Left = 16
        Top = 24
        Width = 345
        Height = 73
        BevelInner = bvLowered
        BevelOuter = bvLowered
        Caption = 'Panel2'
        TabOrder = 0
        object Label2: TLabel
          Left = 24
          Top = 32
          Width = 81
          Height = 16
          AutoSize = False
          Caption = #24453#20511#20070#21495#65306
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clNavy
          Font.Height = -13
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object Edbookid: TEdit
          Left = 104
          Top = 24
          Width = 121
          Height = 28
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -16
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          MaxLength = 8
          ParentFont = False
          TabOrder = 0
          OnEnter = EdbookidEnter
          OnKeyPress = EdbookidKeyPress
        end
        object BtBbook: TBitBtn
          Left = 248
          Top = 24
          Width = 75
          Height = 25
          Cursor = crHandPoint
          Caption = #30830#35748
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clGreen
          Font.Height = -16
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
          TabOrder = 1
          OnClick = BtBbookClick
        end
      end
      object GroupBox5: TGroupBox
        Left = 16
        Top = 112
        Width = 129
        Height = 121
        Caption = #24453#20511#20070#30340#20070#21495
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clTeal
        Font.Height = -16
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 1
        object LBbookid: TListBox
          Left = 8
          Top = 24
          Width = 113
          Height = 89
          Cursor = crHandPoint
          Color = clInfoBk
          Ctl3D = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -16
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ItemHeight = 20
          ParentCtl3D = False
          ParentFont = False
          TabOrder = 0
          OnClick = LBbookidClick
        end
      end
      object GroupBox6: TGroupBox
        Left = 152
        Top = 112
        Width = 217
        Height = 241
        Caption = #22270#20070#20449#24687
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clTeal
        Font.Height = -16
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 2
        object Label7: TLabel
          Left = 24
          Top = 38
          Width = 36
          Height = 16
          AutoSize = False
          Caption = #20070#21517#65306
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clNavy
          Font.Height = -13
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object Label8: TLabel
          Left = 25
          Top = 79
          Width = 36
          Height = 16
          AutoSize = False
          Caption = #20316#32773#65306
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clNavy
          Font.Height = -13
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object Label9: TLabel
          Left = 20
          Top = 123
          Width = 61
          Height = 16
          AutoSize = False
          Caption = #20986#29256#31038#65306
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clNavy
          Font.Height = -13
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object Label10: TLabel
          Left = 16
          Top = 164
          Width = 73
          Height = 16
          AutoSize = False
          Caption = #24050#20511'('#26412'):'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clNavy
          Font.Height = -13
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object Label11: TLabel
          Left = 16
          Top = 206
          Width = 73
          Height = 16
          AutoSize = False
          Caption = #36824#21097'('#26412'):'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clNavy
          Font.Height = -13
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object DBE6: TDBEdit
          Left = 80
          Top = 34
          Width = 121
          Height = 22
          Cursor = crNo
          AutoSelect = False
          Color = clInfoBk
          Ctl3D = False
          DataField = 'BOOK_NAME'
          DataSource = DMbook.DSbook
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentCtl3D = False
          ParentFont = False
          ReadOnly = True
          TabOrder = 0
        end
        object DBE7: TDBEdit
          Left = 80
          Top = 75
          Width = 121
          Height = 22
          Cursor = crNo
          AutoSelect = False
          Color = clInfoBk
          Ctl3D = False
          DataField = 'BOOK_PENSTER'
          DataSource = DMbook.DSbook
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentCtl3D = False
          ParentFont = False
          ReadOnly = True
          TabOrder = 1
        end
        object DBE8: TDBEdit
          Left = 82
          Top = 118
          Width = 121
          Height = 22
          Cursor = crNo
          AutoSelect = False
          Color = clInfoBk
          Ctl3D = False
          DataField = 'BOOK_PUBLISH'
          DataSource = DMbook.DSbook
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentCtl3D = False
          ParentFont = False
          ReadOnly = True
          TabOrder = 2
        end
        object DBE9: TDBEdit
          Left = 82
          Top = 159
          Width = 121
          Height = 22
          Cursor = crNo
          AutoSelect = False
          Color = clInfoBk
          Ctl3D = False
          DataField = 'Book_borrowed'
          DataSource = DMbook.DSbook
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentCtl3D = False
          ParentFont = False
          ReadOnly = True
          TabOrder = 3
        end
        object DBE10: TDBEdit
          Left = 83
          Top = 201
          Width = 121
          Height = 22
          Cursor = crNo
          AutoSelect = False
          Color = clInfoBk
          Ctl3D = False
          DataField = 'BOOK_RESIDE'
          DataSource = DMbook.DSbook
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentCtl3D = False
          ParentFont = False
          ReadOnly = True
          TabOrder = 4
        end
      end
      object GroupBox7: TGroupBox
        Left = 16
        Top = 232
        Width = 129
        Height = 121
        Caption = #26085#26399#19982#20511#26399' '#36755#20837#26694
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clTeal
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 3
        object Label12: TLabel
          Left = 8
          Top = 93
          Width = 73
          Height = 16
          AutoSize = False
          Caption = #20511#26399'('#22825')'#65306
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clNavy
          Font.Height = -13
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object Label14: TLabel
          Left = 8
          Top = 27
          Width = 97
          Height = 16
          AutoSize = False
          Caption = #20511#20070#26085#26399#65306
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clNavy
          Font.Height = -13
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object Edday: TEdit
          Left = 80
          Top = 87
          Width = 41
          Height = 28
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -16
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
          ReadOnly = True
          TabOrder = 0
          Text = '7'
          OnKeyPress = EddayKeyPress
        end
        object DTPdate: TDateTimePicker
          Left = 5
          Top = 51
          Width = 121
          Height = 24
          Cursor = crHandPoint
          CalAlignment = dtaLeft
          Date = 37217.3234126157
          Time = 37217.3234126157
          DateFormat = dfShort
          DateMode = dmComboBox
          Enabled = False
          Kind = dtkDate
          ParseInput = False
          TabOrder = 1
          OnKeyPress = DTPdateKeyPress
        end
      end
    end
  end
end