ISComboBox.FontColor

Description

This property returns the font colour of the specified combo box encoded as 32 bit integer value, where the first byte contains Red channel, the second byte - Green channel and the third byte - Blue channel.

Syntax

object.FontColor

Part	Attribute	Type	Description
`object`	Required	ISComboBox	The `object` always implements the ISComboBox interface

Return Value

uint

Example

Display some information about the specified combo box, including its font colour in HEX format.

Dim aComboBox
Dim aFont
Dim aComboBoxInfo

Set aComboBox = Form.Controls_("cmbInform")
set aFont = aComboBox.Font
aComboBoxInfo =_
  "Caption: " & aComboBox.Caption & vbNewLine &_ 
  "ShortName: " & aComboBox.ShortName & vbNewLine &_
  "Font Color (BGR): #" & HEX(aComboBox.FontColor) & vbNewLine &_  
  "Font Name: " & aFont.Name & vbNewLine &_
  "Font Size: " & aFont.Size 
    
Profile.MsgBox(aComboBoxInfo)

Note: This macro should be executed in any event handler of the form control.

In Profile Client v8 on User Interface Font Color can be found in Maintain > Templates > Health Record Collection Templates > Open the selected form template > Open form editor > Object Inspector > Select the combo box in the controls tree > Font.

Version information

Added in v7.8.0