cxrk.~dfm

企业库存管理系统

    object RadioButton2: TRadioButton
      Left = 240
      Top = 24
      Width = 113
      Height = 17
      Caption = #20840#37096#20837#24211#20449#24687
      TabOrder = 3
    end
    object BitBtn1: TBitBtn
      Left = 360
      Top = 16
      Width = 75
      Height = 25
      Caption = #26597#35810
      TabOrder = 4
      OnClick = BitBtn1Click
      Glyph.Data = {
        42020000424D4202000000000000420000002800000010000000100000000100
        1000030000000002000000000000000000000000000000000000007C0000E003
        00001F0000001F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C
        1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C000000001F7C
        1F7C1F7C1F7C000000000000000000000000000000000000007C003C00000000
        000000001F7C0000FF7FFF7FFF7FFF7F0000FF7FFF7F007CFF7F003C0000FF7F
        FF7F00001F7C0000FF7FFF7F0000000000000000007CFF7F003C0000FF7FFF7F
        FF7F00001F7C0000FF7F0000EF3D1F7CEF3DEF3D0000003C00001F7C1F7CFF7F
        FF7F00001F7C00000000EF3D1F7CFF03EF3DFF7FEF3D0000FF7FFF7FFF7FFF7F
        FF7F00001F7C000000001F7CFF031F7CEF3D1F7CFF7F00001F7C1F7C1F7C1F7C
        FF7F00001F7C00000000FF03FF7FFF03EF3DFF031F7C0000FF7FFF7FFF7FFF7F
        FF7F00001F7C00000000EF3DFF7FFF7FEF3D1F7CEF3D00001F7C1F7C1F7C1F7C
        FF7F00001F7C0000FF7F0000EF3DFF03EF3DEF3D0000FF7FFF7FFF7FFF7FFF7F
        FF7F00001F7C0000FF7F1F7C00000000000000001F7C1F7C1F7C1F7C1F7CFF7F
        FF7F00001F7C0000FF7FFF7FFF7FFF7F0000FF7FFF7FFF7FFF7FFF7FFF7FFF7F
        FF7F00001F7C0F000F000F000F000F000F000F000F000F000F000F000F000F00
        0F000F001F7C0F000F000F000F000F000F000F000F000F000F000F000F000F00
        0F000F001F7C0F000F000F000F000F000F000F000F000F000F000F000F000F00
        0F000F001F7C}
    end
  end
  object GroupBox2: TGroupBox
    Left = 0
    Top = 52
    Width = 521
    Height = 289
    Caption = #26597#35810#32467#26524
    TabOrder = 1
    object DBGrid1: TDBGrid
      Left = 16
      Top = 16
      Width = 489
      Height = 257
      DataSource = DataSource1
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = 'stockid'
          Title.Caption = #20837#24211#20449#24687#32534#21495
          Width = 20
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'feederid'
          Title.Caption = #20379#36135#21333#20301#32534#21495
          Width = 50
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'feedername'
          Title.Caption = #20379#36135#21333#20301#21517#31216
          Width = 50
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'depotid'
          Title.Caption = #20179#24211#32534#21495
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'depotname'
          Title.Caption = #20179#24211#21517#31216
          Width = 50
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'productid'
          Title.Caption = #20135#21697#32534#21495
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'productname'
          Title.Caption = #20135#21697#21517#31216
          Width = 50
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'spec'
          Title.Caption = #20135#21697#35268#26684
          Width = 50
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'unit'
          Title.Caption = #35745#37327#21333#20301
          Width = 50
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'quantity'
          Title.Caption = #20135#21697#25968#37327
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'unitprice'
          Title.Caption = #21333#20215
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'payment'
          Title.Caption = #24635#20184#27454
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'stockdate'
          Title.Caption = #20837#24211#26085#26399
          Width = 50
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'stockremark'
          Title.Caption = #22791#27880#20449#24687
          Visible = True
        end>
    end
  end
  object DataSource1: TDataSource
    DataSet = ADOTable1
    Left = 112
    Top = 160
  end
  object ADOQuery1: TADOQuery
    Active = True
    ConnectionString = 
      'Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security In' +
      'fo=False;Initial Catalog=mlh'
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from STOCK')
    Left = 264
    Top = 168
  end
  object ADOTable1: TADOTable
    Active = True
    ConnectionString = 
      'Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security In' +
      'fo=False;Initial Catalog=mlh'
    CursorType = ctStatic
    TableName = 'STOCK'
    Left = 176
    Top = 168
  end
end