reader.dfm

这是一个图书管理系统

object Form2: TForm2
  Left = 180
  Top = 100
  Width = 696
  Height = 548
  BorderIcons = [biSystemMenu, biMinimize]
  Caption = #35835#32773#31649#29702
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {
    0000010001002020000001000800A80800001600000028000000200000004000
    0000010008000000000000000000000000000000000000000000000000000000
    0000FFFFFF00FFCB6500CB98320098650000EEEEEE0066330000DDDDDD00FFFF
    9900CCCCCC00AAAAAA0077777700FFCC990088888800BBBBBB00555555004444
    4400111111003333330099999900222222000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000001515
    1515151515151515151515000000000000000015151515151515151515151515
    1515151515151515000000040303030303030300001515151515151515151515
    1500000015150000040303020202020202020203040015151515151515151515
    0004030300000403020202020203040404040202020300151515151515151500
    0403020202060302020202020403030202030402020204001515151515151500
    0302040302020302020202040302020202020304020203001515151515150004
    0204030202020202020204030202020202020406040402040015151515150003
    0204030204020202020304020202020202020202020204060015151515150003
    0206060402020202030406020202020202020202020202030400151515150008
    0202020202020202020202020C0C0C0C03020202020202020300151515151500
    08020202020002020202020C031201010F000302020202020300151515151500
    08020202030002020202020300000101100F0C03020202020400151515150001
    000808081104020202020203120B010101010803040202030015151515150001
    0100000005130402020202030101010201010803060404001015151515150001
    01010101010507040202020301010204020103020001070D0015151515150005
    010101010101050703020202030304060403020005070D001515151515150005
    0101010101010101070306020204060206040606070E00151515151515150005
    0101010101010101010703060606010402060100110015151515151515150005
    01010101010101010101010A04040101010B0015151515151515151515150007
    01010101010101010101010101010A0A0E010015150000000015151515151500
    0501010101010101010101100A0A010101011400000A0E090D00001515151500
    050101010101010101010101010101010F0F0A0E0705010105090B0015151500
    0701010101010101010101010101010D07070501010101010105090B00151515
    0005010101010101010101010101050501010101010101010101050B00151515
    0007010101010101010101010101010101010101010101010101050B00151515
    1500050101010101010101010101010101010101010101010105090015151515
    15150005010101010101010101010101010101010101010101050B0015151515
    1515150007010101010101010101010101010101010101010509001515151515
    1515151500000501010101010101010101010101010101090900151515151515
    1515151515150000070501010101010101010101050509000015151515151515
    1515151515151515000000070505050505050505000000151515151515151515
    151515151515151515151500000000000000000015151515151515151515FFF8
    07FFFFC001FFE30000FFC000007F8000003F8000003F0000001F0000001F0000
    000F0000000F8000000F8000000F0000001F0000001F0000001F0000003F0000
    007F000000FF000007FF0000061F800000078000000380000001C0000001C000
    0001E0000003F0000003F8000007FC00000FFF00001FFFC0007FFFF803FF}
  OldCreateOrder = False
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 13
  object Button1: TButton
    Left = 584
    Top = 440
    Width = 75
    Height = 25
    Caption = #28155'  '#21152
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 0
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 584
    Top = 488
    Width = 75
    Height = 25
    Caption = #20462'  '#25913
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 1
    OnClick = Button2Click
  end
  object Button3: TButton
    Left = 480
    Top = 488
    Width = 75
    Height = 25
    Caption = #21024'  '#38500
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 2
    OnClick = Button3Click
  end
  object Button4: TButton
    Left = 480
    Top = 440
    Width = 75
    Height = 25
    Caption = #20445'  '#23384
    Enabled = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 3
    OnClick = Button4Click
  end
  object Panel1: TPanel
    Left = 8
    Top = 8
    Width = 441
    Height = 473
    Caption = 'Panel1'
    TabOrder = 4
    object DBGrid1: TDBGrid
      Left = 8
      Top = 8
      Width = 425
      Height = 457
      Color = clInfoBk
      DataSource = DataModule1.DataSource1
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
      ParentFont = False
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clNavy
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
    end
  end
  object GroupBox2: TGroupBox
    Left = 464
    Top = 8
    Width = 201
    Height = 185
    Caption = #26597#35810#26694
    TabOrder = 5
    OnClick = GroupBox2Click
    object Label6: TLabel
      Left = 24
      Top = 104
      Width = 64
      Height = 16
      Caption = #26597#35810#20869#23481
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = #40657#20307
      Font.Style = []
      ParentFont = False
    end
    object Label7: TLabel
      Left = 24
      Top = 64
      Width = 64
      Height = 16
      Caption = #35814#32454#26597#35810
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = #40657#20307
      Font.Style = []
      ParentFont = False
    end
    object Label15: TLabel
      Left = 24
      Top = 24
      Width = 64
      Height = 16
      Caption = #20998#31867#26597#35810
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = #40657#20307
      Font.Style = []
      ParentFont = False
    end
    object Button5: TButton
      Left = 26
      Top = 144
      Width = 63
      Height = 25
      Caption = #21462'  '#28040
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 0
      OnClick = Button5Click
    end
    object Button6: TButton
      Left = 122
      Top = 144
      Width = 63
      Height = 25
      Caption = #30830'  '#23450
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 1
      OnClick = Button6Click
    end
    object Edit1: TEdit
      Left = 96
      Top = 104
      Width = 89
      Height = 21
      TabOrder = 2
      OnDragOver = Edit1DragOver
    end
    object ComboBox1: TComboBox
      Left = 96
      Top = 64
      Width = 89
      Height = 21
      Color = clInfoBk
      ItemHeight = 13
      TabOrder = 3
      Text = #23398#21495
      Items.Strings = (
        #23398#21495
        #22995#21517
        #32423#21035
        #19987#19994)
    end
    object ComboBox4: TComboBox
      Left = 96
      Top = 24
      Width = 89
      Height = 21
      Color = clInfoBk
      ItemHeight = 13
      TabOrder = 4
      Text = #25353#29677#32423#26597#35810
      OnChange = ComboBox4Change
      Items.Strings = (
        '2002'
        '2003'
        '2004'
        '2005'
        '2006'
        '2007'
        '2008')
    end
  end
  object GroupBox3: TGroupBox
    Left = 464
    Top = 200
    Width = 201
    Height = 217
    Caption = #23398#29983#20449#24687#24405#20837
    TabOrder = 6
    object Label8: TLabel
      Left = 24
      Top = 25
      Width = 32
      Height = 16
      Caption = #23398#21495
      FocusControl = DBEdit1
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = #40657#20307
      Font.Style = []
      ParentFont = False
    end
    object Label9: TLabel
      Left = 24
      Top = 57
      Width = 32
      Height = 16
      Caption = #22995#21517
      FocusControl = DBEdit2
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = #40657#20307
      Font.Style = []
      ParentFont = False
    end
    object Label10: TLabel
      Left = 24
      Top = 89
      Width = 32
      Height = 16
      Caption = #24615#21035
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = #40657#20307
      Font.Style = []
      ParentFont = False
    end
    object Label11: TLabel
      Left = 24
      Top = 121
      Width = 64
      Height = 16
      Caption = #20986#29983#24180#26376
      FocusControl = DBEdit4
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = #40657#20307
      Font.Style = []
      ParentFont = False
    end
    object Label12: TLabel
      Left = 24
      Top = 153
      Width = 32
      Height = 16
      Caption = #38498#31995
      FocusControl = DBEdit5
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = #40657#20307
      Font.Style = []
      ParentFont = False
    end
    object Label13: TLabel
      Left = 24
      Top = 185
      Width = 32
      Height = 16
      Caption = #19987#19994
      FocusControl = DBEdit6
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = #40657#20307
      Font.Style = []
      ParentFont = False
    end
    object Label14: TLabel
      Left = 104
      Top = 89
      Width = 32
      Height = 16
      Caption = #32423#21035
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = #40657#20307
      Font.Style = []
      ParentFont = False
    end
    object DBEdit1: TDBEdit
      Left = 72
      Top = 20
      Width = 108
      Height = 21
      Color = clInfoBk
      DataField = #23398#21495
      DataSource = DataModule1.DataSource1
      TabOrder = 0
    end
    object DBEdit2: TDBEdit
      Left = 72
      Top = 52
      Width = 105
      Height = 21
      Color = clInfoBk
      DataField = #22995#21517
      DataSource = DataModule1.DataSource1
      TabOrder = 1
    end
    object DBEdit4: TDBEdit
      Left = 96
      Top = 116
      Width = 81
      Height = 21
      Color = clInfoBk
      DataField = #20986#29983#24180#26376
      DataSource = DataModule1.DataSource1
      TabOrder = 2
    end
    object DBEdit5: TDBEdit
      Left = 64
      Top = 148
      Width = 113
      Height = 21
      Color = clInfoBk
      DataField = #38498#31995
      DataSource = DataModule1.DataSource1
      TabOrder = 3
    end
    object DBEdit6: TDBEdit
      Left = 64
      Top = 180
      Width = 113
      Height = 21
      Color = clInfoBk
      DataField = #19987#19994
      DataSource = DataModule1.DataSource1
      TabOrder = 4
    end
    object DBCombobox1: TDBComboBox
      Left = 64
      Top = 84
      Width = 33
      Height = 21
      Color = clInfoBk
      DataField = #24615#21035
      DataSource = DataModule1.DataSource1
      ItemHeight = 13
      Items.Strings = (
        #30007
        #22899)
      TabOrder = 5
    end
    object DBComboBox2: TDBComboBox
      Left = 136
      Top = 84
      Width = 57
      Height = 21
      Color = clInfoBk
      DataField = #32423#21035
      DataSource = DataModule1.DataSource1
      ItemHeight = 13
      Items.Strings = (
        '2002'
        '2003'
        '2004'
        '2005'
        '2006'
        '2007'
        '2008')
      TabOrder = 6
    end
  end
  object Button7: TButton
    Left = 376
    Top = 488
    Width = 75
    Height = 25
    Caption = #21462' '#28040
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 7
    OnClick = Button7Click
  end
end