salesinfocenter.dfm

一个以前收集的基于C/S架构的ERP客户端源代码

          end
          item
            ColumnFont.Charset = GB2312_CHARSET
            ColumnFont.Color = clWindowText
            ColumnFont.Height = -12
            ColumnFont.Name = '宋体'
            ColumnFont.Style = []
            TitleString = '批号'
            ColumnWidth = 0
          end>
        HighLight = True
        ColWidths = (
          2
          60
          2
          80
          59
          64
          69
          56
          59
          35
          28
          60
          79
          55
          47
          50
          51
          61
          56
          45
          64
          32
          33
          45
          45
          68)
        RowHeights = (
          18
          18
          18
          18
          18)
      end
    end
    object TabHistory: TTabSheet
      Caption = ' 历史'
      ImageIndex = 4
      OnEnter = TabHistoryEnter
      object sgHistoryGrid: TSDGrid
        Left = 0
        Top = 66
        Width = 773
        Height = 420
        Align = alBottom
        Anchors = [akLeft, akTop, akRight, akBottom]
        ColCount = 14
        Ctl3D = False
        DefaultRowHeight = 18
        FixedColor = clOlive
        Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSizing, goColSizing, goRowSelect]
        ParentCtl3D = False
        TabOrder = 0
        Columns = <
          item
            ColumnFont.Charset = DEFAULT_CHARSET
            ColumnFont.Color = clWindowText
            ColumnFont.Height = -11
            ColumnFont.Name = 'MS Sans Serif'
            ColumnFont.Style = []
            ColSort = csAsc
            ColumnWidth = 10
            Merged = True
          end
          item
            ColumnFont.Charset = DEFAULT_CHARSET
            ColumnFont.Color = clWindowText
            ColumnFont.Height = -11
            ColumnFont.Name = 'MS Sans Serif'
            ColumnFont.Style = []
            TitleString = '客户代码'
            ColumnWidth = 0
          end
          item
            ColumnFont.Charset = DEFAULT_CHARSET
            ColumnFont.Color = clWindowText
            ColumnFont.Height = -11
            ColumnFont.Name = 'MS Sans Serif'
            ColumnFont.Style = []
            TitleString = '订单号'
            ColumnWidth = 0
          end
          item
            ColumnFont.Charset = DEFAULT_CHARSET
            ColumnFont.Color = clWindowText
            ColumnFont.Height = -11
            ColumnFont.Name = 'MS Sans Serif'
            ColumnFont.Style = []
            TitleString = '商品名称'
            ColumnWidth = 0
          end
          item
            ColumnFont.Charset = GB2312_CHARSET
            ColumnFont.Color = clWindowText
            ColumnFont.Height = -12
            ColumnFont.Name = '宋体'
            ColumnFont.Style = []
            TitleString = '单位'
            ColumnWidth = 0
          end
          item
            ColumnFont.Charset = GB2312_CHARSET
            ColumnFont.Color = clWindowText
            ColumnFont.Height = -12
            ColumnFont.Name = '宋体'
            ColumnFont.Style = []
            ColHorAlign = haRight
            TitleString = '订单数量'
            ColumnWidth = 0
          end
          item
            ColumnFont.Charset = DEFAULT_CHARSET
            ColumnFont.Color = clWindowText
            ColumnFont.Height = -11
            ColumnFont.Name = 'MS Sans Serif'
            ColumnFont.Style = []
            TitleString = '订单审核'
            ColumnWidth = 0
          end
          item
            ColumnFont.Charset = GB2312_CHARSET
            ColumnFont.Color = clWindowText
            ColumnFont.Height = -12
            ColumnFont.Name = '宋体'
            ColumnFont.Style = []
            TitleString = '发货单号'
            ColumnWidth = 0
          end
          item
            ColumnFont.Charset = GB2312_CHARSET
            ColumnFont.Color = clWindowText
            ColumnFont.Height = -12
            ColumnFont.Name = '宋体'
            ColumnFont.Style = []
            ColHorAlign = haRight
            TitleString = '发货数量'
            ColumnWidth = 0
          end
          item
            ColumnFont.Charset = GB2312_CHARSET
            ColumnFont.Color = clWindowText
            ColumnFont.Height = -12
            ColumnFont.Name = '宋体'
            ColumnFont.Style = []
            TitleString = '发货审核'
            ColumnWidth = 0
          end
          item
            ColumnFont.Charset = GB2312_CHARSET
            ColumnFont.Color = clWindowText
            ColumnFont.Height = -12
            ColumnFont.Name = '宋体'
            ColumnFont.Style = []
            ColHorAlign = haRight
            TitleString = '发货数量'
            ColumnWidth = 0
          end
          item
            ColumnFont.Charset = GB2312_CHARSET
            ColumnFont.Color = clWindowText
            ColumnFont.Height = -12
            ColumnFont.Name = '宋体'
            ColumnFont.Style = []
            ColHorAlign = haRight
            TitleString = '备货数量'
            ColumnWidth = 0
          end
          item
            ColumnFont.Charset = GB2312_CHARSET
            ColumnFont.Color = clWindowText
            ColumnFont.Height = -12
            ColumnFont.Name = '宋体'
            ColumnFont.Style = []
            TitleString = '退货单号'
            ColumnWidth = 0
          end
          item
            ColumnFont.Charset = GB2312_CHARSET
            ColumnFont.Color = clWindowText
            ColumnFont.Height = -12
            ColumnFont.Name = '宋体'
            ColumnFont.Style = []
            ColHorAlign = haRight
            TitleString = '退货数量'
            ColumnWidth = 0
          end>
        HighLight = True
        ColWidths = (
          3
          79
          74
          67
          64
          64
          64
          64
          64
          64
          64
          64
          64
          64)
        RowHeights = (
          18
          18
          18
          18
          18)
      end
    end
    object TabSee: TTabSheet
      Caption = '基础资料'
      ImageIndex = 5
      OnEnter = TabSeeEnter
      object Panel_Client: TPanel
        Left = 0
        Top = 72
        Width = 773
        Height = 414
        Align = alBottom
        Anchors = [akLeft, akTop, akRight, akBottom]
        BevelOuter = bvNone
        TabOrder = 0
        object FloatPanel1: TFloatPanel
          Left = 0
          Top = 0
          Width = 277
          Height = 414
          Align = alLeft
          Color = clWhite
          Caption = 'FloatPanel1'
          ParentColor = False
          TabOrder = 0
          object Label11: TLabel
            Left = 16
            Top = 23
            Width = 54
            Height = 12
            Caption = '客户代码:'
            Font.Charset = GB2312_CHARSET
            Font.Color = clWindowText
            Font.Height = -12
            Font.Name = '宋体'
            Font.Style = []
            ParentFont = False
          end
          object Label12: TLabel
            Left = 16
            Top = 49
            Width = 54
            Height = 12
            Caption = '客户名称:'
            Font.Charset = GB2312_CHARSET
            Font.Color = clWindowText
            Font.Height = -12
            Font.Name = '宋体'
            Font.Style = []
            ParentFont = False
          end
          object Label13: TLabel
            Left = 16
            Top = 75
            Width = 54
            Height = 12
            Caption = '详细说明:'
            Font.Charset = GB2312_CHARSET
            Font.Color = clWindowText
            Font.Height = -12
            Font.Name = '宋体'
            Font.Style = []
            ParentFont = False
          end
          object Label14: TLabel
            Left = 16
            Top = 101
            Width = 54
            Height = 12
            Caption = '客户类型:'
            Font.Charset = GB2312_CHARSET
            Font.Color = clWindowText
            Font.Height = -12
            Font.Name = '宋体'
            Font.Style = []
            ParentFont = False
          end
          object Label28: TLabel
            Left = 16
            Top = 127
            Width = 54
            Height = 12
            Caption = '系统日期:'
            Font.Charset = GB2312_CHARSET
            Font.Color = clWindowText
            Font.Height = -12
            Font.Name = '宋体'
            Font.Style = []
            ParentFont = False
          end
          object deClientSysDate: TLabel
            Left = 70
            Top = 127
            Width = 90
            Height = 12
            Caption = 'deClientSysDate'
            Font.Charset = GB2312_CHARSET
            Font.Color = clWindowText
            Font.Height = -12
            Font.Name = '宋体'
            Font.Style = []
            ParentFont = False
          end
          object fpseClientCode: TSDEdit
            Left = 70
            Top = 18
            Width = 131
            Height = 18
            Ctl3D = False
            Font.Charset = GB2312_CHARSET
            Font.Color = clWindowText
            Font.Height = -12
            Font.Name = '宋体'
            Font.Style = []
            MaxLength = 18
            ParentColor = True
            ParentCtl3D = False
            ParentFont = False
            TabOrder = 0
            Text = 'fpseClientCode'
            SplitSymbol = ' | '
          end
          object fpseClientName: TSDEdit
            Left = 70
            Top = 45
            Width = 187
            Height = 18
            Ctl3D = False
            Font.Charset = GB2312_CHARSET
            Font.Color = clWindowText
            Font.Height = -12
            Font.Name = '宋体'
            Font.Style = []
            MaxLength = 99
            ParentColor = True
            ParentCtl3D = False
            ParentFont = False
            TabOrder = 1
            Text = 'fpseClientName'
            SplitSymbol = ' | '
          end
          object seClientDesc: TSDEdit
            Left = 70
            Top = 69
            Width = 188
            Height = 18
            Ctl3D = False
            Font.Charset = GB2312_CHARSET
            Font.Color = clWindowText
            Font.Height = -12
            Font.Name = '宋体'
            Font.Style = []
            ParentColor = True
            ParentCtl3D = False
            ParentFont = False
            TabOrder = 2
            Text = 'seClientDesc'
            SplitSymbol = ' | '
          end
          object scClientType: TSDComboBox
            Left = 70
            Top = 93
            Width = 191
            Height = 20
            Style = csDropDownList
            Color = clWhite
            Ctl3D = False
            Font.Charset = GB2312_CHARSET
            Font.Color = clWindowText
            Font.Height = -12
            Font.Name = '宋体'
            Font.Style = []
            ItemHeight = 0
            ParentCtl3D = False
            ParentFont = False
            TabOrder = 3
            KeyItem = cbItem2
          end
          object chkClientCancel: TCheckBox
            Left = 206
            Top = 19
            Width = 55
            Height = 20
            Caption = '已停用'
            Color = clWhite
            Font.Charset = GB2312_CHARSET
            Font.Color = clWindowText
            Font.Height = -12
            Font.Name = '宋体'
            Font.Style = []
            ParentColor = False
            ParentFont = False
            TabOrder = 4
          end
          object GroupBox2: TGroupBox
            Left = 12
            Top = 161
            Width = 248
            Height = 215
            Caption = '联系资料'
            TabOrder = 5
            object Label15: TLabel
              Left = 5
              Top = 47
              Width = 54