bookinunit.dfm

是一个Delphi的教材管理系统,内容很全面详细

object frmBookIn: TfrmBookIn
  Left = 185
  Top = 95
  BorderStyle = bsSingle
  Caption = #25945#26448#20837#24211
  ClientHeight = 321
  ClientWidth = 426
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 31
    Top = 57
    Width = 42
    Height = 14
    Caption = #25945#26448#21517
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = #26999#20307'_GB2312'
    Font.Style = []
    ParentFont = False
  end
  object Label2: TLabel
    Left = 231
    Top = 57
    Width = 42
    Height = 14
    Caption = #20986#29256#31038
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = #26999#20307'_GB2312'
    Font.Style = []
    ParentFont = False
  end
  object Label3: TLabel
    Left = 47
    Top = 89
    Width = 28
    Height = 14
    Caption = #20316#32773
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = #26999#20307'_GB2312'
    Font.Style = []
    ParentFont = False
  end
  object Label4: TLabel
    Left = 215
    Top = 89
    Width = 56
    Height = 14
    Caption = #25945#26448#21333#20215
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = #26999#20307'_GB2312'
    Font.Style = []
    ParentFont = False
  end
  object Label5: TLabel
    Left = 15
    Top = 121
    Width = 56
    Height = 14
    Caption = #20986#29256#24180#26376
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = #26999#20307'_GB2312'
    Font.Style = []
    ParentFont = False
  end
  object Label6: TLabel
    Left = 215
    Top = 121
    Width = 56
    Height = 14
    Caption = #35746#20070#21333#20301
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = #26999#20307'_GB2312'
    Font.Style = []
    ParentFont = False
  end
  object Label7: TLabel
    Left = 31
    Top = 153
    Width = 42
    Height = 14
    Caption = #32463#21150#20154
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = #26999#20307'_GB2312'
    Font.Style = []
    ParentFont = False
  end
  object Label8: TLabel
    Left = 215
    Top = 153
    Width = 56
    Height = 14
    Caption = #21407#26377#25968#37327
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = #26999#20307'_GB2312'
    Font.Style = []
    ParentFont = False
  end
  object Label9: TLabel
    Left = 15
    Top = 185
    Width = 56
    Height = 14
    Caption = #26412#27425#25968#37327
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = #26999#20307'_GB2312'
    Font.Style = []
    ParentFont = False
  end
  object Label10: TLabel
    Left = 231
    Top = 185
    Width = 42
    Height = 14
    Caption = #24635#25968#37327
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = #26999#20307'_GB2312'
    Font.Style = []
    ParentFont = False
  end
  object Label11: TLabel
    Left = 15
    Top = 217
    Width = 56
    Height = 14
    Caption = #33719#22870#24773#20917
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = #26999#20307'_GB2312'
    Font.Style = []
    ParentFont = False
  end
  object Label12: TLabel
    Left = 215
    Top = 217
    Width = 56
    Height = 14
    Caption = #20351#29992#35828#26126
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = #26999#20307'_GB2312'
    Font.Style = []
    ParentFont = False
  end
  object Label13: TLabel
    Left = 15
    Top = 249
    Width = 56
    Height = 14
    Caption = #20837#24211#26102#38388
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = #26999#20307'_GB2312'
    Font.Style = []
    ParentFont = False
  end
  object Label14: TLabel
    Left = 247
    Top = 249
    Width = 28
    Height = 14
    Caption = #35828#26126
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = #26999#20307'_GB2312'
    Font.Style = []
    ParentFont = False
  end
  object Label15: TLabel
    Left = 31
    Top = 26
    Width = 42
    Height = 14
    Caption = 'ISBN'#21495
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = #26999#20307'_GB2312'
    Font.Style = []
    ParentFont = False
  end
  object Edit1: TEdit
    Left = 79
    Top = 49
    Width = 119
    Height = 21
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    TabOrder = 1
  end
  object Edit2: TEdit
    Left = 279
    Top = 49
    Width = 119
    Height = 21
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    TabOrder = 2
  end
  object Edit3: TEdit
    Left = 79
    Top = 81
    Width = 119
    Height = 21
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    TabOrder = 3
  end
  object Edit4: TEdit
    Left = 279
    Top = 81
    Width = 119
    Height = 21
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    TabOrder = 4
  end
  object MaskEdit1: TMaskEdit
    Left = 79
    Top = 113
    Width = 119
    Height = 21
    EditMask = '!9999/99/00;1;_'
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    MaxLength = 10
    TabOrder = 5
    Text = '    -  -  '
  end
  object ComboBox1: TComboBox
    Left = 279
    Top = 113
    Width = 120
    Height = 21
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    ItemHeight = 13
    TabOrder = 6
  end
  object Edit5: TEdit
    Left = 79
    Top = 145
    Width = 120
    Height = 21
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    ReadOnly = True
    TabOrder = 7
  end
  object Edit6: TEdit
    Left = 279
    Top = 145
    Width = 120
    Height = 21
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    ReadOnly = True
    TabOrder = 8
  end
  object Edit7: TEdit
    Left = 79
    Top = 177
    Width = 120
    Height = 21
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    TabOrder = 9
    OnExit = Edit7Exit
  end
  object Edit8: TEdit
    Left = 279
    Top = 177
    Width = 120
    Height = 21
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    ReadOnly = True
    TabOrder = 10
  end
  object Edit9: TEdit
    Left = 79
    Top = 209
    Width = 120
    Height = 21
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    TabOrder = 11
  end
  object Edit10: TEdit
    Left = 279
    Top = 209
    Width = 120
    Height = 21
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    TabOrder = 12
  end
  object MaskEdit2: TMaskEdit
    Left = 79
    Top = 241
    Width = 120
    Height = 21
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    ReadOnly = True
    TabOrder = 13
  end
  object Edit11: TEdit
    Left = 279
    Top = 241
    Width = 121
    Height = 21
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    TabOrder = 14
  end
  object BitBtn1: TBitBtn
    Left = 95
    Top = 281
    Width = 75
    Height = 25
    Caption = #30830#23450
    Default = True
    Enabled = False
    TabOrder = 15
    OnClick = BitBtn1Click
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000120B0000120B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
      555555555555555555555555555555555555555555FF55555555555559055555
      55555555577FF5555555555599905555555555557777F5555555555599905555
      555555557777FF5555555559999905555555555777777F555555559999990555
      5555557777777FF5555557990599905555555777757777F55555790555599055
      55557775555777FF5555555555599905555555555557777F5555555555559905
      555555555555777FF5555555555559905555555555555777FF55555555555579
      05555555555555777FF5555555555557905555555555555777FF555555555555
      5990555555555555577755555555555555555555555555555555}
    NumGlyphs = 2
  end
  object BitBtn2: TBitBtn
    Left = 271
    Top = 281
    Width = 75
    Height = 25
    Caption = #36864#20986
    TabOrder = 16
    OnClick = BitBtn2Click
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000120B0000120B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
      03333377777777777F333301111111110333337F333333337F33330111111111
      0333337F333333337F333301111111110333337F333333337F33330111111111
      0333337F333333337F333301111111110333337F333333337F33330111111111
      0333337F3333333F7F333301111111B10333337F333333737F33330111111111
      0333337F333333337F333301111111110333337F33FFFFF37F3333011EEEEE11
      0333337F377777F37F3333011EEEEE110333337F37FFF7F37F3333011EEEEE11
      0333337F377777337F333301111111110333337F333333337F33330111111111
      0333337FFFFFFFFF7F3333000000000003333377777777777333}
    NumGlyphs = 2
  end
  object MaskEdit3: TMaskEdit
    Left = 78
    Top = 17
    Width = 113
    Height = 21
    CharCase = ecUpperCase
    EditMask = '0\-000\-00000\-A;1;_'
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    MaxLength = 13
    TabOrder = 0
    Text = ' -   -     - '
    OnExit = MaskEdit3Exit
  end
end