sueval.dfm

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

              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 = []
              ColumnWidth = 0
            end>
          ColWidths = (
            5
            33
            91
            64
            64)
        end
        object Grid_pfxz2: TSDGrid
          Left = 294
          Top = 1
          Width = 323
          Height = 442
          Align = alClient
          Anchors = [akLeft, akTop, akBottom]
          Ctl3D = False
          DefaultRowHeight = 18
          FixedColor = 8564917
          RowCount = 2
          Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSizing, goColSizing, goAlwaysShowEditor]
          ParentCtl3D = False
          TabOrder = 0
          Columns = <
            item
              ColumnFont.Charset = DEFAULT_CHARSET
              ColumnFont.Color = clWindowText
              ColumnFont.Height = -11
              ColumnFont.Name = 'MS Sans Serif'
              ColumnFont.Style = []
              ColumnWidth = 0
            end
            item
              ColumnFont.Charset = DEFAULT_CHARSET
              ColumnFont.Color = clWindowText
              ColumnFont.Height = -11
              ColumnFont.Name = 'MS Sans Serif'
              ColumnFont.Style = []
              ColSort = csAsc
              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 = DEFAULT_CHARSET
              ColumnFont.Color = clWindowText
              ColumnFont.Height = -11
              ColumnFont.Name = 'MS Sans Serif'
              ColumnFont.Style = []
              TitleString = '编 号'
              ColumnWidth = 0
            end>
          ColWidths = (
            3
            36
            84
            203
            64)
          RowHeights = (
            18
            18)
        end
        object Panel4: TPanel
          Left = 253
          Top = 1
          Width = 41
          Height = 442
          Align = alLeft
          TabOrder = 2
          object Splitter5: TSplitter
            Left = 1
            Top = 1
            Width = 5
            Height = 440
            Cursor = crHSplit
            Beveled = True
          end
          object BitBtn_AllRight: TBitBtn
            Left = 9
            Top = 129
            Width = 28
            Height = 24
            Caption = '<<'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = [fsBold]
            ParentFont = False
            TabOrder = 0
            OnClick = BitBtn_AllRightClick
          end
          object BitBtn_AllLeft: TBitBtn
            Left = 9
            Top = 97
            Width = 28
            Height = 24
            Caption = '>>'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = [fsBold]
            ParentFont = False
            TabOrder = 1
            OnClick = BitBtn_AllLeftClick
          end
          object BitBtnRight: TBitBtn
            Left = 9
            Top = 65
            Width = 28
            Height = 24
            Caption = '<'
            Font.Charset = ANSI_CHARSET
            Font.Color = clWindowText
            Font.Height = -12
            Font.Name = 'MS Sans Serif'
            Font.Style = [fsBold]
            ParentFont = False
            TabOrder = 2
            OnClick = BitBtnRightClick
          end
          object BitBtn_Left: TBitBtn
            Left = 9
            Top = 33
            Width = 28
            Height = 24
            Caption = '>'
            Font.Charset = ANSI_CHARSET
            Font.Color = clWindowText
            Font.Height = -12
            Font.Name = 'MS Sans Serif'
            Font.Style = [fsBold]
            ParentFont = False
            TabOrder = 3
            OnClick = BitBtn_LeftClick
          end
        end
      end
    end
    object TabSheet4: TTabSheet
      Caption = '供 应 商 确 认'
      ImageIndex = 3
      object Splitter3: TSplitter
        Left = 0
        Top = 35
        Width = 618
        Height = 5
        Cursor = crVSplit
        Align = alTop
        Beveled = True
      end
      object Panel1: TPanel
        Left = 0
        Top = 0
        Width = 618
        Height = 35
        Align = alTop
        TabOrder = 0
        object Label6: TLabel
          Left = 11
          Top = 13
          Width = 60
          Height = 12
          Caption = '所选内容：'
        end
        object SDEdit4: TSDEdit
          Left = 72
          Top = 9
          Width = 161
          Height = 20
          ParentColor = True
          ReadOnly = True
          TabOrder = 0
          SplitSymbol = ' | '
        end
        object BitBtn1_sup1: TBitBtn
          Left = 282
          Top = 6
          Width = 68
          Height = 25
          Caption = '第一供应商'
          TabOrder = 1
          OnClick = BitBtn1_sup1Click
        end
        object BitBtn1_sup2: TBitBtn
          Left = 353
          Top = 6
          Width = 68
          Height = 25
          Caption = '第二供应商'
          TabOrder = 2
          OnClick = BitBtn1_sup2Click
        end
        object BitBtn1_sup3: TBitBtn
          Left = 424
          Top = 6
          Width = 68
          Height = 25
          Caption = '第三供应商'
          TabOrder = 3
          OnClick = BitBtn1_sup3Click
        end
        object BitBtn_clear: TBitBtn
          Left = 494
          Top = 6
          Width = 68
          Height = 25
          Caption = '清 除'
          TabOrder = 4
          OnClick = BitBtn_clearClick
        end
      end
      object Panel2: TPanel
        Left = 0
        Top = 40
        Width = 618
        Height = 439
        Align = alClient
        Caption = 'Panel2'
        TabOrder = 1
        object Splitter4: TSplitter
          Left = 262
          Top = 1
          Width = 5
          Height = 437
          Cursor = crHSplit
          Beveled = True
        end
        object Grid_supply1: TSDGrid
          Left = 1
          Top = 1
          Width = 261
          Height = 437
          Align = alLeft
          Ctl3D = False
          DefaultRowHeight = 18
          FixedColor = 8564917
          RowCount = 2
          Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSizing, goColSizing, goAlwaysShowEditor]
          ParentCtl3D = False
          TabOrder = 0
          Columns = <
            item
              ColumnFont.Charset = DEFAULT_CHARSET
              ColumnFont.Color = clWindowText
              ColumnFont.Height = -11
              ColumnFont.Name = 'MS Sans Serif'
              ColumnFont.Style = []
              ColumnWidth = 0
            end
            item
              EditType = sdEdit
              ColumnFont.Charset = DEFAULT_CHARSET
              ColumnFont.Color = clWindowText
              ColumnFont.Height = -11
              ColumnFont.Name = 'MS Sans Serif'
              ColumnFont.Style = []
              ColSort = csAsc
              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 = DEFAULT_CHARSET
              ColumnFont.Color = clWindowText
              ColumnFont.Height = -11
              ColumnFont.Name = 'MS Sans Serif'
              ColumnFont.Style = []
              ColumnWidth = 0
            end>
          ReadOnly = False
          ColWidths = (
            4
            28
            66
            157
            4)
        end
        object Grid_supply2: TSDGrid
          Left = 267
          Top = 1
          Width = 350
          Height = 437
          Align = alClient
          Ctl3D = False
          DefaultRowHeight = 18
          FixedColor = 8564917
          RowCount = 2
          Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSizing, goColSizing, goAlwaysShowEditor]
          ParentCtl3D = False
          TabOrder = 1
          Columns = <
            item
              ColumnFont.Charset = DEFAULT_CHARSET
              ColumnFont.Color = clWindowText
              ColumnFont.Height = -11
              ColumnFont.Name = 'MS Sans Serif'
              ColumnFont.Style = []
              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 = 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>
          ReadOnly = False
          ColWidths = (
            3
            93
            86
            170
            58)
          RowHeights = (
            18
            18)
        end
      end
    end
  end
  inherited MainMenu1: TMainMenu
    Left = 682
    Top = 3
  end
  inherited ImageList1: TImageList
    Left = 713
    Top = 2
  end
  inherited RecPrintDlg: TPrintDialog
    Left = 651
    Top = 7
  end
  inherited PrnSetupDlg: TPrinterSetupDialog
    Left = 619
    Top = 7
  end
end