lendbook.dfm

图书管理系统

object frmLendBook: TfrmLendBook
  Left = 60
  Top = 128
  Width = 917
  Height = 557
  BorderIcons = [biSystemMenu, biMinimize]
  Caption = #20511#20070#20449#24687
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Position = poMainFormCenter
  Visible = True
  OnClose = FormClose
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 34
    Top = 29
    Width = 409
    Height = 415
    Caption = #20070#31821#20449#24687
    TabOrder = 0
    object Label1: TLabel
      Left = 28
      Top = 79
      Width = 107
      Height = 13
      AutoSize = False
      Caption = #20070#31821#21517#31216
    end
    object Label2: TLabel
      Left = 28
      Top = 120
      Width = 107
      Height = 13
      AutoSize = False
      Caption = #20070#31821#31867#21035
    end
    object Label3: TLabel
      Left = 28
      Top = 158
      Width = 107
      Height = 13
      AutoSize = False
      Caption = #20316#32773#22995#21517
    end
    object Label4: TLabel
      Left = 28
      Top = 198
      Width = 95
      Height = 13
      AutoSize = False
      Caption = #20986#29256#31038
    end
    object Label5: TLabel
      Left = 29
      Top = 262
      Width = 103
      Height = 13
      AutoSize = False
      Caption = #20070#31821#22791#27880#20449#24687
    end
    object Label11: TLabel
      Left = 28
      Top = 41
      Width = 107
      Height = 13
      AutoSize = False
      Caption = #20070#31821#32534#21495
    end
    object edtBookNo: TEdit
      Left = 162
      Top = 37
      Width = 209
      Height = 21
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ImeMode = imDisable
      MaxLength = 10
      ParentFont = False
      TabOrder = 0
      OnExit = edtBookNoExit
      OnKeyDown = cmbBookNameKeyDown
      OnKeyPress = edtBookNoKeyPress
    end
    object Panel1: TPanel
      Left = 154
      Top = 68
      Width = 233
      Height = 339
      BevelOuter = bvNone
      Enabled = False
      TabOrder = 1
      object memBook: TMemo
        Left = 8
        Top = 193
        Width = 206
        Height = 120
        Lines.Strings = (
          '')
        ScrollBars = ssVertical
        TabOrder = 4
      end
      object edtPublish: TEdit
        Left = 8
        Top = 126
        Width = 209
        Height = 21
        TabOrder = 3
        OnKeyDown = cmbBookNameKeyDown
      end
      object edtWriter: TEdit
        Left = 8
        Top = 87
        Width = 209
        Height = 21
        TabOrder = 2
        OnKeyDown = cmbBookNameKeyDown
      end
      object edtBookKind: TEdit
        Left = 8
        Top = 47
        Width = 209
        Height = 21
        TabOrder = 1
        OnKeyDown = cmbBookNameKeyDown
      end
      object edtBookName: TEdit
        Left = 8
        Top = 7
        Width = 209
        Height = 21
        TabOrder = 0
        OnKeyDown = cmbBookNameKeyDown
      end
    end
  end
  object GroupBox2: TGroupBox
    Left = 472
    Top = 29
    Width = 409
    Height = 415
    Caption = #35835#32773#20449#24687
    TabOrder = 1
    object Label6: TLabel
      Left = 40
      Top = 41
      Width = 94
      Height = 13
      AutoSize = False
      Caption = #35835#32773#32534#21495
    end
    object Label7: TLabel
      Left = 40
      Top = 92
      Width = 94
      Height = 13
      AutoSize = False
      Caption = #35835#32773#22995#21517
    end
    object Label8: TLabel
      Left = 40
      Top = 149
      Width = 94
      Height = 13
      AutoSize = False
      Caption = #35835#32773#31181#31867
    end
    object Label9: TLabel
      Left = 40
      Top = 202
      Width = 94
      Height = 13
      AutoSize = False
      Caption = #20511#20070#26085#26399
    end
    object Label10: TLabel
      Left = 40
      Top = 265
      Width = 94
      Height = 13
      AutoSize = False
      Caption = #22791#27880#20449#24687
    end
    object meoReader: TMemo
      Left = 169
      Top = 261
      Width = 206
      Height = 120
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      ScrollBars = ssVertical
      TabOrder = 2
    end
    object edtReadNo: TEdit
      Left = 167
      Top = 38
      Width = 209
      Height = 21
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ImeMode = imDisable
      MaxLength = 14
      ParentFont = False
      TabOrder = 0
      OnExit = edtReadNoExit
      OnKeyDown = cmbBookNameKeyDown
      OnKeyPress = edtBookNoKeyPress
    end
    object Panel2: TPanel
      Left = 157
      Top = 78
      Width = 229
      Height = 164
      BevelOuter = bvNone
      Enabled = False
      TabOrder = 1
      object edtReadKind: TEdit
        Left = 10
        Top = 66
        Width = 209
        Height = 21
        TabOrder = 1
        OnKeyDown = cmbBookNameKeyDown
      end
      object edtReader: TEdit
        Left = 10
        Top = 10
        Width = 209
        Height = 21
        TabOrder = 0
        OnKeyDown = cmbBookNameKeyDown
      end
      object mskDate: TMaskEdit
        Left = 11
        Top = 117
        Width = 207
        Height = 21
        EditMask = '!9999/99/00;1;_'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ImeMode = imDisable
        MaxLength = 10
        ParentFont = False
        TabOrder = 2
        Text = '    -  -  '
        OnKeyDown = cmbBookNameKeyDown
      end
    end
  end
  object btnSave: TButton
    Left = 510
    Top = 462
    Width = 116
    Height = 31
    Caption = #20445#23384'&S'
    TabOrder = 2
    OnClick = btnSaveClick
  end
  object btnClose: TButton
    Left = 727
    Top = 462
    Width = 116
    Height = 31
    Caption = #36820#22238'&X'
    TabOrder = 3
    OnClick = btnCloseClick
  end
  object edtBorrowNo: TEdit
    Left = 286
    Top = 464
    Width = 71
    Height = 21
    TabOrder = 4
    Visible = False
  end
  object edtBooknum: TEdit
    Left = 372
    Top = 464
    Width = 55
    Height = 21
    TabOrder = 5
    Visible = False
  end
  object grySelect: TQuery
    Left = 132
    Top = 462
  end
end