ISMemo.ParentFont

Description

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

Syntax

object.ParentFont

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

Return Value

bool

Example

Display ParentFont for the specified memo control.

Dim aMemo
Dim aMemoInfo
Dim aFont

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

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 memo control in the controls tree > ParentFont.

Version information

Added in v7.8.0