clbhut.dfm

本系统主要划分为11个子模块：与操作员有关的文献刊物入库、出库、库结存和文献刊物查询

object clbhfm: Tclbhfm
  Left = 348
  Top = 156
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = #25991#29486#21002#29289#32534#21495#31649#29702
  ClientHeight = 453
  ClientWidth = 688
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poMainFormCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 688
    Height = 453
    Align = alClient
    TabOrder = 0
    object GroupBox1: TGroupBox
      Left = 8
      Top = 8
      Width = 185
      Height = 433
      TabOrder = 0
      object Label1: TLabel
        Left = 16
        Top = 21
        Width = 113
        Height = 25
        AutoSize = False
        Caption = #25991#29486#21002#29289#21517#31216
      end
      object Label2: TLabel
        Left = 16
        Top = 85
        Width = 81
        Height = 25
        AutoSize = False
        Caption = #25991#29486#21002#29289#32534#21495
      end
      object Label3: TLabel
        Left = 16
        Top = 133
        Width = 113
        Height = 33
        AutoSize = False
        Caption = #25991#29486#21002#29289#31181#31867
      end
      object Label4: TLabel
        Left = 16
        Top = 189
        Width = 105
        Height = 25
        AutoSize = False
        Caption = #20215'   '#26684
      end
      object zjbt: TSpeedButton
        Left = 16
        Top = 360
        Width = 73
        Height = 25
        Caption = #22686#21152
        Glyph.Data = {
          F6000000424DF600000000000000760000002800000010000000100000000100
          0400000000008000000000000000000000001000000000000000000000000000
          8000008000000080800080000000800080008080000080808000C0C0C0000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
          8888888888888888888888800000000000888880888888888088888088888888
          8088888088888888808888808888888880888880888888888088888088888888
          8088888088888888808888808888888880888880888888000088888088888808
          0888888088888800888888800000000888888888888888888888}
        OnClick = zjbtClick
      end
      object xgbt: TSpeedButton
        Left = 104
        Top = 360
        Width = 65
        Height = 25
        Caption = #20462#25913
        Glyph.Data = {
          F6000000424DF600000000000000760000002800000010000000100000000100
          0400000000008000000000000000000000001000000000000000000000000000
          8000008000000080800080000000800080008080000080808000C0C0C0000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
          888888880808080888888888888888008888888888888800088888000000000B
          708888088888880B8088880800800800B708880888888880B808880CCCCCCCCC
          0B70888C888888880B00888C800800800011888C888888888000888CCCCCCCCC
          CCC8888C8CC8CC8CC8C8888CCCCCCCCCCCC88888888888888888}
        OnClick = xgbtClick
      end
      object scbt: TSpeedButton
        Left = 16
        Top = 400
        Width = 73
        Height = 25
        Caption = #21024#38500
        Glyph.Data = {
          F6000000424DF600000000000000760000002800000010000000100000000100
          0400000000008000000000000000000000001000000000000000000000000000
          8000008000000080800080000000800080008080000080808000C0C0C0000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
          8888888888888888881F88881F8888888888888991F8888889F8888191F88888
          1F888888199F88891F8888888191F819F88888888819199F88888888888919F8
          888888888891911F888888888191F89F88888889191F88819F88881919F88888
          19F88891F8888888819F88888888888888888888888888888888}
        OnClick = scbtClick
      end
      object gbbt: TSpeedButton
        Left = 104
        Top = 400
        Width = 65
        Height = 25
        Caption = #20851#38381
        Glyph.Data = {
          F6000000424DF600000000000000760000002800000010000000100000000100
          0400000000008000000000000000000000001000000000000000000000000000
          8000008000000080800080000000800080008080000080808000C0C0C0000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888800888888
          8888888030888888888888033088888888888833300000000888883330880888
          88888033008808888488F033308808884488F033308808844444F03330880844
          4444803330880884444488330888088844888830888808888488880888880888
          8888880000000888888888888888888888888888888888888888}
        OnClick = gbbtClick
      end
      object SpeedButton1: TSpeedButton
        Left = 16
        Top = 328
        Width = 153
        Height = 25
        Caption = #28165#38500
        OnClick = SpeedButton1Click
      end
      object Label5: TLabel
        Left = 16
        Top = 248
        Width = 105
        Height = 25
        AutoSize = False
        Caption = #25991#29486#21002#29289#25152#22312#26550#20301
      end
      object clmcedit: TEdit
        Left = 16
        Top = 53
        Width = 153
        Height = 21
        ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899#36755#20837#27861' 3.0 '#29256
        TabOrder = 0
      end
      object bhedit: TEdit
        Left = 16
        Top = 101
        Width = 153
        Height = 21
        ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899#36755#20837#27861' 3.0 '#29256
        TabOrder = 1
      end
      object pledit: TEdit
        Left = 17
        Top = 157
        Width = 149
        Height = 21
        ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899#36755#20837#27861' 3.0 '#29256
        TabOrder = 2
      end
      object dwjgedit: TEdit
        Left = 16
        Top = 213
        Width = 153
        Height = 21
        ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899#36755#20837#27861' 3.0 '#29256
        TabOrder = 3
      end
      object hwedit: TEdit
        Left = 16
        Top = 272
        Width = 153
        Height = 21
        ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899#36755#20837#27861' 3.0 '#29256
        TabOrder = 4
      end
    end
    object GroupBox2: TGroupBox
      Left = 200
      Top = 8
      Width = 481
      Height = 441
      TabOrder = 1
      object DBGrid1: TDBGrid
        Left = 2
        Top = 15
        Width = 477
        Height = 424
        Align = alClient
        DataSource = DataSource1
        ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899#36755#20837#27861' 3.0 '#29256
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        OnCellClick = DBGrid1CellClick
      end
    end
  end
  object ADOQuery: TADOQuery
    Parameters = <>
    SQL.Strings = (
      'select * from bhb')
    Left = 232
    Top = 104
  end
  object DataSource1: TDataSource
    DataSet = ADOQuery
    Left = 272
    Top = 104
  end
end