main.dfm

一个基于MFC的编程的图书管理系统

object fm_main: Tfm_main
  Left = 295
  Top = 241
  Width = 800
  Height = 600
  BorderIcons = [biSystemMenu, biMinimize]
  Caption = #36890#29992#36229#24066#31649#29702#31995#32479'V1.0'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  WindowState = wsMaximized
  OnShortCut = FormShortCut
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Label6: TLabel
    Left = 416
    Top = 416
    Width = 65
    Height = 16
    AutoSize = False
    Caption = #21512#35745#37329#39069'('#20803')'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label9: TLabel
    Left = 232
    Top = 416
    Width = 73
    Height = 16
    AutoSize = False
    Caption = #25968#37327#21512#35745
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label10: TLabel
    Left = 232
    Top = 464
    Width = 49
    Height = 17
    AutoSize = False
    Caption = #29616#20184'F7'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label11: TLabel
    Left = 424
    Top = 464
    Width = 33
    Height = 17
    AutoSize = False
    Caption = #25214#38646
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label12: TLabel
    Left = 32
    Top = 416
    Width = 73
    Height = 16
    AutoSize = False
    Caption = #27969#27700#21495
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Panel2: TPanel
    Left = 0
    Top = 27
    Width = 792
    Height = 78
    Align = alTop
    TabOrder = 0
    object Label1: TLabel
      Left = 8
      Top = 24
      Width = 81
      Height = 16
      AutoSize = False
      Caption = #36135#29289#20195#30721'F1'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label2: TLabel
      Left = 8
      Top = 48
      Width = 73
      Height = 16
      AutoSize = False
      Caption = #36135#29289#21517#31216
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label3: TLabel
      Left = 184
      Top = 24
      Width = 81
      Height = 16
      AutoSize = False
      Caption = #36135#29289#25968#37327'F2'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label4: TLabel
      Left = 328
      Top = 24
      Width = 89
      Height = 16
      AutoSize = False
      Caption = #36135#29289#21333#20215'F3'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label5: TLabel
      Left = 472
      Top = 24
      Width = 73
      Height = 16
      AutoSize = False
      Caption = #25171#25240#29575'F4'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label7: TLabel
      Left = 328
      Top = 48
      Width = 89
      Height = 16
      AutoSize = False
      Caption = #25171#26512#21518#21333#20215
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label8: TLabel
      Left = 184
      Top = 48
      Width = 73
      Height = 16
      AutoSize = False
      Caption = #36827#36135#24635#25968
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object chuhuo: TButton
      Left = 472
      Top = 48
      Width = 121
      Height = 25
      Caption = #20986#36135'F5'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 4
      OnClick = chuhuoClick
    end
    object code: TEdit
      Left = 88
      Top = 24
      Width = 89
      Height = 21
      MaxLength = 13
      TabOrder = 0
      OnExit = codeExit
      OnKeyPress = codeKeyPress
    end
    object shuliang: TEdit
      Left = 272
      Top = 24
      Width = 49
      Height = 21
      TabOrder = 1
      Text = '1'
      OnKeyPress = shuliangKeyPress
    end
    object shoujia: TEdit
      Left = 416
      Top = 24
      Width = 49
      Height = 21
      TabOrder = 2
      OnChange = shoujiaChange
      OnKeyPress = shoujiaKeyPress
    end
    object dazhe: TEdit
      Left = 544
      Top = 24
      Width = 49
      Height = 21
      Enabled = False
      TabOrder = 3
      Text = '10'
      OnChange = shoujiaChange
      OnKeyPress = dazheKeyPress
    end
    object name: TEdit
      Left = 88
      Top = 48
      Width = 89
      Height = 21
      Enabled = False
      ReadOnly = True
      TabOrder = 5
    end
    object shuliang0: TEdit
      Left = 272
      Top = 48
      Width = 49
      Height = 21
      Enabled = False
      ReadOnly = True
      TabOrder = 6
    end
    object shoujia0: TEdit
      Left = 416
      Top = 48
      Width = 49
      Height = 21
      Enabled = False
      ReadOnly = True
      TabOrder = 7
    end
    object shoujiaxg: TCheckBox
      Left = 640
      Top = 24
      Width = 121
      Height = 17
      Caption = #20801#35768#20462#25913#21333#20215
      Checked = True
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      State = cbChecked
      TabOrder = 8
      OnClick = shoujiaxgClick
    end
    object dazhexg: TCheckBox
      Left = 640
      Top = 48
      Width = 137
      Height = 17
      Caption = #20801#35768#20462#25913#25171#25240#29575
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 9
      OnClick = dazhexgClick
    end
    object dingjia: TEdit
      Left = 344
      Top = 0
      Width = 49
      Height = 21
      ReadOnly = True
      TabOrder = 10
      Visible = False
      OnChange = shoujiaChange
      OnKeyPress = shoujiaKeyPress
    end
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 792
    Height = 27
    Align = alTop
    Ctl3D = False
    ParentCtl3D = False
    TabOrder = 1
    Visible = False
    object bt_name: TButton
      Left = 1
      Top = 0
      Width = 75
      Height = 25
      Caption = #36135#21517#31649#29702
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 0
      OnClick = bt_nameClick
    end
    object bt_jinhuo: TButton
      Left = 86
      Top = 0
      Width = 75
      Height = 25
      Caption = #36827#36135#31649#29702
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      OnClick = bt_jinhuoClick
    end
    object bt_lingshou: TButton
      Left = 172
      Top = 0
      Width = 75
      Height = 25
      Caption = #38646#21806#31649#29702
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 2
      OnClick = bt_lingshouClick
    end
    object bt_kucen: TButton
      Left = 343
      Top = 1
      Width = 75
      Height = 25
      Caption = #24211#23384#20998#26512
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 3
      OnClick = bt_kucenClick
    end
    object bt_xiaopiao: TButton
      Left = 603
      Top = 1
      Width = 75
      Height = 25
      Caption = #23567#31080#35774#35745
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 4
      OnClick = bt_xiaopiaoClick
    end
    object bt_xiaoshou: TButton
      Left = 258
      Top = 0
      Width = 75
      Height = 25
      Caption = #38144#21806#20998#26512
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 5
      OnClick = bt_xiaoshouClick
    end
    object bt_sys: TButton
      Left = 517
      Top = 2
      Width = 75
      Height = 25
      Caption = #20462#25913#23494#30721
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 6
      OnClick = bt_sysClick
    end
    object bt_data: TButton
      Left = 713
      Top = 1
      Width = 75
      Height = 25
      Caption = #25968#25454#28165#29702
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 7
      Visible = False
      OnClick = bt_dataClick
    end
    object Button2: TButton
      Left = 429
      Top = 1
      Width = 75
      Height = 25
      Caption = #25253#34920
      TabOrder = 8
      OnClick = Button2Click
    end
  end
  object Panel3: TPanel
    Left = 0
    Top = 105
    Width = 792
    Height = 304
    Align = alTop
    Alignment = taLeftJustify
    TabOrder = 2
    object lb: TStringGrid
      Left = 8
      Top = 16
      Width = 585
      Height = 273
      ColCount = 7
      RowCount = 1
      FixedRows = 0
      TabOrder = 0
    end
    object qingchu: TButton
      Left = 664
      Top = 56
      Width = 75
      Height = 25
      Caption = #28165#38500'F6'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      OnClick = qingchuClick
    end
  end
  object jine_hj: TEdit
    Left = 512
    Top = 416
    Width = 81
    Height = 21
    Enabled = False
    TabOrder = 4
  end
  object jiezhang: TButton
    Left = 640
    Top = 464
    Width = 113
    Height = 26
    Caption = #32467#24080'F8'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 8
    OnClick = jiezhangClick
  end
  object dy: TCheckBox
    Left = 640
    Top = 412
    Width = 113
    Height = 16
    Caption = #32467#24080#21516#26102#25171#21360
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 5
  end
  object xianfu: TEdit
    Left = 312
    Top = 464
    Width = 81
    Height = 21
    TabOrder = 6
    Text = '0'
    OnExit = xianfuExit
    OnKeyPress = xianfuKeyPress
  end
  object zhaoling: TEdit
    Left = 512
    Top = 464
    Width = 81
    Height = 21
    Enabled = False
    TabOrder = 7
  end
  object shuliang_hj: TEdit
    Left = 312
    Top = 416
    Width = 81
    Height = 21
    Enabled = False
    TabOrder = 3
  end
  object danjuhaos: TEdit
    Left = 120
    Top = 416
    Width = 81
    Height = 21
    Enabled = False
    TabOrder = 9
  end
  object huiyuan: TCheckBox
    Left = 640
    Top = 432
    Width = 113
    Height = 17
    Caption = #26159#20250#21592
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 10
  end
  object touser: TRadioGroup
    Left = 32
    Top = 439
    Width = 170
    Height = 50
    Caption = #29992#25143#20999#25442
    Columns = 2
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -15
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ItemIndex = 0
    Items.Strings = (
      #26222#36890#29992#25143
      #36229#32423#29992#25143)
    ParentFont = False
    TabOrder = 11
    OnClick = touserClick
  end
  object Button1: TButton
    Left = 480
    Top = 496
    Width = 113
    Height = 26
    Caption = #36864#20986#31243#24207
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 12
    OnClick = Button1Click
  end
  object sb: TStatusBar
    Left = 8
    Top = 544
    Width = 153
    Height = 22
    Align = alCustom
    Panels = <>
    SimplePanel = False
    SimpleText = 'fgdfgd'
  end
  object StatusBar1: TStatusBar
    Left = 168
    Top = 544
    Width = 297
    Height = 22
    Align = alCustom
    Panels = <>
    SimplePanel = False
    SimpleText = 'fgdfgd'
  end
  object StatusBar2: TStatusBar
    Left = 472
    Top = 544
    Width = 313
    Height = 22
    Align = alCustom
    Panels = <>
    SimplePanel = False
    SimpleText = 'fgdfgd'
  end
end