main.dfm

图书管理系统DELPHI版本

object mainfrm: Tmainfrm
  Left = 78
  Top = 28
  Width = 717
  Height = 375
  Caption = #22270#20070#39302#22270#20070#20449#24687#31649#29702#31995#32479' 1.0'
  Color = clGray
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  Menu = MainMenu1
  OldCreateOrder = False
  Position = poScreenCenter
  WindowState = wsMaximized
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 12
  object StatusBar1: TStatusBar
    Left = 0
    Top = 310
    Width = 709
    Height = 19
    Panels = <
      item
        Alignment = taCenter
        Text = #27809#26377#29992#25143#30331#38470#65281
        Width = 200
      end
      item
        Width = 50
      end>
  end
  object Panel1: TPanel
    Left = 0
    Top = 111
    Width = 709
    Height = 199
    Align = alClient
    BevelOuter = bvNone
    TabOrder = 1
    object Splitter1: TSplitter
      Left = 526
      Top = 41
      Width = 5
      Height = 158
      Align = alRight
    end
    object DBGrid1: TDBGrid
      Left = 0
      Top = 41
      Width = 526
      Height = 158
      Align = alClient
      DataSource = DataSource1
      DefaultDrawing = False
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -12
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
      OnDrawColumnCell = DBGrid1DrawColumnCell
    end
    object Panel2: TPanel
      Left = 0
      Top = 0
      Width = 709
      Height = 41
      Align = alTop
      BevelInner = bvRaised
      BevelOuter = bvLowered
      TabOrder = 1
      object Label2: TLabel
        Left = 136
        Top = 16
        Width = 216
        Height = 12
        Caption = #24744#22909#65281#19979#38754#26159#20320#30340#22270#20070#20511#38405#24773#20917#65292#35831#30041#24847
      end
      object Label1: TLabel
        Left = 8
        Top = 16
        Width = 36
        Height = 12
        Caption = #29992#25143#65306
      end
      object Label3: TLabel
        Left = 358
        Top = 16
        Width = 29
        Height = 13
        Caption = #32418#33394
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clRed
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label4: TLabel
        Left = 392
        Top = 16
        Width = 60
        Height = 12
        Caption = #30340#35760#24405#34892#65281
      end
      object edit1: TEdit
        Left = 40
        Top = 8
        Width = 89
        Height = 20
        Color = clInfoBk
        Enabled = False
        ReadOnly = True
        TabOrder = 0
      end
    end
    object Panel3: TPanel
      Left = 531
      Top = 41
      Width = 178
      Height = 158
      Align = alRight
      BevelOuter = bvNone
      TabOrder = 2
      object Panel4: TPanel
        Left = 0
        Top = 0
        Width = 178
        Height = 33
        Align = alTop
        BevelOuter = bvNone
        Caption = #31995#32479#20449#24687
        TabOrder = 0
      end
      object Memo1: TMemo
        Left = 0
        Top = 33
        Width = 178
        Height = 125
        Align = alClient
        ReadOnly = True
        TabOrder = 1
      end
    end
  end
  object CoolBar1: TCoolBar
    Left = 0
    Top = 0
    Width = 709
    Height = 111
    AutoSize = True
    Bands = <
      item
        Control = ToolBar1
        ImageIndex = -1
        MinHeight = 35
        Width = 707
      end
      item
        Control = ToolBar2
        ImageIndex = -1
        MinHeight = 35
        Width = 707
      end
      item
        Control = ToolBar3
        ImageIndex = -1
        MinHeight = 35
        Width = 707
      end>
    Color = clBtnFace
    EdgeInner = esNone
    ParentColor = False
    object ToolBar1: TToolBar
      Left = 9
      Top = 0
      Width = 694
      Height = 35
      AutoSize = True
      ButtonHeight = 35
      ButtonWidth = 67
      Caption = 'ToolBar1'
      EdgeInner = esNone
      EdgeOuter = esNone
      Flat = True
      Images = ImageList1
      ShowCaptions = True
      TabOrder = 0
      object loginbtn: TToolButton
        Left = 0
        Top = 0
        Caption = #30331#24405#31995#32479
        ImageIndex = 0
        OnClick = loginbtnClick
      end
      object ToolButton2: TToolButton
        Left = 67
        Top = 0
        Width = 8
        Caption = 'ToolButton2'
        ImageIndex = 1
        Style = tbsSeparator
      end
      object exitbtn: TToolButton
        Left = 75
        Top = 0
        Caption = ' '#36864#20986#31995#32479' '
        ImageIndex = 1
        OnClick = exitbtnClick
      end
      object ToolButton1: TToolButton
        Left = 142
        Top = 0
        Width = 8
        Caption = 'ToolButton1'
        ImageIndex = 2
        Style = tbsSeparator
      end
    end
    object ToolBar2: TToolBar
      Left = 9
      Top = 37
      Width = 694
      Height = 35
      AutoSize = True
      ButtonHeight = 35
      ButtonWidth = 67
      Caption = 'ToolBar2'
      EdgeInner = esNone
      EdgeOuter = esNone
      Flat = True
      Images = ImageList2
      ShowCaptions = True
      TabOrder = 1
      object querybtn: TToolButton
        Left = 0
        Top = 0
        Caption = #22270#20070#26597#35810
        ImageIndex = 0
        OnClick = querybtnClick
      end
      object ToolButton3: TToolButton
        Left = 67
        Top = 0
        Width = 8
        Caption = 'ToolButton3'
        ImageIndex = 1
        Style = tbsSeparator
      end
      object borrowbtn: TToolButton
        Left = 75
        Top = 0
        Caption = #20511#20070
        ImageIndex = 1
        OnClick = borrowbtnClick
      end
      object ToolButton5: TToolButton
        Left = 142
        Top = 0
        Width = 8
        Caption = 'ToolButton5'
        ImageIndex = 2
        Style = tbsSeparator
      end
      object returnbtn: TToolButton
        Left = 150
        Top = 0
        Caption = #36824#20070
        ImageIndex = 2
        OnClick = returnbtnClick