Background Color | ||
---|---|---|
| ||
IScreen::SetString |
Copy a text string to a specified position in the QWS3270 screen.
Background Color |
---|
Function SetString(cursor As CursorPos, text As String) As Long |
Parameters
No | Name | Type | Optional | Default | Description |
---|---|---|---|---|---|
1 | cursor | CursorPos | No | - |
|
2 | text | String | No | - |
|
Return Code | Description | ||||
JGS_OK | The text was successfully copied | ||||
JGS_NOTCONNECTED | Your application is currently not connected to any valid session | ||||
JGS_PARAMETERERROR | Missing or invalid parameter | ||||
JGS_SYSERROR | The function failed due to a system error | ||||
JGS_INHIBITED | The position in the screen is protected or the text string contains invalid data (such as a field attribute) | ||||
JGS_TRUNCATED | The text string was truncated during the copy | ||||
JGS_POSITIONERROR | The specified position in the screen was invalid |
Sample Code
Background Color | ||
---|---|---|
| ||
Dim myPos as CursorPos Dim myText as String Dim result as Long myPos.row = 18 myPos.column = 45 myText = "Jolly Giant Software" result = screen.SetString(myPos, myText) |
QWS3270 Automation copyright © Jolly Giant Software Inc. All rights reserved.