huanbooku.dfm

一个图书馆管理程序

object HuanBookF: THuanBookF
  Left = 399
  Top = 208
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'HuanBookF'
  ClientHeight = 435
  ClientWidth = 342
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -15
  Font.Name = 'Times New Roman'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 120
  TextHeight = 17
  object GroupBox2: TGroupBox
    Left = 9
    Top = 227
    Width = 319
    Height = 172
    Caption = #26412#27425#36824#20070
    TabOrder = 7
    object ListBoxHuanID: TListBox
      Left = 91
      Top = 18
      Width = 137
      Height = 110
      ItemHeight = 17
      TabOrder = 0
      Visible = False
    end
    object ListBoxHuan: TListBox
      Left = 17
      Top = 17
      Width = 287
      Height = 147
      BevelKind = bkSoft
      BorderStyle = bsNone
      Ctl3D = True
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ItemHeight = 13
      ParentCtl3D = False
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      TabOrder = 1
      OnDblClick = ListBoxHuanDblClick
    end
  end
  object GroupBox1: TGroupBox
    Left = 9
    Top = 44
    Width = 319
    Height = 178
    Caption = #26410#36824#22270#20070
    TabOrder = 6
  end
  object StaticText1: TStaticText
    Left = 138
    Top = 3
    Width = 60
    Height = 17
    Caption = #35835#32773#21345#21495
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 0
  end
  object Edit1: TEdit
    Left = 70
    Top = 22
    Width = 210
    Height = 20
    BevelKind = bkSoft
    BiDiMode = bdRightToLeftNoAlign
    BorderStyle = bsNone
    Color = clWhite
    Ctl3D = True
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = #23435#20307
    Font.Style = []
    MaxLength = 10
    ParentBiDiMode = False
    ParentCtl3D = False
    ParentFont = False
    TabOrder = 1
    OnExit = Edit1Exit
  end
  object BitBtn2: TBitBtn
    Left = 79
    Top = 405
    Width = 79
    Height = 25
    Caption = #23436'  '#25104
    ModalResult = 1
    TabOrder = 2
    OnClick = BitBtn2Click
  end
  object BitBtn3: TBitBtn
    Left = 215
    Top = 405
    Width = 79
    Height = 25
    Caption = #20851'  '#38381
    TabOrder = 3
    OnClick = BitBtn3Click
  end
  object ListBoxWeiID: TListBox
    Left = 109
    Top = 99
    Width = 137
    Height = 110
    ItemHeight = 17
    TabOrder = 4
    Visible = False
  end
  object ListView1: TListView
    Left = 27
    Top = 61
    Width = 284
    Height = 152
    BevelInner = bvLowered
    BevelOuter = bvRaised
    BevelKind = bkFlat
    BorderStyle = bsNone
    Columns = <
      item
        Caption = #24207#21495
        Width = 43
      end
      item
        Caption = #20070#21517
        Width = 227
      end>
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = #23435#20307
    Font.Style = []
    GridLines = True
    ReadOnly = True
    RowSelect = True
    ParentFont = False
    TabOrder = 5
    ViewStyle = vsReport
    OnDblClick = ListView1DblClick
  end
end