TSRVCustomControl

<< Click to display table of contents >>

TSRVCustomControl

TSRVCustomControl is the base class for several SRVControls.

Unit SRVControl;

Syntax

TSRVCustomControl = class(TCustomControl);

Hierarchy

TObject

TPersistent

TComponent

TControl

TWinControl

TCustomControl

Properties and events

Public properties:

Property

Type

Default value

Meaning

Alignment

TAlignment

taLeftJustify

 

AutoDarkMode

Boolean

True

If True, and the control is inserted in a dark-mode editor (TSRichViewEdit or TRichView), luminance of all colors is inverted.

Otherwise, DarkMode property is used.

Supported only if SRVControlStyle = srvcsSimple.

readonly CaretPos

TPoint

 

Read-only. Returns the caret position in the control. If the control does not have a caret, returns (-1, -1).

readonly CaretHeight

Integer

 

Read-only. Returns the caret height in the control.  If the control does not have a caret, returns -1.

DrawOnPrint

Boolean

True

if True, this control will be printed

DarkMode

Boolean

False

If True, luminance of all colors are inverted.

This property is used only if the control is not inserted in an editor, or if AutoDarkMode = False.

Supported only if SRVControlStyle = srvcsSimple.

readonly MouseIn

Boolean

 

Read-only. Returns True, if the mouse pointer is above the control

SRVControlStyle

TSRVControlStyle

srvcsSimple

Defines visual appearance

Public events:

OnMouseEnter, OnMouseLeave (TNotifyEvent) occur when the mouse pointer enter/leaves the control.

Protected properties:

Property

Type

Default value

Meaning

protected ButtonSkinSchemeIndex

Integer

0

Additional index in a scheme in SkinManager.CurrentSkin (a scheme depends on the control type)

protected SkinManager

TSRVSkinManager

 

A link to a skin manager component.

protected SkinSchemeIndex

Integer

0

Index in a scheme in SkinManager.CurrentSkin (a scheme depends on the control type)

protected SkinFontIndex

Integer

0

Index in SkinManager.CurrentSkin.Fonts

Additionally, for Delphi versions prior to 2009, this control introduces Unicode Caption (of TRVUnicodeString) type to use instead of ANSI string Caption (so Caption is Unicode in all versions of Delphi)

Inherited components

SRVButton TSRVButton

SRVCheckBox TSRVCheckBox

SRVGroupBox TSRVGroupBox

SRVPanel TSRVPanel

SRVRadioButton TSRVRadioButton

srvscrollbar TSRVScrollBar