unit1.dfm

多点温度采集上位机程序(原程序),这是配合这是配套本人上传的“多点温度采集系统”的上位机程序

          object Series1: TFastLineSeries
            Marks.ArrowLength = 8
            Marks.Visible = False
            SeriesColor = clRed
            LinePen.Color = clRed
            XValues.DateTime = False
            XValues.Name = 'X'
            XValues.Multiplier = 1
            XValues.Order = loAscending
            YValues.DateTime = False
            YValues.Name = 'Y'
            YValues.Multiplier = 1
            YValues.Order = loNone
          end
        end
      end
      object bsSkinTabSheet2: TbsSkinTabSheet
        Caption = #36890#36947'2'
        object Tempe2Chart: TChart
          Left = 0
          Top = 0
          Width = 684
          Height = 259
          BackWall.Brush.Color = clWhite
          BackWall.Brush.Style = bsClear
          Title.Text.Strings = (
            #36890#36947'2'#65288#21333#20301#65306#8451#65289)
          View3D = False
          Align = alClient
          TabOrder = 0
          object Series2: TFastLineSeries
            Marks.ArrowLength = 8
            Marks.Visible = False
            SeriesColor = clLime
            LinePen.Color = clLime
            XValues.DateTime = False
            XValues.Name = 'X'
            XValues.Multiplier = 1
            XValues.Order = loAscending
            YValues.DateTime = False
            YValues.Name = 'Y'
            YValues.Multiplier = 1
            YValues.Order = loNone
          end
        end
      end
      object bsSkinTabSheet3: TbsSkinTabSheet
        Caption = #36890#36947'3'
        object Tempe3Chart: TChart
          Left = 0
          Top = 0
          Width = 684
          Height = 259
          BackWall.Brush.Color = clWhite
          BackWall.Brush.Style = bsClear
          Title.Text.Strings = (
            #36890#36947'3'#65288#21333#20301#65306#8451#65289)
          View3D = False
          Align = alClient
          TabOrder = 0
          object Series3: TFastLineSeries
            Marks.ArrowLength = 8
            Marks.Visible = False
            SeriesColor = clYellow
            LinePen.Color = clYellow
            XValues.DateTime = False
            XValues.Name = 'X'
            XValues.Multiplier = 1
            XValues.Order = loAscending
            YValues.DateTime = False
            YValues.Name = 'Y'
            YValues.Multiplier = 1
            YValues.Order = loNone
          end
        end
      end
      object bsSkinTabSheet4: TbsSkinTabSheet
        Caption = #20840#37096#26174#31034
        object TempeChart: TChart
          Left = 0
          Top = 0
          Width = 684
          Height = 259
          BackWall.Brush.Color = clWhite
          BackWall.Brush.Style = bsClear
          Title.Text.Strings = (
            #20840#37096#26174#31034#65288#21333#20301#65306#8451#65289)
          View3D = False
          Align = alClient
          TabOrder = 0
          object Series4: TFastLineSeries
            Marks.ArrowLength = 8
            Marks.Visible = False
            SeriesColor = clRed
            Title = #36890#36947'1'
            LinePen.Color = clRed
            XValues.DateTime = False
            XValues.Name = 'X'
            XValues.Multiplier = 1
            XValues.Order = loAscending
            YValues.DateTime = False
            YValues.Name = 'Y'
            YValues.Multiplier = 1
            YValues.Order = loNone
          end
          object Series5: TFastLineSeries
            Marks.ArrowLength = 8
            Marks.Visible = False
            SeriesColor = clLime
            Title = #36890#36947'2'
            LinePen.Color = clLime
            XValues.DateTime = False
            XValues.Name = 'X'
            XValues.Multiplier = 1
            XValues.Order = loAscending
            YValues.DateTime = False
            YValues.Name = 'Y'
            YValues.Multiplier = 1
            YValues.Order = loNone
          end
          object Series6: TFastLineSeries
            Marks.ArrowLength = 8
            Marks.Visible = False
            SeriesColor = clYellow
            Title = #36890#36947'3'
            LinePen.Color = clYellow
            XValues.DateTime = False
            XValues.Name = 'X'
            XValues.Multiplier = 1
            XValues.Order = loAscending
            YValues.DateTime = False
            YValues.Name = 'Y'
            YValues.Multiplier = 1
            YValues.Order = loNone
          end
        end
      end
    end
  end
  object bsSkinExPanel1: TbsSkinExPanel
    Left = 0
    Top = 22
    Width = 688
    Height = 99
    HintImageIndex = 0
    TabOrder = 2
    SkinData = bsSkinData1
    SkinDataName = 'expanel'
    DefaultFont.Charset = DEFAULT_CHARSET
    DefaultFont.Color = clWindowText
    DefaultFont.Height = 14
    DefaultFont.Name = 'Arial'
    DefaultFont.Style = []
    DefaultWidth = 0
    DefaultHeight = 0
    UseSkinFont = True
    CaptionImageIndex = -1
    NumGlyphs = 1
    Spacing = 2
    RealWidth = 0
    RealHeight = 0
    ShowRollButton = True
    ShowCloseButton = True
    DefaultCaptionHeight = 21
    RollState = False
    RollKind = rkRollVertical
    Align = alTop
    Caption = #25511#21046#38754#26495
    OnClose = bsSkinExPanel1Close
    object Label1: TLabel
      Left = 504
      Top = 32
      Width = 77
      Height = 14
      Caption = #36890#36947'1'#28201#24230#65306
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label2: TLabel
      Left = 504
      Top = 48
      Width = 77
      Height = 14
      Caption = #36890#36947'2'#28201#24230#65306
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label3: TLabel
      Left = 504
      Top = 64
      Width = 77
      Height = 14
      Caption = #36890#36947'3'#28201#24230#65306
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object bsSkinButton1: TbsSkinButton
      Left = 16
      Top = 32
      Width = 81
      Height = 25
      HintImageIndex = 0
      TabOrder = 0
      SkinData = bsSkinData1
      SkinDataName = 'button'
      DefaultFont.Charset = DEFAULT_CHARSET
      DefaultFont.Color = clWindowText
      DefaultFont.Height = 14
      DefaultFont.Name = 'Arial'
      DefaultFont.Style = []
      DefaultWidth = 0
      DefaultHeight = 0
      UseSkinFont = True
      ImageIndex = -1
      UseSkinSize = True
      UseSkinFontColor = True
      RepeatMode = False
      RepeatInterval = 100
      AllowAllUp = False
      TabStop = True
      CanFocused = True
      Down = False
      GroupIndex = 0
      Caption = #20018#21475#25171#24320
      NumGlyphs = 1
      Spacing = 1
      OnClick = bsSkinButton1Click
    end
    object bsSkinButton2: TbsSkinButton
      Left = 104
      Top = 32
      Width = 81
      Height = 25
      HintImageIndex = 0
      TabOrder = 1
      SkinData = bsSkinData1
      SkinDataName = 'button'
      DefaultFont.Charset = DEFAULT_CHARSET
      DefaultFont.Color = clWindowText
      DefaultFont.Height = 14
      DefaultFont.Name = 'Arial'
      DefaultFont.Style = []
      DefaultWidth = 0
      DefaultHeight = 0
      UseSkinFont = True
      ImageIndex = -1
      UseSkinSize = True
      UseSkinFontColor = True
      RepeatMode = False
      RepeatInterval = 100
      AllowAllUp = False
      TabStop = True
      CanFocused = True
      Down = False
      GroupIndex = 0
      Caption = #20018#21475#35774#23450
      NumGlyphs = 1
      Spacing = 1