unit_invmanage.~dfm

用友ERP功能扩展

      object cxDBLabel13: TcxDBLabel
        Left = 600
        Top = 265
        AutoSize = True
        DataBinding.DataField = 'iInvSPrice'
        DataBinding.DataSource = Form_Data.DS_Inventory
        ImeName = #26234#33021#38472#26725#36755#20837#24179#21488'  5.4'
        Properties.Alignment.Horz = taLeftJustify
        Properties.LabelStyle = cxlsLowered
        Properties.Orientation = cxoRight
      end
      object cxLabel15: TcxLabel
        Left = 544
        Top = 281
        Caption = #25209#21457#20215':'
      end
      object cxDBLabel14: TcxDBLabel
        Left = 600
        Top = 281
        AutoSize = True
        DataBinding.DataField = 'iInvSCost'
        DataBinding.DataSource = Form_Data.DS_Inventory
        ImeName = #26234#33021#38472#26725#36755#20837#24179#21488'  5.4'
        Properties.Alignment.Horz = taLeftJustify
        Properties.LabelStyle = cxlsLowered
        Properties.Orientation = cxoRight
      end
      object cxLabel16: TcxLabel
        Left = 544
        Top = 297
        Caption = #22806#30465#20215':'
      end
      object cxDBLabel15: TcxDBLabel
        Left = 600
        Top = 297
        AutoSize = True
        DataBinding.DataField = 'iInvLSCost'
        DataBinding.DataSource = Form_Data.DS_Inventory
        ImeName = #26234#33021#38472#26725#36755#20837#24179#21488'  5.4'
        Properties.Alignment.Horz = taLeftJustify
        Properties.LabelStyle = cxlsLowered
        Properties.Orientation = cxoRight
      end
      object cxDBLabel16: TcxDBLabel
        Left = 152
        Top = 341
        AutoSize = True
        DataBinding.DataField = 'cmemo'
        DataBinding.DataSource = Form_Data.DS_InventoryForCust
        ImeName = #26234#33021#38472#26725#36755#20837#24179#21488'  5.4'
        Properties.Alignment.Horz = taLeftJustify
        Properties.LabelStyle = cxlsLowered
        Properties.Orientation = cxoRight
      end
      object cxLabel17: TcxLabel
        Left = 544
        Top = 201
        Caption = #38144'       '#21806
      end
      object cxDBLabel17: TcxDBLabel
        Left = 600
        Top = 201
        AutoSize = True
        DataBinding.DataField = 'bSale'
        DataBinding.DataSource = Form_Data.DS_Inventory
        ImeName = #26234#33021#38472#26725#36755#20837#24179#21488'  5.4'
        Properties.LabelStyle = cxlsLowered
      end
      object cxLabel18: TcxLabel
        Left = 544
        Top = 217
        Caption = #37319'       '#36141
      end
      object cxDBLabel18: TcxDBLabel
        Left = 600
        Top = 217
        AutoSize = True
        DataBinding.DataField = 'bPurchase'
        DataBinding.DataSource = Form_Data.DS_Inventory
        ImeName = #26234#33021#38472#26725#36755#20837#24179#21488'  5.4'
        Properties.LabelStyle = cxlsLowered
      end
      object cxLabel19: TcxLabel
        Left = 544
        Top = 233
        Caption = #20572#27490#37319#36141
      end
      object cxDBLabel19: TcxDBLabel
        Left = 600
        Top = 233
        DataBinding.DataField = 'cInvDefine16'
        DataBinding.DataSource = Form_Data.DS_Inventory
        ImeName = #26234#33021#38472#26725#36755#20837#24179#21488'  5.4'
        Properties.LabelStyle = cxlsLowered
        Height = 18
        Width = 59
      end
      object cxDBLabel20: TcxDBLabel
        Left = 600
        Top = 246
        DataBinding.DataField = 'cInvDefine3'
        DataBinding.DataSource = Form_Data.DS_Inventory
        ImeName = #26234#33021#38472#26725#36755#20837#24179#21488'  5.4'
        Properties.LabelStyle = cxlsLowered
        Height = 18
        Width = 59
      end
      object dxDBGrid9: TdxDBGrid
        Left = 536
        Top = 359
        Width = 153
        Height = 83
        Bands = <
          item
          end>
        DefaultLayout = True
        HeaderPanelRowCount = 1
        SummaryGroups = <>
        SummarySeparator = ', '
        Ctl3D = False
        ParentCtl3D = False
        TabOrder = 23
        DataSource = Form_Data.DS_SaleSUM
        Filter.Criteria = {00000000}
        object dxDBGridMaskColumn79: TdxDBGridMaskColumn
          Alignment = taCenter
          Caption = #24180#26376
          HeaderAlignment = taCenter
          Width = 48
          BandIndex = 0
          RowIndex = 0
          FieldName = 'YearMM'
        end
        object dxDBGridColumn77: TdxDBGridColumn
          Alignment = taCenter
          HeaderAlignment = taCenter
          Visible = False
          BandIndex = 0
          RowIndex = 0
          FieldName = 'cInvCode'
        end
        object dxDBGridColumn78: TdxDBGridColumn
          Alignment = taCenter
          HeaderAlignment = taCenter
          Visible = False
          BandIndex = 0
          RowIndex = 0
          FieldName = 'cCusCode'
        end
        object dxDBGridMaskColumn80: TdxDBGridMaskColumn
          Alignment = taCenter
          Caption = #38144#21806#37327
          HeaderAlignment = taCenter
          Width = 42
          BandIndex = 0
          RowIndex = 0
          FieldName = 'SaleQTY'
        end
        object dxDBGridMaskColumn81: TdxDBGridMaskColumn
          Alignment = taCenter
          Caption = #36864#36135#37327
          HeaderAlignment = taCenter
          Width = 42
          BandIndex = 0
          RowIndex = 0
          FieldName = 'ReturnQTY'
        end
      end
      object dxDBGrid10: TdxDBGrid
        Left = 151
        Top = 359
        Width = 378
        Height = 83
        Bands = <
          item
          end>
        DefaultLayout = True
        HeaderPanelRowCount = 1
        SummaryGroups = <>
        SummarySeparator = ', '
        Ctl3D = False
        ParentCtl3D = False
        TabOrder = 24
        DataSource = Form_Data.DS_SQL_Price
        Filter.Criteria = {00000000}
        OptionsView = [edgoBandHeaderWidth, edgoRowSelect, edgoUseBitmap]
        object dxDBGridDateColumn10: TdxDBGridDateColumn
          Alignment = taCenter
          HeaderAlignment = taCenter
          Width = 62
          BandIndex = 0
          RowIndex = 0
          FieldName = #26085#27450
        end
        object dxDBGridMaskColumn82: TdxDBGridMaskColumn
          HeaderAlignment = taCenter
          Visible = False
          Width = 56
          BandIndex = 0
          RowIndex = 0
          FieldName = #36135#21697#20195#30721
        end
        object dxDBGridMaskColumn83: TdxDBGridMaskColumn
          Alignment = taCenter
          Caption = #31867#21035
          HeaderAlignment = taCenter
          Width = 42
          BandIndex = 0
          RowIndex = 0
          FieldName = #20215#26684#31867#21035
        end
        object dxDBGridCurrencyColumn2: TdxDBGridCurrencyColumn
          HeaderAlignment = taCenter
          Width = 42
          BandIndex = 0
          RowIndex = 0
          FieldName = #21407#20215
          DisplayFormat = ',0.00;-,0.00'
          Nullable = False
        end
        object dxDBGridCurrencyColumn3: TdxDBGridCurrencyColumn
          HeaderAlignment = taCenter
          Width = 42
          BandIndex = 0
          RowIndex = 0
          FieldName = #26032#20215
          DisplayFormat = ',0.00;-,0.00'
          Nullable = False
        end
        object dxDBGridColumn79: TdxDBGridColumn
          Alignment = taCenter
          HeaderAlignment = taCenter
          BandIndex = 0
          RowIndex = 0
          FieldName = #36890#30693#23458#25143
        end
        object dxDBGridMaskColumn84: TdxDBGridMaskColumn
          HeaderAlignment = taCenter
          Width = 76
          BandIndex = 0
          RowIndex = 0
          FieldName = #22791#27880
        end
        object dxDBGridMaskColumn85: TdxDBGridMaskColumn
          HeaderAlignment = taCenter
          Width = 42
          BandIndex = 0
          RowIndex = 0
          FieldName = #35843#20215#20154
        end
      end
      object GroupBox1: TGroupBox
        Left = 536
        Top = 24
        Width = 153
        Height = 129
        Cursor = crHandPoint
        TabOrder = 25
        Visible = False
        object LCB_PriceType: TcxLookupComboBox
          Left = 48
          Top = 16
          Cursor = crHandPoint
          AutoSize = False
          Properties.DropDownWidth = 100
          Properties.KeyFieldNames = 'PriceTCode'
          Properties.ListColumns = <
            item
              Caption = #20215#26684#21517#31216
              Width = 56
              FieldName = 'PriceTName'
            end
            item
              Caption = #20215#26684#20195#30721
              Width = 56
              FieldName = 'PriceTCode'
            end>
          Properties.ListOptions.ColumnSorting = False
          Properties.ListOptions.GridLines = glNone
          Properties.ListSource = Form_Data.dsPriceType
          Properties.MaxLength = 0
          TabOrder = 0
          Height = 21
          Width = 89
        end
        object cxLabel20: TcxLabel
          Left = 16
          Top = 20
          Caption = #31867#21035
        end
        object cxLabel21: TcxLabel
          Left = 16
          Top = 46
          Caption = #26032#20215
        end
        object cxTextEdit1: TcxTextEdit
          Left = 48
          Top = 43
          TabOrder = 3
          Width = 89
        end
        object BitBtn2: TBitBtn
          Left = 64
          Top = 96
          Width = 75
          Height = 25
          TabOrder = 4
          OnClick = BitBtn1Click
          Kind = bkOK
        end
        object cxLabel22: TcxLabel
          Left = 16
          Top = 72
          Caption = #22791#27880
        end
        object cxTextEdit2: TcxTextEdit
          Left = 48
          Top = 69
          TabOrder = 6
          Width = 89
        end
      end
      object Checkbox1: TCheckBox
        Left = 536
        Top = 8
        Width = 97
        Height = 17
        Caption = #35843#25972#20215#26684
        TabOrder = 26
        OnClick = CheckBox1Click
      end
    end
    object cxTabSheet1: TcxTabSheet
      Caption = #20915#31574#25903#25345
      ImageIndex = 1
      OnShow = cxTabSheet1Show
      object DBChart1: TDBChart
        Left = 0
        Top = 0
        Width = 700
        Height = 453
        BackWall.Brush.Color = clWhite
        BackWall.Brush.Style = bsClear
        Title.Text.Strings = (
          'TDBChart')
        Align = alBottom
        BorderStyle = bsSingle
        TabOrder = 0
        object DBGrid1: TDBGrid
          Left = 80
          Top = 112
          Width = 488
          Height = 248
          DataSource = DataSource1
          ImeName = #26234#33021#38472#26725#36755#20837#24179#21488'  5.4'
          TabOrder = 0
          TitleFont.Charset = DEFAULT_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -11
          TitleFont.Name = 'MS Sans Serif'
          TitleFont.Style = []
        end
      end
    end
  end
  object PopupMenu: TPopupMenu
    OwnerDraw = True
    Left = 360
    Top = 160
    object N10: TMenuItem
      Caption = #25253#20215#38480#38144#19981#38480#36864
      OnClick = N10Click
    end
    object N12: TMenuItem
      Caption = '-'
    end
    object N1: TMenuItem
      Caption = #27492#25351#23450#20215#22833#25928
      OnClick = N1Click
    end
    object N4: TMenuItem
      Caption = '-'
    end
    object N2: TMenuItem
      Caption = #25152#26377#25351#23450#20215#22833#25928
      OnClick = N2Click
    end
    object N5: TMenuItem
      Caption = '-'
    end
    object N3: TMenuItem
      Caption = #25152#26377#25351#23450#20215#22833#25928' +  '#36135#21697#38480#38144
      OnClick = N3Click
    end
    object N6: TMenuItem
      Caption = '-'
    end
    object N7: TMenuItem
      Caption = #24674#22797#22833#25928#25351#23450#20215
      OnClick = N7Click
    end
    object N8: TMenuItem
      Caption = '-'
    end
    object N11: TMenuItem
      Caption = #21462#28040#36135#21697#38480#38144
      OnClick = N11Click
    end
    object N9: TMenuItem
      Caption = '-'
    end
  end
  object DataSource1: TDataSource
    DataSet = Form_Data.tSQL
    Left = 280
    Top = 80
  end
  object XPMenu1: TXPMenu
    DimLevel = 30
    GrayLevel = 10
    Font.Charset = GB2312_CHARSET
    Font.Color = clMenuText
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = []
    Color = clBtnFace
    DrawMenuBar = False
    IconBackColor = clBtnFace
    MenuBarColor = clBtnFace
    SelectColor = clHighlight
    SelectBorderColor = clHighlight
    SelectFontColor = clMenuText
    Di