unit2.dfm

材料管理系统

object frmmain: Tfrmmain
  Left = 90
  Top = 98
  Width = 755
  Height = 472
  Caption = #21407#26448#26009#31649#29702#36719#20214
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {
    0000010001002020100000000000E80200001600000028000000200000004000
    0000010004000000000080020000000000000000000000000000000000000000
    000000008000008000000080800080000000800080008080000080808000C0C0
    C0000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
    0000000000000000000000000000000000000000000000000000000000000000
    000000000000000000000000000000000000000B8B8B8B8B8000000000000000
    000008B8B8B8B8B8B8B8000000000000008E0B80000000000B8B8B0000000000
    08E80008B8B8BBBBB000B8B0000000008E8E007B8B8BBBBBBBBB008000000008
    E8E80607B8B8BBBBBBBBBB005000000E8E8E07607B8BBBBBBBBB009090000008
    E800E07607B8BBBB0000D9D05000000E80EEEE07607BB0009D9D9D9090000008
    0EEEEEE0760009D9D9D9D9D050000060EEEEEEEE07609D9D9D9D9D909000000E
    EEEEEEEEE070D9D9D9D9D9D05000000EEEEEEEEEEE009D9D9D9D9D909000000E
    EEEEEEEEEEE0D9D9D9D9D9D05000000EEEEEEEEEEEE09D9D9D9D9D909000000E
    EEEEEEEEEEE0D9D9D9D9D9D050000000EEEEEEEEEEE09D9D9D9D9D9090000000
    0EEEEEEEEEE0D9D9D9D9D9D05000000000EEEEEEEEE09D9D9D9D000090000000
    0000EEEEEEE0D9D900005959000000000000000EEEE090009595959590000000
    000000000000095959595959500000000000000000000D959595959590000000
    00000000000000D95959595900000000000000000000000D9595959000000000
    0000000000000000D95959000000000000000000000000000D95000000000000
    000000000000000000000000000000000000000000000000000000000000FFFF
    FFFFFFFFFFFFFFE007FFFF0000FFFC00003FF800001FF000000FE0000007C000
    0003C0000003C0000003C0000003C0000003C0000003C0000003C0000003C000
    0003C0000003C0000003E0000003F0000003F8000003FC000003FF000003FFE0
    0003FFFF0003FFFF8007FFFFC00FFFFFE01FFFFFF03FFFFFF8FFFFFFFFFF}
  Menu = MainMenu1
  OldCreateOrder = False
  WindowState = wsMaximized
  OnClose = FormClose
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Label10: TLabel
    Left = 119
    Top = 33
    Width = 58
    Height = 20
    AutoSize = False
    Caption = #20851#38190#23383':'
  end
  object PageControl1: TPageControl
    Left = 0
    Top = 0
    Width = 747
    Height = 407
    ActivePage = TabSheet1
    Align = alClient
    TabIndex = 0
    TabOrder = 0
    object TabSheet1: TTabSheet
      Caption = #21407#26448#26009#30331#35760
      OnShow = TabSheet1Show
      object Label1: TLabel
        Left = 169
        Top = 9
        Width = 112
        Height = 13
        AutoSize = False
        Caption = #35831#36755#20837#26448#26009#21517#31216':'
      end
      object Label5: TLabel
        Left = 5
        Top = 10
        Width = 60
        Height = 13
        AutoSize = False
        Caption = #35831#36873#25321#31867':'
      end
      object Button1: TButton
        Left = 493
        Top = 3
        Width = 88
        Height = 25
        Caption = #30331#35760#26032#26448#26009'(&I)'
        TabOrder = 0
        OnClick = Button1Click
      end
      object Button2: TButton
        Left = 595
        Top = 3
        Width = 85
        Height = 25
        Caption = #20462#25913#25968#25454'(&C)'
        TabOrder = 1
        OnClick = DBGrid1DblClick
      end
      object Button3: TButton
        Left = 692
        Top = 3
        Width = 85
        Height = 25
        Caption = #21024#38500#25968#25454'(&D)'
        TabOrder = 2
        OnClick = Button3Click
      end
      object DBGrid1: TDBGrid
        Left = -11
        Top = 34
        Width = 801
        Height = 451
        DataSource = DataSource1
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit, dgMultiSelect]
        PopupMenu = PopupMenu1
        TabOrder = 3
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        OnCellClick = DBGrid1CellClick
        OnDblClick = DBGrid1DblClick
        Columns = <
          item
            Expanded = False
            FieldName = 'cailiaoming'
            Title.Alignment = taCenter
            Title.Caption = #26448#26009#21517
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'guigexinghao'
            Title.Alignment = taCenter
            Title.Caption = #35268#26684#22411#21495
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'danwei'
            Title.Alignment = taCenter
            Title.Caption = #21333#20301
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'danjia'
            Title.Alignment = taCenter
            Title.Caption = #21333#20215
            Visible = True
          end>
      end
      object Button7: TButton
        Left = 392
        Top = 3
        Width = 86
        Height = 25
        Caption = #27169#31946#26597#35810'(&S)'
        TabOrder = 4
        OnClick = Button7Click
      end
      object ComboBox2: TComboBox
        Left = 66
        Top = 6
        Width = 100
        Height = 21
        Style = csDropDownList
        ItemHeight = 13
        TabOrder = 5
        OnClick = ComboBox2Click
        OnDropDown = ComboBox2DropDown
        Items.Strings = (
          #22806#24310#29255
          #21171#20445
          #31232#36149#37329#23646
          #21270#23398#35797#21058
          #20302#32791
          #26426#30005)
      end
      object ComboBox3: TComboBox
        Left = 272
        Top = 6
        Width = 114
        Height = 21
        ItemHeight = 13
        TabOrder = 6
        Items.Strings = (
          '')
      end
    end
    object TabSheet2: TTabSheet
      Caption = #22806#24310#29255
      ImageIndex = 1
      OnShow = TabSheet2Show
      object Label2: TLabel
        Left = 4
        Top = 7
        Width = 62
        Height = 13
        AutoSize = False
        Caption = #26597#35810#26465#20214':'
      end
      object Label6: TLabel
        Left = 114
        Top = 10
        Width = 58
        Height = 20
        AutoSize = False
        Caption = #20851#38190#23383':'
      end
      object Label20: TLabel
        Left = 207
        Top = 9
        Width = 27
        Height = 23
        AutoSize = False
        Caption = #24180
      end
      object Label21: TLabel
        Left = 255
        Top = 11
        Width = 24
        Height = 31
        AutoSize = False
        Caption = #26376
      end
      object Label32: TLabel
        Left = 255
        Top = 10
        Width = 20
        Height = 19
        AutoSize = False
        Caption = #21040
        Visible = False
      end
      object DBGrid2: TDBGrid
        Left = -1
        Top = 31
        Width = 791
        Height = 454
        DataSource = DataSource1
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit, dgMultiSelect]
        PopupMenu = PopupMenu2
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        Columns = <
          item
            Expanded = False
            FieldName = 'cailiaoming'
            Title.Alignment = taCenter
            Title.Caption = #26448#26009#21517#31216
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'danwei'
            Title.Alignment = taCenter
            Title.Caption = #21333#20301
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'danjia'
            Title.Alignment = taCenter
            Title.Caption = #21333#20215
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'kucunshuliang'
            Title.Alignment = taCenter
            Title.Caption = #25968#37327'('#24211#23384#25968')'
            Width = 83
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'kucunjine'
            Title.Alignment = taCenter
            Title.Caption = #37329#39069'('#24211#23384#25968')'
            Width = 77
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'rukushuliang'
            Title.Alignment = taCenter
            Title.Caption = #25968#37327'('#20837#24211#25968')'
            Width = 77
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'rukujine'
            Title.Alignment = taCenter
            Title.Caption = #37329#39069'('#20837#24211')'
            Width = 75
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'scbshuliang'
            Title.Caption = #25968#37327'('#29983#20135#37096')'
            Width = 75
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'scbjine'
            Title.Alignment = taCenter
            Title.Caption = #37329#39069'('#29983#20135#37096')'
            Width = 75
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'qgbshuliang'
            Title.Alignment = taCenter
            Title.Caption = #25968#37327'('#20225#31649#37096')'
            Width = 75
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'qgbjine'
            Title.Alignment = taCenter
            Title.Caption = #37329#39069'('#20225#31649#37096')'
            Width = 75
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'zbshuliang'
            Title.Alignment = taCenter
            Title.Caption = #25968#37327'('#24635#21150')'
            Width = 75
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'zbjine'
            Title.Alignment = taCenter
            Title.Caption = #37329#39069'('#24635#21150')'
            Width = 75
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'cwbshuliang'
            Title.Alignment = taCenter
            Title.Caption = #25968#37327'('#36130#21153#37096')'
            Width = 75
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'cwbjine'
            Title.Alignment = taCenter
            Title.Caption = #37329#39069'('#36130#21153#37096')'
            Width = 75
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'pgbshuliang'
            Title.Alignment = taCenter
            Title.Caption = #25968#37327'('#21697#31649#37096')'
            Width = 75
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'pgbjine'
            Title.Alignment = taCenter
            Title.Caption = #37329#39069'('#21697#31649#37096')'
            Width = 75
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'cgzxshuliang'
            Title.Alignment = taCenter
            Title.Caption = #25968#37327'('#38144#31649#20013#24515')'
            Width = 80
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'sgzxjine'
            Title.Alignment = taCenter
            Title.Caption = #37329#39069'('#38144#31649#20013#24515')'
            Width = 80
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ywbshuliang'
            Title.Alignment = taCenter
            Title.Caption = #25968#37327'('#19994#21153#37096')'
            Width = 75
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ywbjine'
            Title.Alignment = taCenter
            Title.Caption = #37329#39069'('#19994#21153#37096')'
            Width = 75
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'gcbshuliang'
            Title.Alignment = taCenter
            Title.Caption = #25968#37327'('#24037#31243#37096')'
            Width = 75
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'gcbjine'
            Title.Alignment = taCenter
            Title.Caption = #37329#39069'('#24037#31243#37096')'
            Width = 75
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'qjcshuliang'
            Title.Alignment = taCenter
            Title.Caption = #25968#37327'('#22120#20214#21378')'
            Width = 75
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'qjcjine'
            Title.Alignment = taCenter
            Title.Caption = #37329#39069'('#22120#20214#21378')'
            Width = 75
            Visible = True
          end
          item
            Expanded = False