closeidfrm.~dfm

基于Interbase的图书管理系统

            Font.Color = clBlack
            Font.Height = -16
            Font.Name = 'MS Sans Serif'
            Font.Style = [fsBold]
            MaxLength = 14
            ParentFont = False
            TabOrder = 0
            OnKeyPress = EdreaderidKeyPress
          end
          object BtBreaderno: TBitBtn
            Left = 256
            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 = BtBreadernoClick
          end
        end
      end
    end
  end
  object Panel3: TPanel [3]
    Left = 429
    Top = 0
    Width = 361
    Height = 435
    Align = alClient
    BevelOuter = bvNone
    Caption = 'Panel3'
    TabOrder = 1
    object Splitter2: TSplitter
      Left = 0
      Top = 281
      Width = 361
      Height = 4
      Cursor = crVSplit
      Align = alTop
    end
    object GroupBox6: TGroupBox
      Left = 0
      Top = 0
      Width = 361
      Height = 281
      Align = alTop
      Caption = #22270#20070#20449#24687
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clPurple
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 0
      object Label8: TLabel
        Left = 38
        Top = 78
        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 Label9: TLabel
        Left = 39
        Top = 119
        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 Label10: TLabel
        Left = 34
        Top = 163
        Width = 63
        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 Label11: TLabel
        Left = 38
        Top = 36
        Width = 73
        Height = 16
        AutoSize = False
        Caption = #20070#21495#65306
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clNavy
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Label12: TLabel
        Left = 6
        Top = 206
        Width = 99
        Height = 16
        AutoSize = False
        Caption = #24211#23384#25968#37327'('#26412')'#65306
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clNavy
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Label7: TLabel
        Left = 14
        Top = 246
        Width = 83
        Height = 16
        AutoSize = False
        Caption = #20837#24211#26085#26399#65306
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clNavy
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object DBE6: TDBEdit
        Left = 107
        Top = 31
        Width = 143
        Height = 22
        Cursor = crNo
        AutoSelect = False
        Color = clInfoBk
        Ctl3D = False
        DataField = 'BOOK_ID'
        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 = 107
        Top = 79
        Width = 143
        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 = 1
      end
      object DBE8: TDBEdit
        Left = 107
        Top = 119
        Width = 143
        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 = 2
      end
      object DBE9: TDBEdit
        Left = 107
        Top = 159
        Width = 143
        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 = 3
      end
      object DBE10: TDBEdit
        Left = 107
        Top = 199
        Width = 143
        Height = 22
        Cursor = crNo
        AutoSelect = False
        Color = clInfoBk
        Ctl3D = False
        DataField = 'BOOK_NUMBER'
        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
      object DBE11: TDBEdit
        Left = 107
        Top = 239
        Width = 143
        Height = 22
        Cursor = crNo
        AutoSelect = False
        Color = clInfoBk
        Ctl3D = False
        DataField = 'BOOK_DATE'
        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 = 5
      end
    end
    object GBoption: TGroupBox
      Left = 0
      Top = 285
      Width = 361
      Height = 150
      Align = alClient
      Caption = #25805#20316#25353#38062#26694
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clPurple
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 1
      object PC2: TPageControl
        Left = 32
        Top = 28
        Width = 305
        Height = 109
        ActivePage = TabSheet3
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clLime
        Font.Height = -16
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        MultiLine = True
        ParentFont = False
        Style = tsButtons
        TabIndex = 0
        TabOrder = 0
        object TabSheet3: TTabSheet
          Caption = #26159#36951#22833#20511#20070#35777
          object Panel4: TPanel
            Left = 0
            Top = 8
            Width = 257
            Height = 57
            BevelOuter = bvLowered
            Color = clInfoBk
            TabOrder = 0
            object BtBcancel1: TBitBtn
              Left = 152
              Top = 16
              Width = 75
              Height = 25
              Cursor = crHandPoint
              Caption = #21462#28040
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clGreen
              Font.Height = -16
              Font.Name = 'MS Sans Serif'
              Font.Style = [fsBold]
              ParentFont = False
              TabOrder = 0
              OnClick = BtBcancel1Click
            end
            object BtBcloseid: TBitBtn
              Left = 16
              Top = 16
              Width = 97
              Height = 25
              Cursor = crHandPoint
              Caption = #31049#21150#20511#20070#35777
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clGreen
              Font.Height = -16
              Font.Name = 'MS Sans Serif'
              Font.Style = [fsBold]
              ParentFont = False
              TabOrder = 1
              OnClick = BtBcloseidClick
            end
          end
        end
        object TabSheet4: TTabSheet
          Caption = #26159#36864#20511#20070#35777
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clLime
          Font.Height = -16
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ImageIndex = 1
          ParentFont = False
          object Panel5: TPanel
            Left = 0
            Top = 8
            Width = 257
            Height = 57
            BevelOuter = bvLowered
            Color = clMoneyGreen
            TabOrder = 0
            object BtBgoid: TBitBtn
              Left = 24
              Top = 16
              Width = 89
              Height = 25
              Cursor = crHandPoint
              Caption = #36864#20511#20070#35777
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clGreen
              Font.Height = -16
              Font.Name = 'MS Sans Serif'
              Font.Style = [fsBold]
              ParentFont = False
              TabOrder = 0
              OnClick = BtBgoidClick
            end
            object BtBcancel2: TBitBtn
              Left = 160
              Top = 16
              Width = 75
              Height = 25
              Cursor = crHandPoint
              Caption = #21462#28040
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clGreen
              Font.Height = -16
              Font.Name = 'MS Sans Serif'
              Font.Style = [fsBold]
              ParentFont = False
              TabOrder = 1
              OnClick = BtBcancel1Click
            end
          end
        end
      end
    end
  end
end