The property is accessible in the Object Inspector but has no effect for buttons.
object.FontColor
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISButton interface |
uint
Dim aControl
Dim aFont
Dim aControlInfo
Set aControl = Form.Controls_("btnDemo")
set aFont = aControl.Font
aControlInfo =_
"Caption: " & aControl.Caption & vbNewLine &_
"ShortName: " & aControl.ShortName & vbNewLine &_
"Font Color (BGR): #" & HEX(aControl.FontColor) & vbNewLine &_
"Font Name: " & aFont.Name & vbNewLine &_
"Font Size: " & aFont.Size
Profile.MsgBox(aControlInfo)