RulerCursorType Property

In This Topic

Gets or sets the appearance of the ruler cursor.

Syntax

Visual Basic (Declaration)

expression.RulerCursorType As RulerCursorTypeOption

where expression is a variable that represents a ThemeCursor Object

Property Value

A RulerCursorTypeOption value. The default is Crosshair.

Remarks

Use the RulerCursorVisible property to specify whether the ruler cursor should be displayed.

Example

This example changes the existing theme and saves it as a new theme.

Visual Basic

Public Sub ChangeTheme()
 
    'Declare and set a Themecursor object
    Dim cursor As Attachmate_Reflection_Objects_Emulation_IbmHosts.ThemeCursor
    Set cursor = ThisIbmTerminal.Theme.cursor
    'Make the ruler line visible and set the type to crosshair
    cursor.RulerCursorVisible = True
    cursor.RulerCursorType = RulerCursorTypeOption_Crosshair
  
    'Declare and set a Themecolor object
    Dim color As Attachmate_Reflection_Objects_Emulation_IbmHosts.ThemeColor
    Set color = ThisIbmTerminal.Theme.ThemeColor
    'Set the screen Background color
    color.BackgroundColor = RGB(0, 0, 0)
 
    'Save the changes in a new theme to prevent Reflection from requesting to save new theme
    ThisIbmTerminal.Theme.SaveAs (Environ$("USERPROFILE") & "\Documents\Micro Focus\Reflection\Themes\myCustomTheme.themex")
    
End Sub

Reference

ThemeCursor Object
ThemeCursor Members

Send Feedback