depository.dfm

delphi制作的图书管理系统

object DepositoryFrm: TDepositoryFrm
  Left = 297
  Top = 453
  Width = 812
  Height = 543
  BorderIcons = []
  Caption = #24211#23384#22270#20070#32479#35745
  Color = clCream
  Ctl3D = False
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -14
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  OnClose = FormClose
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 14
  object LblQueryTitel: TLabel
    Left = 59
    Top = 68
    Width = 56
    Height = 14
    Caption = #26597#35810#26631#39064
  end
  object LblFrmTitle: TLabel
    Left = 341
    Top = 16
    Width = 103
    Height = 16
    Caption = #24211#23384#22270#20070#32479#35745
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
  end
  object LblQueryContent: TLabel
    Left = 299
    Top = 64
    Width = 56
    Height = 14
    Caption = #26597#35810#20869#23481
  end
  object DBGridBookInfo: TDBGrid
    Left = 28
    Top = 98
    Width = 749
    Height = 327
    DataSource = DM.DSourceDepository
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    TabOrder = 0
    TitleFont.Charset = GB2312_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -14
    TitleFont.Name = #23435#20307
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = 'BookID'
        Title.Caption = #22270#20070#32534#21495
        Width = 97
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'BookName'
        Title.Caption = #22270#20070#21517#31216
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Author'
        Title.Caption = #20316#32773
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Press'
        Title.Caption = #20986#29256#31038
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Price'
        Title.Caption = #21333#20215
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Booknum'
        Title.Caption = #32467#23384#25968#37327
        Visible = True
      end>
  end
  object BtnClose: TButton
    Left = 549
    Top = 448
    Width = 81
    Height = 25
    Caption = #20851' '#38381
    TabOrder = 1
    OnClick = BtnCloseClick
  end
  object EdtQueryContent: TEdit
    Left = 365
    Top = 61
    Width = 244
    Height = 20
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    TabOrder = 2
  end
  object CBoxQueryTitle: TComboBox
    Left = 125
    Top = 64
    Width = 124
    Height = 22
    Style = csDropDownList
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    ItemHeight = 14
    ItemIndex = 0
    TabOrder = 3
    Text = #20070#21495
    Items.Strings = (
      #20070#21495
      #20070#21517
      #20316#32773)
  end
  object BtnQuery: TButton
    Left = 632
    Top = 57
    Width = 75
    Height = 25
    Caption = #26597#35810
    TabOrder = 4
    OnClick = BtnQueryClick
  end
  object BtnQueryAll: TButton
    Left = 264
    Top = 448
    Width = 129
    Height = 25
    Caption = #26597#35810#25152#26377#22270#20070#24211#23384
    TabOrder = 5
    OnClick = BtnQueryAllClick
  end
  object Button1: TButton
    Left = 434
    Top = 448
    Width = 75
    Height = 25
    Caption = #25171#21360#39044#35272
    TabOrder = 6
    OnClick = Button1Click
  end
end