checkprint.dfm

物流管理系统是一个典型的数据库应用程序

inherited f_checkprint: Tf_checkprint
  Left = 92
  Top = 135
  Caption = #30424#28857#25171#21360
  ClientHeight = 319
  ClientWidth = 606
  OldCreateOrder = True
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 250
    Top = 8
    Width = 100
    Height = 24
    Alignment = taCenter
    Caption = #30424#28857#25171#21360
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlue
    Font.Height = -24
    Font.Name = #26999#20307'_GB2312'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Grid: TDBGrid
    Left = 0
    Top = 101
    Width = 606
    Height = 218
    Align = alBottom
    DataSource = RegSource
    ImeName = #20013#25991' ('#31616#20307') - '#20840#25340
    Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
    ReadOnly = True
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = 'storename'
        Title.Caption = #29289#36164#21517#31216
        Width = 146
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'storesum'
        Title.Caption = #24211#23384#25968#37327
        Width = 178
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'storagename'
        Title.Caption = #20179#24211#21517#31216
        Width = 159
        Visible = True
      end>
  end
  object Panel2: TPanel
    Left = 0
    Top = 55
    Width = 606
    Height = 46
    Align = alBottom
    BevelInner = bvRaised
    BevelOuter = bvLowered
    TabOrder = 1
    object Label3: TLabel
      Left = 169
      Top = 15
      Width = 14
      Height = 13
      AutoSize = False
      Caption = '='
    end
    object storagefield: TComboBox
      Left = 86
      Top = 12
      Width = 77
      Height = 20
      Style = csOwnerDrawFixed
      ImeName = #20013#25991' ('#31616#20307') - '#20840#25340
      ItemHeight = 14
      TabOrder = 0
      Items.Strings = (
        #20179#24211#21517#31216)
    end
    object storagevalue: TComboBox
      Left = 183
      Top = 12
      Width = 77
      Height = 21
      ImeName = #20013#25991' ('#31616#20307') - '#20840#25340
      ItemHeight = 13
      TabOrder = 1
    end
    object Query: TBitBtn
      Left = 425
      Top = 12
      Width = 75
      Height = 21
      Caption = #26597#35810
      TabOrder = 2
      OnClick = QueryClick
    end
    object Print: TBitBtn
      Left = 509
      Top = 12
      Width = 75
      Height = 21
      Caption = #25171#21360
      Enabled = False
      TabOrder = 3
      OnClick = PrintClick
    end
    object storagecon: TCheckBox
      Left = 13
      Top = 14
      Width = 72
      Height = 17
      Caption = #20179#24211#21517#31216
      Checked = True
      State = cbChecked
      TabOrder = 4
    end
    object storecon: TCheckBox
      Left = 266
      Top = 15
      Width = 72
      Height = 17
      Caption = #22791#21697#21517#31216
      TabOrder = 5
    end
    object storevalue: TComboBox
      Left = 339
      Top = 13
      Width = 77
      Height = 20
      Style = csOwnerDrawFixed
      ImeName = #20013#25991' ('#31616#20307') - '#20840#25340
      ItemHeight = 14
      TabOrder = 6
    end
  end
  object Query1: TADOQuery
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from tb_Comstorage')
    Left = 40
    Top = 144
  end
  object Project: TRvProject
    Left = 216
    Top = 176
  end
  object RvDataSetConnection1: TRvDataSetConnection
    RuntimeVisibility = rtDeveloper
    DataSet = Query1
    Left = 136
    Top = 192
  end
  object RegSource: TDataSource
    Left = 88
    Top = 144
  end
end