book.dfm

图书借阅管理系统

object Form4: TForm4
  Left = 234
  Top = 147
  Width = 696
  Height = 548
  BorderIcons = [biSystemMenu, biMinimize]
  Caption = #22270#20070#31649#29702
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {
    0000010001001818000001002000880900001600000028000000180000003000
    0000010020000000000060090000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000009240
    0215A452104FA7561379A8571093AE5F179DAD5D159CA44F0A8B9E48056A9C44
    0234863A01020000000000000000000000000000000000000000000000000000
    000000000000000000000000000000000000883A00049B420059A04802BFB364
    18FBCA8D44FFDBAA63FFE2B976FFE4BF7EFEE4BE7DFFE0B571FED5A059FFBF7B
    31FFA6530CE19D46047495410209000000000000000000000000000000000000
    00000000000000000000000000009B420041A14902D6B96A14FED59A3BFEE5BF
    74FEE6C075FEE6C073FEE6C073FEE7C277FEE8C67FFEEACB8BFEEACC8EFEE9CA
    8CFEE3BC76FEC68434FEA44E08D99D4502300000000000000000000000000000
    000000000000883A00019D440084B15E0BFDCF8D29FEDBA63EFFDDA841FFDCA8
    40FECC9939FFB68933FF998246FF8A8356FE8F8759FFA08C52FEC39D52FFE0BA
    70FFEBCC8DFEE9CA8BFFD9A75BFFAA550BF19C44013600000000000000000000
    0000873A00019F46009DBF7319FFDBA641FFE2B351FEE1B250FFCC9734FF9670
    28FE467271FF1091C6FF00A5E8FF00AEF1FE06B0F0FF16ADE5FE2EA2CBFF5C8A
    8AFFAD9556FEE6C47EFFEACB8DFFDAA85FFEA44D04E49A420012000000000000
    00009E450080BF7113FEDFAD49FEE2B352FEE2B452FEBA882CFE606847FE0B9D
    D5FE00BAFEFE00BAFEFE00BAFEFE00BAFEFE00BAFEFE00BAFEFE02BBFEFE16BE
    F7FE34A9D0FE8A8D67FEE6C177FEE9CA8CFEC47B1EFE9C430093000000009B43
    0023B66512FAE4B85BFEE9C168FFE2B453FFBB882CFE4F7262FF00B4F7FF00BA
    FEFE00BBFFFF00BBFFFF00BBFFFF00BAFEFE00BBFFFF00BAFEFE00BBFFFF00BB
    FEFF12BEF9FE32B5DEFFBFA356FFE4BA67FEE6C487FFAD5A13F69A410014A34B
    0283DDAB52FFEAC36AFEE2B351FFD4A444FF646D49FE00B6F9FF00BBFFFF00BA
    FEFE00BBFFFF05BCFFFF38D0FDFF54D6F5FE4FD8FBFF35CFFEFE12C1FFFF00BB
    FFFF00BBFEFE1CC0F6FFC8AD5AFFE0B04FFEEACD93FFCB8F4DFF9B42006AB666
    16C5E9C167FEE6BB5EFEDEAB45FEAD8331FE11A8D9FE00BAFEFE00BAFEFE00BA
    FEFE0BBDFCFE9DBE94FECFA23EFED59B2CFED39D33FEC9AD56FEBDC285FE9FCF
    B3FE7BD4D5FE90C5ABFEDCA73FFEDEAC47FEE8C786FEDCAD6BFE9E4500B1C37C
    28EAE9C268FFE1B14DFEDBA843FF718E70FF00BBFEFE00BBFFFF00BBFFFF00BA
    FEFE7BB194FFD69B2BFFD69B2CFFD59A2BFED69B2CFFD59A2BFED69B2CFFD69B
    2CFFD59A2BFED69B2CFFDAA43BFFDDAA44FEE2B764FFDFB162FFA44B00E2C783
    2DF8E9C266FFDEAC46FED09F3FFF4FAAB3FF00BAFEFE00BBFFFF00BBFFFF12B5
    EAFECF982BFFD49827FFD59A2BFFD59A2BFED69B2CFFD59A2BFED69B2CFFD69B
    2CFFD59A2BFED69B2CFFD8A034FFDBA53BFEDBA63EFFDBA63DFFA95101F6C47E
    29F2E8C166FFDEAC46FECA9A3CFF42BCD8FF00BAFEFE00BBFFFF00BBFFFF49A2
    A6FED49725FFD49725FFD59928FFD59A2BFED69B2CFFD59A2BFED69B2CFFD69B
    2CFFD59A2BFED69B2CFFD5992AFFD9A035FEDCA840FFE1B24FFFAA5403F1BD71
    1FD8E9C267FEDFAE49FEC9993CFE43C7E8FE00BAFEFE00BAFEFE00BAFEFE5E93
    84FED39624FED39624FED49725FED59A2BFED59A2BFED59A2BFED59A2BFED59A
    2BFED59A2BFED59A2BFED49725FED59B2BFEDEAD47FEDFAF4CFEA74F00CEB260
    11ABE7BD63FFE2B351FECFA149FF6BD3EAFF11BFFEFE00BBFFFF00BBFFFF4D8A
    89FED49725FFD49725FFD49725FFD59929FED69B2CFFD59A2BFED69B2CFFD69B
    2CFFD59A2BFED59929FFD49725FFD49827FEE2B352FFD8A13FFFA249008FA751
    076ADFAF56FEE9C471FEE8CC95FEAEE2E7FE75DAFDFE31C8FEFE00BAFEFE148A
    B9FECB9124FED39624FED39624FED49828FED59A2BFED59A2BFED59A2BFED59A
    2BFED59A2BFED49826FED39624FED59A2AFEE5BA5CFEC88327FE9F460038A04A
    0518CD8D38F9EED18CFEF1D9A5FFC6DFD1FF81DCFAFE6FD9FFFF09BDFFFF00A9
    ECFE5B6D5AFFCE9222FFD49725FFD49827FED69B2CFFD59A2BFED69B2CFFD69B
    2CFFD59A2BFED49725FFD49725FFDBA63DFEE4B759FFAF5B0AC8000000000000
    0000B66818A8EBCA82FEF3DEACFFE7E1BBFF9AE3F6FE73DAFEFF24C4FFFF00BB
    FEFE0191D3FF436566FFAB7B20FFB67E1BFEB07B1CFFAB791EFEB58020FFD095
    29FFD49828FED49725FFD49725FFE1B250FED19336FEA34B0249000000000000
    0000A953082CD49B47FBF2DCA8FEF2DEACFED3ECDDFE7FDCFBFE2BC6FEFE00BA
    FEFE00BBFEFE00A3E6FE067AB7FE1173A5FE0A7AB3FE0380C0FE0879B4FE4B69
    63FED19424FED49726FEDCA83FFEE1B251FEB05D0DB900000000000000000000
    000000000000B563108CE4B966FFF2DBA6FFF1E0B1FEC4ECE9FF21C4FEFF00BA
    FEFE00BBFFFF00BBFFFF00BBFFFF00BAFEFE00BBFFFF00BAFEFE00BBFFFF00A3
    E6FF9D8640FEDDA941FFE3B554FFC57F25F7A34C032700000000000000000000
    000000000000A2500506BD6E17C2E6BD6AFFF2DBA5FEEFDEACFF9ADFD9FF1FC4
    FEFE00BBFFFF00BBFFFF00BBFFFF00BAFEFE00BBFFFF00BAFEFE00BBFFFF07BD
    FEFFB5AA61FEE5B95AFFD49A3AFEA64F03740000000000000000000000000000
    00000000000000000000AB55040FBD6C12C1E0B159FEEAC671FEF2E0B2FEE1EC
    D8FE6CDCF1FE2ECCFEFE0ABEFEFE00BAFEFE00BAFEFE08BEFEFE38CDF8FEA2BE
    90FEE5BA5CFEDAA444FEA95406A1974301010000000000000000000000000000
    0000000000000000000000000000A8540206B660068DD09033FCEDCE8DFFF2DC
    A9FEE4BE64FFCBBF75FFBCC891FFABCAA0FEA9C89DFFBBBE7EFED1A846FFE2B3
    50FFD49C3FFDAB580B8D99460202000000000000000000000000000000000000
    00000000000000000000000000000000000000000000B45C0332BF7117B7D8A0
    45FDE5BA5EFFE7BE61FFE1B24FFFDFAE49FEE0AF4AFFE3B655FEDDAC4CFEBC74
    1ACDA75307430000000000000000000000000000000000000000000000000000
    000000000000000000000000000000000000000000000000000000000000B663
    0D2FC1751E90CB882ED3D09339F4D0953BF4CB8C33D6BC731C99AB590B419849
    050100000000000000000000000000000000000000000000000000000000FF00
    3F00F8000F00F0000700C0000300800001008000010000000000000000000000
    0000000000000000000000000000000000000000000000000000000001008000
    010080000300C0000300C0000700E0000700F0000F00FC003F00FF007F00}
  OldCreateOrder = False
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 8
    Top = 8
    Width = 673
    Height = 489
    Caption = 'Panel1'
    TabOrder = 0
    object DBGrid1: TDBGrid
      Left = 8
      Top = 8
      Width = 657
      Height = 185
      Color = clInfoBk
      DataSource = DataModule1.DataSource5
      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
    object GroupBox1: TGroupBox
      Left = 8
      Top = 232
      Width = 409
      Height = 249
      Caption = #20070#31821#24405#20837#26694
      TabOrder = 1
      object Label1: TLabel
        Left = 40
        Top = 32
        Width = 32
        Height = 16
        Caption = #20070#21495
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = #40657#20307
        Font.Style = []
        ParentFont = False
      end
      object Label2: TLabel
        Left = 184
        Top = 32
        Width = 32
        Height = 16
        Caption = #20070#21517
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = #40657#20307
        Font.Style = []
        ParentFont = False
      end
      object Label3: TLabel
        Left = 40
        Top = 65
        Width = 32
        Height = 16
        Caption = #20316#32773
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = #40657#20307
        Font.Style = []
        ParentFont = False
      end
      object Label4: TLabel
        Left = 176
        Top = 65
        Width = 48
        Height = 16
        Caption = #20986#29256#31038
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = #40657#20307
        Font.Style = []
        ParentFont = False
      end
      object Label5: TLabel
        Left = 8
        Top = 105
        Width = 64
        Height = 16
        Caption = #20986#29256#26085#26399
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = #40657#20307
        Font.Style = []
        ParentFont = False
      end
      object Label6: TLabel
        Left = 284
        Top = 105
        Width = 32
        Height = 16
        Caption = #20215#26684
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = #40657#20307
        Font.Style = []
        ParentFont = False
      end
      object Label7: TLabel
        Left = 40
        Top = 137
        Width = 32
        Height = 16
        Caption = #22791#27880
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = #40657#20307
        Font.Style = []
        ParentFont = False
      end
      object Label8: TLabel
        Left = 368
        Top = 105
        Width = 16
        Height = 16
        Caption = #20803
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = #40657#20307
        Font.Style = []
        ParentFont = False
      end
      object Label18: TLabel
        Left = 176
        Top = 105
        Width = 32
        Height = 16
        Caption = #20070#31867
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = #40657#20307
        Font.Style = []
        ParentFont = False
      end
      object DBMemo1: TDBMemo
        Left = 80
        Top = 136
        Width = 305
        Height = 73
        Color = clInfoBk
        DataField = #22791#27880
        DataSource = DataModule1.DataSource5
        ScrollBars = ssVertical
        TabOrder = 0
      end
      object DBEdit1: TDBEdit
        Left = 80
        Top = 24
        Width = 81
        Height = 21
        Color = clInfoBk
        DataField = #20070#21495
        DataSource = DataModule1.DataSource5
        TabOrder = 1
        OnChange = DBEdit1Change
      end
      object DBEdit2: TDBEdit
        Left = 232
        Top = 24
        Width = 153
        Height = 21
        Color = clInfoBk
        DataField = #20070#21517
        DataSource = DataModule1.DataSource5
        TabOrder = 2
      end
      object DBEdit3: TDBEdit
        Left = 80
        Top = 60
        Width = 81
        Height = 21
        Color = clInfoBk
        DataField = #20316#32773
        DataSource = DataModule1.DataSource5
        TabOrder = 3
      end
      object DBEdit4: TDBEdit
        Left = 232
        Top = 60
        Width = 153
        Height = 21
        Color = clInfoBk
        DataField = #20986#29256#31038
        DataSource = DataModule1.DataSource5
        TabOrder = 4
      end
      object DBEdit5: TDBEdit
        Left = 80
        Top = 100
        Width = 81
        Height = 21
        Color = clInfoBk
        DataField = #20986#29256#26085#26399
        DataSource = DataModule1.DataSource5
        TabOrder = 5
      end
      object DBEdit6: TDBEdit
        Left = 324
        Top = 100
        Width = 37
        Height = 21
        Color = clInfoBk
        DataField = #20215#26684
        DataSource = DataModule1.DataSource5
        TabOrder = 6
      end
      object Button8: TButton
        Left = 328
        Top = 216
        Width = 75
        Height = 26
        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 = 7
        OnClick = Button8Click
      end
      object Button9: TButton
        Left = 88
        Top = 216
        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 = 8
        OnClick = Button9Click
      end
      object Button10: TButton
        Left = 168
        Top = 216
        Width = 75
        Height = 25
        Caption = #21024'  '#38500
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 9
        OnClick = Button10Click
      end
      object Button11: TButton
        Left = 8
        Top = 216
        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 = 10
        OnClick = Button11Click
      end
      object Button12: TButton
        Left = 248
        Top = 216