ISEdit.Font

Description

The font of the specified edit control.

Syntax

object.Font

Part Attribute Type Description
object Required
The object always implements the ISEdit interface

Return Value

StdFont

Example

Display some information about the specified edit control, including its font name and font size.

Dim aEdit
Dim aEditInfo

Set aEdit = Form.Controls_("edtInform")
set aFont = aEdit.Font 

aEditInfo =_
  "Caption: " & aEdit.Caption & vbNewLine &_ 
  "ShortName: " & aEdit.ShortName & vbNewLine &_
  "TypeName: " & aEdit.TypeName & vbNewLine &_
  "Font Name: " & aFont.Name & vbNewLine &_
  "Font Size: " & aFont.Size               
  
Profile.MsgBox(aEditInfo)  
Note: This macro should be executed in any event handler of the form control.

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

Version information

Added in v7.8.0