unit1.dfm

delphi 水量PID控制演示程序 图形界面 很直观的演示了PID的全过程

      MaxValue = 100.000000000000000000
      EditType = ntFloat
      Value = 0.500000000000000000
      FractionStep = 0.100000000000000000
      DateTime = 0.500000000000000000
    end
    object LMDExtSpinEditD: TLMDExtSpinEdit
      Left = 63
      Top = 192
      Width = 60
      Height = 21
      Hint = #24494#20998#26102#38388
      Bevel.Mode = bmWindows
      Caret.BlinkRate = 530
      CtlXP = False
      ParentShowHint = False
      ShowHint = True
      TabOrder = 15
      CustomButtons = <>
      Step = 0.100000000000000000
      MaxValue = 100.000000000000000000
      EditType = ntFloat
      Value = 0.500000000000000000
      FractionStep = 0.100000000000000000
      DateTime = 0.500000000000000000
    end
    object EditError: TEdit
      Left = 63
      Top = 216
      Width = 60
      Height = 20
      Hint = #35823#24046#37327
      ParentShowHint = False
      ReadOnly = True
      ShowHint = True
      TabOrder = 16
    end
  end
  object iThreadTimers1: TiThreadTimers
    Left = 240
    Top = 384
    Enabled1 = True
    Enabled2 = True
    Enabled3 = True
    Enabled4 = True
    Interval1 = 100
    Interval2 = 1
    Interval3 = 100
    Interval4 = 5000
    OnTimer1 = iThreadTimers1Timer1
    OnTimer2 = iThreadTimers1Timer2
    OnTimer3 = iThreadTimers1Timer3
    OnTimer4 = iThreadTimers1Timer4
  end
  object iPlot1: TiPlot
    Left = 336
    Top = 8
    Width = 393
    Height = 153
    DataViewZHorz = 1
    DataViewZVert = 1
    PrintMarginLeft = 1.000000000000000000
    PrintMarginTop = 1.000000000000000000
    PrintMarginRight = 1.000000000000000000
    PrintMarginBottom = 1.000000000000000000
    PrintDocumentName = 'Untitled'
    HintsFont.Charset = DEFAULT_CHARSET
    HintsFont.Color = clWindowText
    HintsFont.Height = -11
    HintsFont.Name = 'MS Sans Serif'
    HintsFont.Style = []
    EditorFormStyle = ipfsModal
    CopyToClipBoardFormat = ipefMetaFile
    TitleText = #35823#24046#26354#32447#22270
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWhite
    TitleFont.Height = -19
    TitleFont.Name = 'Arial'
    TitleFont.Style = [fsBold]
    AnnotationDefaultFont.Charset = DEFAULT_CHARSET
    AnnotationDefaultFont.Color = clWhite
    AnnotationDefaultFont.Height = -11
    AnnotationDefaultFont.Name = 'MS Sans Serif'
    AnnotationDefaultFont.Style = []
    AnnotationDefaultBrushStlye = bsSolid
    AnnotationDefaultBrushColor = clWhite
    AnnotationDefaultPenStlye = psSolid
    AnnotationDefaultPenColor = clWhite
    AnnotationDefaultPenWidth = 1
    ClipAnnotationsToAxes = True
    BackGroundGradientEnabled = False
    BackGroundGradientDirection = ifdTopBottom
    BackGroundGradientStartColor = clBlue
    BackGroundGradientStopColor = clBlack
    Anchors = [akLeft, akTop, akRight]
    TabOrder = 2
    DataViewZHorz = 1
    DataViewZVert = 1
    ToolBarManager = <
      item
        Name = 'Toolbar 1'
        Visible = False
        Horizontal = True
        ZOrder = 3
        StopPercent = 100.000000000000000000
        ZoomInOutFactor = 2.000000000000000000
      end>
    LegendManager = <
      item
        Name = 'Legend 1'
        Horizontal = False
        ZOrder = 2
        StopPercent = 100.000000000000000000
        MarginLeft = 1.000000000000000000
        MarginTop = 1.000000000000000000
        MarginRight = 1.000000000000000000
        MarginBottom = 1.000000000000000000
        SelectedItemFont.Charset = DEFAULT_CHARSET
        SelectedItemFont.Color = clBlack
        SelectedItemFont.Height = -11
        SelectedItemFont.Name = 'MS Sans Serif'
        SelectedItemFont.Style = []
        CaptionColumnTitle = 'Title'
        CaptionColumnXAxisTitle = 'X-Axis'
        CaptionColumnYAxisTitle = 'Y-Axis'
        CaptionColumnXValue = 'X'
        CaptionColumnYValue = 'Y'
        CaptionColumnYMax = 'Y-Max'
        CaptionColumnYMin = 'Y-Min'
        CaptionColumnYMean = 'Y-Mean'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWhite
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ColumnSpacing = 0.500000000000000000
        RowSpacing = 0.250000000000000000
        WrapColDesiredCount = 1
        WrapColAutoCountEnabled = False
        WrapColAutoCountMax = 100
        WrapColSpacingMin = 2.000000000000000000
        WrapColSpacingAuto = True
        WrapRowDesiredCount = 5
        WrapRowAutoCountEnabled = True
        WrapRowAutoCountMax = 100
        WrapRowSpacingMin = 0.250000000000000000
        WrapRowSpacingAuto = False
        ColumnTitlesFont.Charset = DEFAULT_CHARSET
        ColumnTitlesFont.Color = clAqua
        ColumnTitlesFont.Height = -11
        ColumnTitlesFont.Name = 'MS Sans Serif'
        ColumnTitlesFont.Style = [fsBold]
      end>
    XAxisManager = <
      item
        Name = 'X-Axis 1'
        Horizontal = True
        ZOrder = 0
        StopPercent = 100.000000000000000000
        Span = 100.000000000000000000
        Title = 'X-Axis 1'
        TitleMargin = 0.250000000000000000
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWhite
        TitleFont.Height = -13
        TitleFont.Name = 'Arial'
        TitleFont.Style = [fsBold]
        LabelsMargin = 0.250000000000000000
        LabelsFont.Charset = DEFAULT_CHARSET
        LabelsFont.Color = clWhite
        LabelsFont.Height = -11
        LabelsFont.Name = 'MS Sans Serif'
        LabelsFont.Style = []
        LabelSeparation = 2.000000000000000000
        DateTimeFormat = 'hh:nn:ss'
        LabelsMinLength = 5.000000000000000000
        ScaleLineShow = True
        StackingEndsMargin = 0.500000000000000000
        TrackingStyle = iptsScrollSmooth
        TrackingAlignFirstStyle = ipafsAuto
        CursorDateTimeFormat = 'hh:nn:ss'
        CursorPrecision = 3
        CursorMinLength = 5.000000000000000000
        LegendDateTimeFormat = 'hh:nn:ss'
        LegendPrecision = 3
        LegendMinLength = 5.000000000000000000
        CursorScaler = 1.000000000000000000
        ScrollMinMaxEnabled = False
        ScrollMax = 100.000000000000000000
        RestoreValuesOnResume = True
        MasterUIInput = False
        CartesianStyle = ipcsNone
        CartesianChildRefAxisName = '<None>'
        AlignRefAxisName = '<None>'
        GridLinesVisible = True
        ForceStacking = False
      end>
    YAxisManager = <
      item
        Name = 'Y-Axis 1'
        Horizontal = False
        ZOrder = 0
        StopPercent = 100.000000000000000000
        Min = -5.000000000000000000
        Span = 10.000000000000000000
        Title = 'Y-Axis 1'
        TitleMargin = 0.250000000000000000
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWhite
        TitleFont.Height = -13
        TitleFont.Name = 'Arial'
        TitleFont.Style = [fsBold]
        LabelsMargin = 0.250000000000000000
        LabelsFont.Charset = DEFAULT_CHARSET
        LabelsFont.Color = clWhite
        LabelsFont.Height = -11
        LabelsFont.Name = 'MS Sans Serif'
        LabelsFont.Style = []
        LabelSeparation = 2.000000000000000000
        DateTimeFormat = 'hh:nn:ss'
        LabelsMinLength = 5.000000000000000000
        ScaleLineShow = True
        StackingEndsMargin = 0.500000000000000000
        TrackingStyle = iptsScaleMinMax
        TrackingAlignFirstStyle = ipafsAuto
        CursorDateTimeFormat = 'hh:nn:ss'
        CursorPrecision = 3
        CursorMinLength = 5.000000000000000000
        LegendDateTimeFormat = 'hh:nn:ss'
        LegendPrecision = 3
        LegendMinLength = 5.000000000000000000
        CursorScaler = 1.000000000000000000
        ScrollMinMaxEnabled = False
        ScrollMax = 100.000000000000000000
        RestoreValuesOnResume = True
        MasterUIInput = False
        CartesianStyle = ipcsNone
        CartesianChildRefAxisName = '<None>'
        AlignRefAxisName = '<None>'
        GridLinesVisible = True
        ForceStacking = False
      end>
    ChannelManager = <
      item
        Name = 'Channel 1'
        TitleText = #35823#24046#37327
        MarkersTurnOffLimit = 0
        MarkersFont.Charset = DEFAULT_CHARSET
        MarkersFont.Color = clWhite
        MarkersFont.Height = -11
        MarkersFont.Name = 'MS Sans Serif'
        MarkersFont.Style = [fsBold]
        XAxisName = 'X-Axis 1'
        YAxisName = 'Y-Axis 1'
        DataStyle = ipdsStandard
        OPCComputerName = 'Local'
        DigitalReferenceLow = 10.000000000000000000
        DigitalReferenceHigh = 90.000000000000000000
        HighLowBarColor = clAqua
        HighLowBarWidth = 0.500000000000000000
        HighLowOpenColor = clLime
        HighLowOpenWidth = 1.000000000000000000
        HighLowOpenHeight = 1.000000000000000000
        HighLowCloseWidth = 1.000000000000000000
        HighLowCloseHeight = 1.000000000000000000
        BarWidth = 5.000000000000000000
      end
      item
        Name = 'Channel 2'
        TitleText = 'Channel 2'
        VisibleInLegend = False
        Color = clYellow
        MarkersTurnOffLimit = 0
        MarkersFont.Charset = DEFAULT_CHARSET
        MarkersFont.Color = clWhite
        MarkersFont.Height = -11
        MarkersFont.Name = 'MS Sans Serif'
        MarkersFont.Style = [fsBold]
        XAxisName = 'X-Axis 1'
        YAxisName = 'Y-Axis 1'
        DataStyle = ipdsStandard
        OPCComputerName = 'Local'
        DigitalReferenceLow = 10.000000000000000000
        DigitalReferenceHigh = 90.000000000000000000
        HighLowBarColor = clAqua
        HighLowBarWidth = 0.500000000000000000
        HighLowOpenColor = clLime
        HighLowOpenWidth = 1.000000000000000000
        HighLowOpenHeight = 1.000000000000000000
        HighLowCloseWidth = 1.000000000000000000
        HighLowCloseHeight = 1.000000000000000000
        BarWidth = 5.000000000000000000
      end>
    DataViewManager = <
      item
        Name = 'Data View 1'
        Horizontal = False
        ZOrder = 0
        StopPercent = 100.000000000000000000
        GridXAxisName = 'X-Axis 1'
        GridYAxisName = 'Y-Axis 1'
        GridLineXMajorWidth = 0
        GridLineXMinorWidth = 0
        GridLineYMajorWidth = 0
        GridLineYMinorWidth = 0
        AxesControlEnabled = False
        AxesControlMouseStyle = ipacsBoth
        AxesControlWheelStyle = ipacsXAxis
      end>
    DataCursorManager = <
      item
        Name = 'Cursor 1'
        Visible = False
        ChannelName = 'Channel 1'
        ChannelAllowAll = True
        ChannelShowAllInLegend = True
        Style = ipcsValueXY
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        Color = clYellow
        UseChannelColor = True
        HintShow = True
        HintHideOnRelease = False
        HintOrientationSide = iosBottomRight
        HintPosition = 50.000000000000000000
        Pointer1Position = 50.000000000000000000
        Pointer2Position = 60.000000000000000000
        PointerPenWidth = 1
        MenuItemVisibleValueXY = True