ISEdit.ParentFont

Description

This property is True if the specified edit control inherits the font from its parent control.

Syntax

object.ParentFont

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

Return Value

bool

Example

Display ParentFont for the specified edit control.

Dim aEdit
Dim aEditInfo
Dim aFont

Set aEdit = Form.Controls_("edtInform")
set aFont = aEdit.Font
aEditInfo =_
  "Short Name: " & aEdit.ShortName & vbNewLine &_
  "TypeName: " & aEdit.TypeName & vbNewLine &_   
  "Font Name: " & aFont.Name & vbNewLine &_
  "Font Size: " & aFont.Size & vbNewLine &_
  "Parent Font: " & aEdit.ParentFont
    
Profile.MsgBox(aEditInfo)

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

In Profile Client v8 on User Interface Parent 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 > ParentFont.

Version information

Added in v7.8.0