GefFontFormat (object)

Represents the attributes of a font.
Description: Gets and sets the attributes of a font.


Sub GefFontFormat_Bold()
    Dim oCimObj As GefObject
    Dim oCimObjTxtFmt As GefTextFormat
    Dim oCimObjFntFmt As GefFontFormat
    Set oCimObj = CimGetObject
    Set oCimObjTxtFmt = oCimObj.TextFormat
    If Not oCimObjTxtFmt Is Nothing Then
        Set oCimObjFntFmt = oCimObjTxtFmt.Font
        If Not oCimObjFntFmt Is Nothing Then
            oCimObjFntFmt.Bold = gefStateTrue
            CimGetScreen.Refresh False
        End If
    End If
End Sub
Properties: Application , Bold , CharSet , Italic , Name , Parent , Size , Strikethrough , Underline , Weight
Methods: ClearDecoration , SetFromIFont , SetFromIFontDisp