ConfigureHotSpots Method (IbmScreen)

In This Topic

Loads the hotspots file as the current hotspots definitions.

Syntax

Visual Basic (Declaration)

expression.ConfigureHotSpots( _
   ByVal hotSpotsFilePath As String _
) As ReturnCode

where expression is a variable that represents a IbmScreen Object

Parameters

hotSpotsFilePath: Hotspots file path.

Return Value

One of the following ReturnCode values.

Member	Description
Cancelled	Cancelled.
Error	Error.
PermissionRequired	Permission is required.
Success	Success.
Timeout	Timeout condition.
Truncated	The text is truncated.

Example

This example configures a new session with custom hotspots.

Visual Basic

Sub CreateReflectionIBMSession()
 
    'Declare application, terminal, and view object variables:
    Dim app As Attachmate_Reflection_Objects_Framework.ApplicationObject
    Dim terminal As Attachmate_Reflection_Objects_Emulation_IbmHosts.IbmTerminal
    Dim View As Attachmate_Reflection_Objects.View
    Dim path As String
     
    'Get a handle to the workspace
    Set app = GetObject("Reflection Workspace")
                 
    'Create an Ibm3270 control and set the host address
    Set terminal = app.CreateControl2("{09E5A1B4-0BA6-4546-A27D-FE4762B7ACE1}")
    terminal.HostAddress = "demo:ibm3270.sim"
    terminal.port = "623"
  
    'Create a view to display the session
    Set View = ThisFrame.CreateView(terminal)
    
    'Configure to use custom hotspots file
    path = Environ("USERPROFILE") & "\Documents\Micro Focus\Reflection\hotspots maps\myhotspots.xhs"
    terminal.screen.ConfigureHotSpots (path)
     
End Sub

Reference

IbmScreen Object
IbmScreen Members

Send Feedback