FontSize Property (ThemeFont)
In This Topic
Gets or sets the size (in points) of the terminal session font.
Syntax
expression.FontSize As Integer
where expression is a variable that represents a ThemeFont Object
Example
'This example creates and saves a theme. The theme is applied to the session. Public Sub CreateAndSaveTheme() 'Declare and set a font object. Dim font As ThemeFont Set font = ThisTerminal.Theme.font 'Declare and set a cursor object. Dim cursor As ThemeCursor Set cursor = ThisTerminal.Theme.cursor 'Set AutofontSize to false to allow resizing of font. font.AutoFontSize = False font.FONTSIZE = 12 'Change to a colored cursor with a faster blink rate and a vertical bar shape. cursor.Parent.DisplayEnhancements.ColorCursor = True cursor.CursorBlink = True cursor.CursorShape = CursorShapeOption_VerticalBar 'Save the changes in a new theme to prevent Reflection from requesting to save the new theme. ThisTerminal.Theme.SaveAs (Environ$("USERPROFILE") & "\Documents\Micro Focus\Reflection\Themes\myNewTheme.themex") End Sub
See Also