仪器控制
► 请参阅自定义仪表图形用户界面 - 可用仪表控件,了解各仪表控件的功能说明。
要查看放置在脚本窗体上的仪表控制组件的相关属性和事件,请使用
要查找仪表控件的特定方法(或属性),请使用代码完成功能(请参阅脚本编辑器工具)。例如,输入 TInstrumentCheckBox.getTInstrumentCheckBox

使用代码完成 (
继承
大多数仪表控制类的方法(以及属性和事件)都继承自 Delphi VCL TGraphicControlTCustomControl
例如,仪表控件的降序继承如下 TInstrumentCheckBox
| 继承路径 | 方法 |
|---|---|
TGraphicControl |
参见相应的 Delphi 参考资料。 |
TCustomInstrumentCheckBox |
请参见 TXPCheckBox |
TInstrumentCheckBox |
请参见 TXPCheckBox |
组件方法
Altium Instrument Control 组件基于Embarcadero Visual Component Library (VCL) 的核心类。每个 Instrument Control 都继承了其 VCL 源的方法、属性和事件,大多数还提供了额外的自定义方法。例如 TInstrumentCheckBoxTCheckBoxClickTInstrumentCheckBoxChanged
使用以下列表可浏览仪表控制类别中每个组件可用方法的相关信息:
![]() |
TSignalLinkManager | 仪表信号链接管理器。 |
| TInstrumentBackgroundPanel(仪表背景面板 | 仪表面板背景颜色。 | |
| TInstrumentBackground | 仪表背景颜色。 | |
| TInstrumentButton | 仪表按钮。 | |
| TInstrumentCaption | 仪表面板标题。 | |
| TInstrumentCheckBox 复选框 | 仪表复选框。 | |
| TInstrumentEdit | 仪表编辑框。 | |
| TInstrumentGauge 仪表 | 模拟式仪表仪表/仪表。 | |
| TInstrumentGlyphButton 图形按钮 | 仪表速度按钮图形图像。 | |
| TInstrumentGraph | 仪表图形显示。 | |
| TInstrumentKnob 旋钮 | 仪表旋转控制旋钮。 | |
| TInstrumentLabel | 仪表面板标签。 | |
| TInstrumentLEDDigits 数字显示 | 7 段数字 LED 显示器。 | |
| TInstrumentLEDsPanel | 分组 LED 指示灯行。 | |
| TInstrumentMultiGraph (多图表 | 多轨迹图形显示。 | |
| TInstrumentNumericPanel 数字面板 | 仪表数字读出。 | |
| TInstrumentPanel | 仪表面板区域。 | |
| TInstrumentProgressBar 进度条 | LED 条形信号/进度指示器 | |
| TInstrumentRadioButton 无线电按钮 | 仪表单选按钮选择器。 | |
| TInstrumentRadioGroup 无线电组 | 用于单选按钮的仪表组控件。 | |
| TInstrumentScrollbar | 仪表滚动条控件。 | |
| TInstrumentShape | 仪表面板的几何形状。 | |
| TInstrumentSilkScreen | 仪表面板丝网覆盖。 | |
| TInstrumentTerminal | 仪表字符显示终端窗口。 | |
| TInstrumentTrackBar | 仪表滑动条控件。 |
TSignalLinkManager
TSignalLinkManager TComponentTSignalLinkManager
TSignalLinkManager:
Procedure DoPoll;
Procedure ClearSignalLinks;
Procedure UpdateSignals(AInput, AOutput : LongBool);
TInstrumentBackgroundPanel
TInstrumentBackgroundPanel TCustomControlTXPCustomControlTXPCustomExtPanel TCustomInstrumentBackgroundPanel
TXPCustomControl:
Procedure UpdateSmoothDraw;
Function GetModified : Boolean;
Procedure ClearModified;
TXPCustomExtPanel:
Function GetDrawingMode : TXPDrawingMode;
Function UseRegion : Boolean;
Function DoCreateRegion : HRGN;
Procedure BeginUpdate;
Procedure EndUpdate;
TCustomInstrumentBackgroundPanel:
Procedure UpdateBackgroundImage;
Procedure UpdateChildControls;
TInstrumentBackground
TInstrumentBackground TGraphicControlTCustomGraphicInstrumentWithBackgroundTCustomGraphicInstrumentWithInterior
TCustomGraphicInstrumentWithBackground:
Procedure BackgroundOptionsChanged(AChanges : TInstrumentBackgroundOptions);
Procedure MarginChanged;
TCustomGraphicInstrumentWithInterior:
Procedure BackgroundOptionsChanged(AChanges : TInstrumentBackgroundOptions);
Procedure MarginChanged;
Procedure DoPaint(ACanvas : TCanvas; X : Integer = 0; Y : Integer = 0);
Procedure PaintInterior(ACanvas : TCanvas; ARect : TRect);
Function UseCreamBackground : Boolean;
TInstrumentButton
TInstrumentButton TCustomControlTXPCustomControlTXPCustomTransparentControlTXPBaseCustomSpeedButton,TXPCustomSpeedButton TCustomInstrumentButton
TXPCustomControl:
Procedure UpdateSmoothDraw;
Function GetModified : Boolean;
Procedure ClearModified;
TXPCustomTransparentControl:
Procedure TransparentChanged;
TXPBaseCustomSpeedButton:
Function GetShiftContentIfPressed : Boolean;
Procedure VCLClick;
Procedure PaintStandard (ARect,ARectDrop : TRect; APushed : Boolean);
Procedure PaintFading (Const ARectDrop : TRect; APushed : Boolean);
Procedure DrawImage (Canvas : TCanvas; Const ARect : TRect; AEnabled : Boolean);
Procedure DrawFadingImage (Canvas : TCanvas; Const ARect : TRect);
Procedure CopyToImage (AlphaImage : TAlphaBitmap);
Procedure RedrawImage (Const ARect : TRect);
Procedure RedrawCaption (Const ARect : TRect; Const ACaption : String; AFontColor : TColor);
Procedure RedrawInside (ARect : TRect; AFontColor : TColor; DoFontFading : Boolean);
Procedure CalculatePositions(Const ARect : TRect; Out TotalSize : TPoint; Out GlyphPos : TPoint; Out TextBounds : TRect);
Function NeedPaintDropdown : Boolean;
Function PushOnClick : Boolean;
Function GetDrawCaptionFlags : TXPDrawCaptionFlags;
Function GetEllipsisPosition : TEllipsisPosition;
Function GetFadingEnabled : Boolean;
Function GetGlyphSize(Out GlyphSize : TSize) : Boolean;
Procedure UpdateExclusive;
Procedure AppearanceChanged(AChange : TAppearanceChange);
Procedure KindChanged;
TXPCustomSpeedButton:
Procedure GlyphChanged (Sender : TObject);
Procedure GetGlyphInfo (Out GlyphToDraw : TGraphic; Out NumGlyphsToDraw : Integer);
Function GetImageState : Integer;
TCustomInstrumentButton:
Function GetCaptionFontColor(ADown, AOn : Boolean) : TColor;
Function GetDrawFlags (ADown, AOn : Boolean) : TDrawInstrumentButtonFlags;
Function GetDrawCaptionStyle(ADown, AOn : Boolean) : TDrawInstrumentButtonCaptionStyle;
Function GetGlowIntensity : TGlowIntensity;
Procedure BackgroundChanged(Sender : TObject);
Procedure UpdateBitmaps;
TInstrumentCaption
TInstrumentCaptionTCustomLabelTCustomInstrumentLabel
TCustomInstrumentLabel:
Procedure DoPaint(ACanvas : TCanvas; Const ARect : TRect);
TInstrumentCheckBox
TInstrumentCheckBox TGraphicControlTCustomInstrumentCheckBox
TCustomInstrumentCheckBox:
Procedure Changed;
TInstrumentEdit
TInstrumentEdit TCustomControlTXPCustomControlTCustomXPEdit
TXPCustomControl:
Procedure UpdateSmoothDraw;
Function GetModified : Boolean;
Procedure ClearModified;
TCustomXPEdit:
Function CalcInternalHeight : Integer;
Procedure Change;
Procedure ChangeHotFont(IsHot : Boolean);
Procedure Clear;
Procedure ClearSelection;
Procedure ClearUndo;
Procedure CopyToClipboard;
Procedure CreateCaret;
Procedure CutToClipboard;
Procedure DestroyCaret;
Procedure DoEndCapture;
Procedure DrawInside(ARect : TRect; AColor, AFrameColor, AHLTextColor, AHLColor, AFontColor : TColor);
Function GetAutoWidth : Integer;
Function GetCursorPos : TPoint;
Function GetEditDetails : TThemedElementDetails;
Function GetEditorBounds : TRect;
Function GetEditState : TThemedEdit;
Function GetExcludeRect : TRect;
Procedure InsertString(Str : TXPString);
Procedure InternalSetCursor;
Procedure NumberFormatChanged;
Procedure SelectAll;
Procedure SetCaretPos(Value : Integer);
Procedure SetText (Const Value : TCaption);
Procedure SetTransparent(Const Value : Boolean);
Procedure Undo;
TInstrumentGauge
TInstrumentGauge TGraphicControlTCustomGraphicInstrumentWithBackgroundTCustomGraphicInstrumentWithNoiseTCustomInstrumentGauge
TCustomGraphicInstrumentWithBackground:
Procedure BackgroundOptionsChanged(AChanges : TInstrumentBackgroundOptions);
Procedure MarginChanged;
TCustomGraphicInstrumentWithNoise:
Procedure PaintOnPanel(APanel : TCustomInstrumentBackgroundPanel);
Procedure PaintControlBackground(ABitmap : TBitmap; X, Y : Integer);
Procedure PaintControlForeground(ABitmap : TBitmap; X, Y : Integer);
TCustomInstrumentGauge:
Procedure SetMax(Const Value : TProgressValue);
Procedure SetMin(Const Value : TProgressValue);
Procedure DoGetScaleLabel(AValue : TGaugeValue; Var ALabelString : String);
TInstrumentGlyphButton
TInstrumentGlyphButton TCustomControlTXPCustomControlTXPCustomTransparentControlTXPBaseCustomSpeedButton,TXPCustomSpeedButton TCustomInstrumentButtonTCustomInstrumentGlyphButton
TXPCustomControl:
Procedure UpdateSmoothDraw;
Function GetModified : Boolean;
Procedure ClearModified;
TXPCustomTransparentControl:
Procedure TransparentChanged;
TXPBaseCustomSpeedButton:
Function GetShiftContentIfPressed : Boolean;
Procedure VCLClick;
Procedure PaintStandard (ARect,ARectDrop : TRect; APushed : Boolean);
Procedure PaintFading (Const ARectDrop : TRect; APushed : Boolean);
Procedure DrawImage (Canvas : TCanvas; Const ARect : TRect; AEnabled : Boolean);
Procedure DrawFadingImage (Canvas : TCanvas; Const ARect : TRect);
Procedure CopyToImage (AlphaImage : TAlphaBitmap);
Procedure RedrawImage (Const ARect : TRect);
Procedure RedrawCaption (Const ARect : TRect; Const ACaption : String; AFontColor : TColor);
Procedure RedrawInside (ARect : TRect; AFontColor : TColor; DoFontFading : Boolean);
Procedure CalculatePositions(Const ARect : TRect; Out TotalSize : TPoint; Out GlyphPos : TPoint; Out TextBounds : TRect);
Function NeedPaintDropdown : Boolean;
Function PushOnClick : Boolean;
Function GetDrawCaptionFlags : TXPDrawCaptionFlags;
Function GetEllipsisPosition : TEllipsisPosition;
Function GetFadingEnabled : Boolean;
Function GetGlyphSize(Out GlyphSize : TSize) : Boolean;
Procedure UpdateExclusive;
Procedure AppearanceChanged(AChange : TAppearanceChange);
Procedure KindChanged;
TXPCustomSpeedButton:
Procedure GlyphChanged (Sender : TObject);
Procedure GetGlyphInfo (Out GlyphToDraw : TGraphic; Out NumGlyphsToDraw : Integer);
Function GetImageState : Integer;
TCustomInstrumentButton:
Function GetCaptionFontColor(ADown, AOn : Boolean) : TColor;
Function GetDrawFlags (ADown, AOn : Boolean) : TDrawInstrumentButtonFlags;
Function GetDrawCaptionStyle(ADown, AOn : Boolean) : TDrawInstrumentButtonCaptionStyle;
Function GetGlowIntensity : TGlowIntensity;
Procedure BackgroundChanged(Sender : TObject);
Procedure UpdateBitmaps;
TCustomInstrumentGlyphButton:
Procedure LEDChanged;
TInstrumentGraph
TCustomInstrumentGraph TGraphicControlTCustomGraphicInstrumentWithBackgroundTCustomGraphicInstrumentWithInterior TCustomInstrumentGraph
TCustomGraphicInstrumentWithBackground:
Procedure BackgroundOptionsChanged(AChanges : TInstrumentBackgroundOptions);
Procedure MarginChanged;
TCustomGraphicInstrumentWithInterior:
Procedure BackgroundOptionsChanged(AChanges : TInstrumentBackgroundOptions);
Procedure MarginChanged;
Procedure DoPaint(ACanvas : TCanvas; X : Integer = 0; Y : Integer = 0);
Procedure PaintInterior(ACanvas : TCanvas; ARect : TRect);
Function UseCreamBackground : Boolean;
TCustomInstrumentGraph:
Procedure SetMax(Const Value : TProgressValue);
Procedure SetMin(Const Value : TProgressValue);
Procedure DoGetValue(Var AValue : TGraphValue; AIndex : Integer);
Procedure BeginSetValues;
Procedure EndSetValues;
TInstrumentKnob
TInstrumentKnoTCustomControlTXPCustomControlTCustomInstrumentSlider
TXPCustomControl:
Procedure UpdateSmoothDraw;
Function GetModified : Boolean;
Procedure ClearModified;
TCustomInstrumentSlider:
Procedure SetHandleSize(AValue : TInstrumentSize);
Procedure SetMinValue(AValue : Double);
Procedure SetMaxValue(AValue : Double);
Procedure DrawSlot (ACanvas : TCanvas; xOffset, yOffset : Integer);
Procedure DrawTick (ACanvas : TCanvas; xOffset, yOffset : Integer; ATicks : TInstrumentTicksFloat; ATickValue : Double; AGraphics : Pointer; APen : Pointer;
Procedure DrawNumber (ACanvas : TCanvas; xOffset, yOffset : Integer; ANumberValue : Double; Const ANumberStr : String);
Procedure DrawHandle (ACanvas : TCanvas; xOffset, yOffset : Integer);
Function GetPositionFromMouse(X, Y : Integer) : Double;
Function GetToolTipReferenceRect : TRect;
Procedure DoGetHintText (AValue : Double; Var AHintText : String);
Procedure DoGetScaleLabel(AValue : Double; Side : TInstrumentSide; Var ALabelString : String);
TInstrumentLabel
TInstrumentLabelTCustomLabelTCustomInstrumentLabel
TInstrumentLabel:
Procedure DoPaint(ACanvas : TCanvas; Const ARect : TRect);
TInstrumentLEDDigits
TInstrumentLEDDigitTGraphicControl TCustomGraphicInstrumentWithBackgroundTCustomGraphicInstrumentWithInterior
TCustomInstrumentDigitsPanelTCustomInstrumentLEDDigits
TCustomGraphicInstrumentWithBackground:
Procedure BackgroundOptionsChanged(AChanges : TInstrumentBackgroundOptions);
Procedure MarginChanged;
TCustomGraphicInstrumentWithInterior:
Procedure BackgroundOptionsChanged(AChanges : TInstrumentBackgroundOptions);
Procedure MarginChanged;
Procedure DoPaint(ACanvas : TCanvas; X : Integer = 0; Y : Integer = 0);
Procedure PaintInterior(ACanvas : TCanvas; ARect : TRect);
Function UseCreamBackground : Boolean;
TCustomInstrumentDigitsPanel:
Procedure SetDigits (Const AValue : NaturalNumber);
Procedure SetDigitsInGroup(Const AValue : NaturalNumber);
Procedure SetNumberType (Const AValue : TNumberType);
Procedure SetPrecision (Const AValue : TPrecision);
Procedure SetRadix (Const AValue : TRadix);
Procedure DigitClick (ADigitIndex : Integer; AButton : TMouseButton);
Function GetDigitWidth : Integer;
Function GetDigitHeight : Integer;
Procedure PaintDigits (ACanvas : TCanvas; ARect : TRect);
Procedure PaintDigit (ACanvas : TCanvas; ARect : TRect; AValue : Byte);
Procedure ValueChanged;
TCustomInstrumentLEDDigits:
Procedure SetMax(Const Value : TProgressValue);
Procedure SetMin(Const Value : TProgressValue);
TInstrumentLEDsPanel
TInstrumentLEDsPanel TGraphicControl TCustomGraphicInstrumentWithBackgroundTCustomGraphicInstrumentWithInterior
TCustomInstrumentDigitsPanelTCustomInstrumentLEDsPanel
TCustomGraphicInstrumentWithBackground:
Procedure BackgroundOptionsChanged(AChanges : TInstrumentBackgroundOptions);
Procedure MarginChanged;
TCustomGraphicInstrumentWithInterior:
Procedure BackgroundOptionsChanged(AChanges : TInstrumentBackgroundOptions);
Procedure MarginChanged;
Procedure DoPaint(ACanvas : TCanvas; X : Integer = 0; Y : Integer = 0);
Procedure PaintInterior(ACanvas : TCanvas; ARect : TRect);
Function UseCreamBackground : Boolean;
TCustomInstrumentDigitsPanel:
Procedure SetDigits (Const AValue : NaturalNumber);
Procedure SetDigitsInGroup(Const AValue : NaturalNumber);
Procedure SetNumberType (Const AValue : TNumberType);
Procedure SetPrecision (Const AValue : TPrecision);
Procedure SetRadix (Const AValue : TRadix);
Procedure DigitClick (ADigitIndex : Integer; AButton : TMouseButton);
Function GetDigitWidth : Integer;
Function GetDigitHeight : Integer;
Procedure PaintDigits (ACanvas : TCanvas; ARect : TRect);
Procedure PaintDigit (ACanvas : TCanvas; ARect : TRect; AValue : Byte);
Procedure ValueChanged;
TCustomInstrumentLEDsPanel:
Procedure SetMaxValue(Const AValue : LongWord);
Procedure SetMinValue(Const AValue : LongWord);
TInstrumentMultiGraph
TInstrumentMultiGraph TGraphicControlTCustomGraphicInstrumentWithBackgroundTCustomGraphicInstrumentWithInterior TCustomInstrumentGraph
TCustomGraphicInstrumentWithBackground:
Procedure BackgroundOptionsChanged(AChanges : TInstrumentBackgroundOptions);
Procedure MarginChanged;
TCustomGraphicInstrumentWithInterior:
Procedure BackgroundOptionsChanged(AChanges : TInstrumentBackgroundOptions);
Procedure MarginChanged;
Procedure DoPaint(ACanvas : TCanvas; X : Integer = 0; Y : Integer = 0);
Procedure PaintInterior(ACanvas : TCanvas; ARect : TRect);
Function UseCreamBackground : Boolean;
TCustomInstrumentGraph:
Procedure SetMax(Const Value : TProgressValue);
Procedure SetMin(Const Value : TProgressValue);
Procedure DoGetValue(Var AValue : TGraphValue; AIndex : Integer);
Procedure BeginSetValues;
Procedure EndSetValues;
TInstrumentNumericPanel
TInstrumentNumericPanel TGraphicControl TCustomGraphicInstrumentWithBackgroundTCustomGraphicInstrumentWithInterior
TCustomInstrumentDigitsPanelTCustomInstrumentNumericPanel
TCustomGraphicInstrumentWithBackground:
Procedure BackgroundOptionsChanged(AChanges : TInstrumentBackgroundOptions);
Procedure MarginChanged;
TCustomGraphicInstrumentWithInterior:
Procedure BackgroundOptionsChanged(AChanges : TInstrumentBackgroundOptions);
Procedure MarginChanged;
Procedure DoPaint(ACanvas : TCanvas; X : Integer = 0; Y : Integer = 0);
Procedure PaintInterior(ACanvas : TCanvas; ARect : TRect);
Function UseCreamBackground : Boolean;
TCustomInstrumentDigitsPanel:
Procedure SetDigits (Const AValue : NaturalNumber);
Procedure SetDigitsInGroup(Const AValue : NaturalNumber);
Procedure SetNumberType (Const AValue : TNumberType);
Procedure SetPrecision (Const AValue : TPrecision);
Procedure SetRadix (Const AValue : TRadix);
Procedure DigitClick (ADigitIndex : Integer; AButton : TMouseButton);
Function GetDigitWidth : Integer;
Function GetDigitHeight : Integer;
Procedure PaintDigits (ACanvas : TCanvas; ARect : TRect);
Procedure PaintDigit (ACanvas : TCanvas; ARect : TRect; AValue : Byte);
Procedure ValueChanged;
TCustomInstrumentNumericPanel:
Procedure SetMaxValue(Const AValue : TNumericValue);
Procedure SetMinValue(Const AValue : TNumericValue);
TInstrumentPanel
TInstrumentPanel TCustomControlTXPCustomControlTCustomInstrumentPanel
TXPCustomControl:
Procedure UpdateSmoothDraw;
Function GetModified : Boolean;
Procedure ClearModified;
TCustomInstrumentPanel:
Procedure PaintOnPanel(APanel : TCustomInstrumentBackgroundPanel);
TInstrumentProgressBar
TInstrumentProgressBar TGraphicControlTCustomGraphicInstrumentWithBackgroundTCustomGraphicInstrumentWithNoise TCustomInstrumentProgressBar
TCustomGraphicInstrumentWithBackground:
Procedure BackgroundOptionsChanged(AChanges : TInstrumentBackgroundOptions);
Procedure MarginChanged;
TCustomGraphicInstrumentWithNoise:
Procedure PaintOnPanel(APanel : TCustomInstrumentBackgroundPanel);
Procedure PaintControlBackground(ABitmap : TBitmap; X, Y : Integer);
Procedure PaintControlForeground(ABitmap : TBitmap; X, Y : Integer);
TCustomInstrumentProgressBar:
Procedure SetMax(Const Value : TProgressValue);
Procedure SetMin(Const Value : TProgressValue);
TInstrumentRadioButton
TInstrumentRadioButton TGraphicControl
TCustomInstrumentCheckBox:
Procedure Changed;
TCustomInstrumentRadioButton:
Procedure TurnSiblingsOff;
TInstrumentRadioGroup
TInstrumentRadioGroupTCustomControlTXPCustomControlTCustomInstrumentPanel
TXPCustomControl:
Procedure UpdateSmoothDraw;
Function GetModified : Boolean;
Procedure ClearModified;
TCustomInstrumentPanel:
Procedure PaintOnPanel(APanel : TCustomInstrumentBackgroundPanel);
TInstrumentScrollbar
TInstrumentScrollbar TCustomControlTXPCustomControlTCustomXPScrollBar TCustomInstrumentScrollBar
TXPCustomControl:
Procedure UpdateSmoothDraw;
Function GetModified : Boolean;
Procedure ClearModified;
TCustomXPScrollBar:
Procedure Change;
Procedure Scroll(ScrollCode : TScrollCode; Var ScrollPos : Integer);
Function IgnoreThemePainting : Boolean;
Procedure DrawShaft (Const ARect : TRect; AState : Integer);
Procedure DrawArrowBtn(Const ARect : TRect; AState : Integer; AOffset : Integer; AIsUp : Boolean);
Procedure DrawThumb (Const ARect : TRect; AState : Integer);
Procedure SetParams (APosition, AMin, AMax : Integer);
TCustomInstrumentScrollBar:
Procedure SetBounds(ALeft, ATop, AWidth, AHeight : Integer);
TInstrumentShape
TInstrumentShapeTShape
TInstrumentSilkScreen
TInstrumentSilkScreeTCustomControlTXPCustomControl
TXPCustomControl:
Procedure UpdateSmoothDraw;
Function GetModified : Boolean;
Procedure ClearModified;
TInstrumentTerminal
TInstrumentTerminal TCustomControlTXPCustomControlTCustomInstrumentPanelTCustomInstrumentTerminal
TXPCustomControl:
Procedure UpdateSmoothDraw;
Function GetModified : Boolean;
Procedure ClearModified;
TCustomInstrumentPanel:
Procedure PaintOnPanel(APanel : TCustomInstrumentBackgroundPanel);
TCustomInstrumentTerminal:
Procedure DoTransmitChar(AChar : Char);
Procedure PutChar(AChar : Char ; ATransmit : Boolean);
Procedure PutString(Const AString : String; ATransmit : Boolean);
Procedure Clear;
Procedure GetLines(ALines : TStrings);
TInstrumentTrackBar
TInstrumentTrackBar TCustomControlTXPCustomControlTCustomInstrumentSlider
TXPCustomControl:
Procedure UpdateSmoothDraw;
Function GetModified : Boolean;
Procedure ClearModified;
TCustomInstrumentSlider:
Procedure SetHandleSize(AValue : TInstrumentSize);
Procedure SetMinValue(AValue : Double);
Procedure SetMaxValue(AValue : Double);
Procedure DrawSlot (ACanvas : TCanvas; xOffset, yOffset : Integer);
Procedure DrawTick (ACanvas : TCanvas; xOffset, yOffset : Integer; ATicks : TInstrumentTicksFloat; ATickValue : Double; AGraphics : Pointer; APen : Pointer;
Procedure DrawNumber (ACanvas : TCanvas; xOffset, yOffset : Integer; ANumberValue : Double; Const ANumberStr : String);
Procedure DrawHandle (ACanvas : TCanvas; xOffset, yOffset : Integer);
Function GetPositionFromMouse(X, Y : Integer) : Double;
Function GetToolTipReferenceRect : TRect;
Procedure DoGetHintText (AValue : Double; Var AHintText : String);
Procedure DoGetScaleLabel(AValue : Double; Side : TInstrumentSide; Var ALabelString : String)
