productunit.dfm

用友系统二次开发 存货管理 客户管理 订货审核 退货审核 铺货计划 调货计划

              AutoSize = False
              Caption = '0'
              Properties.Alignment.Horz = taCenter
              Style.BorderStyle = ebsFlat
              Height = 17
              Width = 44
            end
            object stPrice: TcxCalcEdit
              Left = 126
              Top = 150
              EditValue = 0.000000000000000000
              Enabled = False
              ParentFont = False
              Properties.Alignment.Horz = taCenter
              Style.Font.Charset = DEFAULT_CHARSET
              Style.Font.Color = clBlue
              Style.Font.Height = -11
              Style.Font.Name = 'MS Sans Serif'
              Style.Font.Style = []
              TabOrder = 16
              Width = 76
            end
            object Source: TcxComboBox
              Left = 79
              Top = 200
              Properties.Items.Strings = (
                #20379#24212#21830#38477#20215
                #20379#24212#21830#21319#20215
                #36135#21697#28382#38144','#38477#20215#38144#21806
                #21407#27733#22836#32463#33829#36135#21697)
              TabOrder = 17
              Text = #20379#24212#21830#38477#20215
              Width = 123
            end
            object cxLabel17: TcxLabel
              Left = 16
              Top = 201
              Caption = #35843#20215#21407#22240
            end
            object tzPrice: TcxButton
              Left = 24
              Top = 224
              Width = 75
              Height = 25
              Caption = #35843#25972#20215#26684
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clBlue
              Font.Height = -11
              Font.Name = 'MS Sans Serif'
              Font.Style = []
              ParentFont = False
              TabOrder = 19
              OnClick = tzPriceClick
            end
            object bqtPrice: TcxCheckBox
              Left = 8
              Top = 176
              Caption = #25209#23450#20215
              TabOrder = 20
              OnClick = bqtPriceClick
              Width = 65
            end
            object qtPrice: TcxCalcEdit
              Left = 126
              Top = 174
              EditValue = 0.000000000000000000
              Enabled = False
              ParentFont = False
              Properties.Alignment.Horz = taCenter
              Style.Font.Charset = DEFAULT_CHARSET
              Style.Font.Color = clBlue
              Style.Font.Height = -11
              Style.Font.Name = 'MS Sans Serif'
              Style.Font.Style = []
              TabOrder = 21
              Width = 76
            end
            object PriceListBox: TListBox
              Left = 2
              Top = 322
              Width = 105
              Height = 114
              Align = alBottom
              BevelInner = bvNone
              BorderStyle = bsNone
              Color = clBtnFace
              Ctl3D = False
              ItemHeight = 13
              ParentCtl3D = False
              TabOrder = 22
            end
          end
          object GroupBox3: TGroupBox
            Left = 469
            Top = 0
            Width = 180
            Height = 438
            Align = alRight
            Caption = #12288#20854#23427#23458#25143#12288
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            ParentFont = False
            TabOrder = 1
            object noCustList: TCheckListBox
              Left = 2
              Top = 15
              Width = 176
              Height = 421
              Align = alClient
              BorderStyle = bsNone
              Color = clBtnFace
              ItemHeight = 13
              TabOrder = 0
            end
          end
          object GroupBox5: TGroupBox
            Left = 109
            Top = 0
            Width = 180
            Height = 438
            Align = alRight
            Caption = #12288#19968#33324#23458#25143#12288
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            ParentFont = False
            TabOrder = 2
            object xsCustList: TCheckListBox
              Left = 2
              Top = 15
              Width = 176
              Height = 421
              Align = alClient
              BorderStyle = bsNone
              Color = clBtnFace
              ItemHeight = 13
              TabOrder = 0
            end
          end
          object GroupBox6: TGroupBox
            Left = 289
            Top = 0
            Width = 180
            Height = 438
            Align = alRight
            Caption = #12288#22806#30465#23458#25143#12288
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            ParentFont = False
            TabOrder = 3
            object wsCustList: TCheckListBox
              Left = 2
              Top = 15
              Width = 176
              Height = 421
              Align = alClient
              BorderStyle = bsNone
              Color = clBtnFace
              ItemHeight = 13
              TabOrder = 0
            end
          end
        end
      end
    end
    object Panel6: TPanel
      Left = 0
      Top = 0
      Width = 653
      Height = 145
      Align = alTop
      BevelInner = bvRaised
      BevelOuter = bvLowered
      TabOrder = 1
      object cxLabel4: TcxLabel
        Left = 16
        Top = 112
        Caption = #20027#20379#24212#21830
      end
      object cxLabel23: TcxLabel
        Left = 80
        Top = 113
        AutoSize = False
        ParentFont = False
        Properties.Alignment.Horz = taLeftJustify
        Style.BorderStyle = ebsFlat
        Style.Font.Charset = DEFAULT_CHARSET
        Style.Font.Color = clBlue
        Style.Font.Height = -11
        Style.Font.Name = 'MS Sans Serif'
        Style.Font.Style = []
        Height = 17
        Width = 81
      end
      object cxLabel14: TcxLabel
        Left = 176
        Top = 112
        Caption = #35843#20215#35760#24405
      end
      object cxDBLabel12: TcxDBLabel
        Left = 240
        Top = 113
        DataBinding.DataField = 'cInvDefine7'
        DataBinding.DataSource = dsQueryInv
        ParentFont = False
        Properties.Alignment.Horz = taLeftJustify
        Style.BorderStyle = ebsFlat
        Style.Font.Charset = DEFAULT_CHARSET
        Style.Font.Color = clBlue
        Style.Font.Height = -11
        Style.Font.Name = 'MS Sans Serif'
        Style.Font.Style = []
        Height = 17
        Width = 241
      end
      object LSPrice_Label: TcxDBLabel
        Left = 240
        Top = 96
        DataBinding.DataField = 'iInvLSCost'
        DataBinding.DataSource = dsQueryInv
        ParentFont = False
        Properties.Alignment.Horz = taLeftJustify
        Style.BorderStyle = ebsFlat
        Style.Font.Charset = DEFAULT_CHARSET
        Style.Font.Color = clBlue
        Style.Font.Height = -11
        Style.Font.Name = 'MS Sans Serif'
        Style.Font.Style = []
        Height = 17
        Width = 81
      end
      object cxLabel12: TcxLabel
        Left = 176
        Top = 96
        Caption = #22806#30465#20215#26684
      end
      object cxDBLabel15: TcxDBLabel
        Left = 80
        Top = 96
        DataBinding.DataField = 'iInvSPrice'
        DataBinding.DataSource = dsQueryInv
        ParentFont = False
        Properties.Alignment.Horz = taLeftJustify
        Style.BorderStyle = ebsFlat
        Style.Font.Charset = DEFAULT_CHARSET
        Style.Font.Color = clBlue
        Style.Font.Height = -11
        Style.Font.Name = 'MS Sans Serif'
        Style.Font.Style = []
        Height = 17
        Width = 81
      end
      object cxDBLabel5: TcxDBLabel
        Left = 80
        Top = 80
        DataBinding.DataField = 'cInvDefine6'
        DataBinding.DataSource = dsQueryInv
        ParentFont = False
        Properties.Alignment.Horz = taLeftJustify
        Style.BorderStyle = ebsFlat
        Style.Font.Charset = DEFAULT_CHARSET
        Style.Font.Color = clBlue
        Style.Font.Height = -11
        Style.Font.Name = 'MS Sans Serif'
        Style.Font.Style = []
        Height = 17
        Width = 81
      end
      object cxDBLabel2: TcxDBLabel
        Left = 80
        Top = 65
        DataBinding.DataField = 'dSDate'
        DataBinding.DataSource = dsQueryInv
        ParentFont = False
        Properties.Alignment.Horz = taLeftJustify
        Style.BorderStyle = ebsFlat
        Style.Font.Charset = DEFAULT_CHARSET
        Style.Font.Color = clBlue
        Style.Font.Height = -11
        Style.Font.Name = 'MS Sans Serif'
        Style.Font.Style = []
        Height = 17
        Width = 81
      end
      object cxDBLabel6: TcxDBLabel
        Left = 80
        Top = 48
        DataBinding.DataField = 'cInvStd'
        DataBinding.DataSource = dsQueryInv
        ParentFont = False
        Properties.Alignment.Horz = taLeftJustify
        Style.BorderStyle = ebsFlat
        Style.Font.Charset = DEFAULT_CHARSET
        Style.Font.Color = clBlue
        Style.Font.Height = -11
        Style.Font.Name = 'MS Sans Serif'
        Style.Font.Style = []
        Height = 17
        Width = 81
      end
      object cxLabel11: TcxLabel
        Left = 16
        Top = 96
        Caption = #25104#26412#20215#26684
      end
      object cxLabel8: TcxLabel
        Left = 16
        Top = 80
        Caption = #21697#29260#31867#21035
      end
      object cxLabel5: TcxLabel
        Left = 16
        Top = 64
        Caption = #26032#27454#26085#26399
      end
      object cxLabel1: TcxLabel
        Left = 16
        Top = 48
        Caption = #21253#35013#35268#26684
      end
      object ProdCode: TcxDBLabel
        Left = 16
        Top = 18
        DataBinding.DataField = 'cInvCode'
        DataBinding.DataSource = dsQueryInv
        ParentFont = False
        Properties.Alignment.Horz = taLeftJustify
        Style.BorderStyle = ebsFlat
        Style.Font.Charset = DEFAULT_CHARSET
        Style.Font.Color = clBlue
        Style.Font.Height = -11
        Style.Font.Name = 'MS Sans Serif'
        Style.Font.Style = []
        Height = 17
        Width = 129
      end
      object cxDBLabel1: TcxDBLabel
        Left = 152
        Top = 16
        DataBinding.DataField = 'cInvName'
        DataBinding.DataSource = dsQueryInv
        ParentFont = False
        Style.BorderStyle = ebsFlat
        Style.Font.Charset = DEFAULT_CHARSET
        Style.Font.Color = clBlue
        Style.Font.Height = -13
        Style.Font.Name = 'MS Sans Serif'
        Style.Font.Style = []
        Height = 21
        Width = 329
      end
      object cxDBLabel3: TcxDBLabel
        Left = 240
        Top = 48
        DataBinding.DataField = 'cInvABC'
        DataBinding.DataSource = dsQueryInv
        ParentFont = False
        Properties.Alignment.Horz = taLeftJustify
        Style.BorderStyle = ebsFlat
        Style.Font.Charset = DEFAULT_CHARSET
        Style.Font.Color = clBlue
        Style.Font.Height = -11
        Style.Font.Name = 'MS Sans Serif'
        Style.Font.Style = []
        Height = 17
        Width = 81
      end
      object cxDBLabel9: TcxDBLabel
        Left = 240
        Top = 64
        DataBinding.DataField = 'cInvDefine16'
        DataBinding.DataSource = dsQueryInv
        ParentFont = False
        Properties.Alignment.Horz = taLeftJustify
        Style.BorderStyle = ebsFlat
        Style.Font.Charset = DEFAULT_CHARSET
        Style.Font.Color = clBlue
        Style.Font.Height = -11
        Style.Font.Name = 'MS Sans Serif'
        Style.Font.Style = []
        Height = 17
        Width = 81
      end
      object cxDBLabel8: TcxDBLabel
        Left = 240
        Top = 81
        DataBinding.DataField = 'cLabel'
        DataBinding.DataSource = dsQueryInv
        ParentFont = False
        Properties.Alignment.Horz = taLeftJustify
        Style.BorderStyle = ebsFlat
        Style.Font.Charset = DEFAULT_CHARSET
        Style.Font.Color = clBlue
        Style.Font.Height = -11
        Style.Font.Name = 'MS Sans Serif'
        Style.Font.Style = []
        Height = 17
        Width = 81
      end
      object cxLabel9: TcxLabel
        Left = 176
        Top = 80
        Caption = #21697#29260#21517#31216
      end
      object cxLabel6: TcxLabel
        Left = 176
        Top = 64
        Caption = #20572#37319#26085#26399
      end
      object cxLabel2: TcxLabel
        Left = 176
        Top = 48
        AutoSize = False
        Caption = #21830#21697#32423#21035
        Height = 17
        Width = 64
      end
      object cxLabel13: TcxLabel
        Left = 336
        Top = 96
        Caption = #25209#21457#20215#26684
      end
      object cxLabel10: TcxLabel
        Left = 336
        Top = 80
        Caption = #24341#36827#21407#31216
      end
      object cxLabel7: TcxLabel
        Left = 336
        Top = 64
        Caption = #20572#37319#22791#27880
      end
      object cxLabel3: TcxLabel
        Left = 336
        Top = 48
        AutoSize = False
        Caption = #23384#25918#36135#20301
        Height = 17
        Width = 64
      end
      object cxDBLabel4: TcxDBLabel
        Left = 400
        Top = 47
        DataBinding.DataField = 'cInvDefine1'
        DataBinding.DataSource = dsQueryInv
        ParentFont = False
        Properties.Alignment.Horz = taLeftJustify
        Style.BorderStyle = ebsFlat
        Style.Font.Charset = DEFAULT_CHARSET
        Style.Font.Color = clBlue
        Style.Font.Height = -11
        Style.Font.Name = 'MS Sans Serif'
        Style.Font.Style = []
        Height = 17
        Width = 81
      end
      object cxDBLabel11: TcxDBLabel
        Left = 400
        Top = 63
        DataBinding.DataField = 'cInvDefine3'
        DataBinding.DataSource = dsQueryInv
        ParentFont = False
        Properties.Alignment.Horz = taLeftJustify
        Style.BorderStyle = ebsFlat
        Style.Font.Charset = DEFAULT_CHARSET
        Style.Font.Color = clBlue
        Style.Font.Height = -11
        Style.Font.Name = 'MS Sans Serif'
        Style.Font.Style = []
        Height = 17
        Width = 81
      end
      object cxDBLabel10: TcxDBLabel
        Left = 400
        Top = 80
        DataBinding.DataField = 'cCurrencyName'
        DataBinding.DataSource = dsQueryInv