updwlap.dfm

工廠採購管理系統

            Top = 64
            Width = 81
            Height = 24
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -13
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            ParentFont = False
            TabOrder = 7
          end
        end
        object Panel4: TPanel
          Left = 8
          Top = 208
          Width = 807
          Height = 305
          Align = alCustom
          BevelOuter = bvNone
          TabOrder = 1
          object DBGridEh1: TDBGridEh
            Left = 0
            Top = 0
            Width = 807
            Height = 305
            Align = alClient
            DataSource = DataSource3
            Flat = False
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -13
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            FooterColor = clWindow
            FooterFont.Charset = DEFAULT_CHARSET
            FooterFont.Color = clWindowText
            FooterFont.Height = -11
            FooterFont.Name = 'MS Sans Serif'
            FooterFont.Style = []
            FooterRowCount = 1
            ParentFont = False
            SumList.Active = True
            TabOrder = 0
            TitleFont.Charset = DEFAULT_CHARSET
            TitleFont.Color = clWindowText
            TitleFont.Height = -13
            TitleFont.Name = 'MS Sans Serif'
            TitleFont.Style = []
            OnCellClick = DBGridEh1CellClick
            Columns = <
              item
                EditButtons = <>
                FieldName = 'gdhm'
                Footers = <
                  item
                    Value = #21512#35745#65306
                    ValueType = fvtStaticText
                  end>
                Title.Caption = #24037#31243#21333#21495
                Width = 94
              end
              item
                EditButtons = <>
                FieldName = 'wldm'
                Footers = <>
                Title.Caption = #29289#26009#20195#30721
                Width = 79
              end
              item
                EditButtons = <>
                FieldName = 'wlmc'
                Footers = <>
                Title.Caption = #29289#26009#21517#31216
                Width = 172
              end
              item
                EditButtons = <>
                FieldName = 'wlys'
                Footers = <>
                Title.Caption = #39068#33394
                Width = 53
              end
              item
                EditButtons = <>
                FieldName = 'wlsh'
                Footers = <>
                Title.Caption = #33394#21495
                Width = 46
              end
              item
                EditButtons = <>
                FieldName = 'dw'
                Footers = <>
                Title.Caption = #21333#20301
                Width = 40
              end
              item
                EditButtons = <>
                FieldName = 'gysdm'
                Footers = <>
                Title.Caption = #20379#24212#21830
                Width = 69
              end
              item
                EditButtons = <>
                FieldName = 'xql'
                Footers = <
                  item
                    FieldName = 'xql'
                    ValueType = fvtSum
                  end>
                Title.Caption = #38656#27714#37327
                Width = 72
              end
              item
                EditButtons = <>
                FieldName = 'yfpsl'
                Footers = <
                  item
                    FieldName = 'yfpsl'
                    ValueType = fvtSum
                  end>
                Title.Caption = #24050#20998#37197#25968#37327
                Width = 81
              end>
          end
        end
        object Panel5: TPanel
          Left = 328
          Top = 16
          Width = 385
          Height = 185
          BevelOuter = bvNone
          TabOrder = 2
          object RzDBGrid1: TRzDBGrid
            Left = 0
            Top = 0
            Width = 385
            Height = 185
            Align = alClient
            DataSource = DataSource2
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -13
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            ParentFont = False
            ReadOnly = True
            TabOrder = 0
            TitleFont.Charset = DEFAULT_CHARSET
            TitleFont.Color = clWindowText
            TitleFont.Height = -13
            TitleFont.Name = 'MS Sans Serif'
            TitleFont.Style = []
            Columns = <
              item
                Expanded = False
                FieldName = 'wldm'
                Title.Caption = #29289#26009#32534#30721
                Width = 63
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'gysdm'
                Title.Caption = #20379#24212#21830
                Width = 66
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'sykc'
                Title.Caption = #21097#20313#24211#23384
                Width = 53
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'sjkc'
                Title.Caption = #23454#38469#24211#23384
                Width = 53
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'wlsh'
                Title.Caption = #33394#21495
                Width = 44
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'pym'
                Title.Caption = #25340#38899#30721
                Visible = True
              end>
          end
        end
      end
    end
  end
  object ADOQuery1: TADOQuery
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      '')
    Left = 688
    Top = 384
  end
  object ADOQuery2: TADOQuery
    Parameters = <>
    Left = 688
    Top = 200
  end
  object ADOQuery3: TADOQuery
    Parameters = <>
    Left = 624
    Top = 328
  end
  object DataSource1: TDataSource
    DataSet = ADOQuery1
    Left = 664
    Top = 200
  end
  object frReport1: TfrReport
    Dataset = frDBDataSet1
    InitialZoom = pzDefault
    PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbHelp, pbExit]
    Left = 552
    Top = 320
    ReportForm = {18000000}
  end
  object frDBDataSet1: TfrDBDataSet
    DataSource = DataSource1
    Left = 480
    Top = 320
  end
  object PopupMenu1: TPopupMenu
    Left = 640
    Top = 248
    object N1: TMenuItem
      Caption = #21024#38500#35760#24405
      OnClick = N1Click
    end
    object N2: TMenuItem
      Caption = #28155#21152#35760#24405
      OnClick = N2Click
    end
    object N3: TMenuItem
      Caption = #26597#25214
      ShortCut = 112
      Visible = False
      OnClick = N3Click
    end
  end
  object ADOQuery4: TADOQuery
    Parameters = <>
    Left = 336
    Top = 328
  end
  object DataSource2: TDataSource
    DataSet = ADOQuery4
    Left = 376
    Top = 296
  end
  object ADOQuery5: TADOQuery
    Parameters = <>
    Left = 608
    Top = 280
  end
  object DataSource3: TDataSource
    DataSet = ADOQuery5
    Left = 600
    Top = 240
  end
  object ADOQuery6: TADOQuery
    Parameters = <>
    Left = 288
    Top = 144
  end
end