| Background Color | ||
|---|---|---|
| ||
| IWindow::VBS_SetStatus |
Set the window position, size, visibility, etc.
| Background Color |
|---|
| Function VBS_SetStatus(Session As String, win_status As Long, zorder As Long, x As Long, y As Long, cx As Long, cy As Long) As Long |
Parameters
| No | Name | Type | Optional | Default | Description |
|---|---|---|---|---|---|
| 1 | Session | String | No | - | One character session ID |
2 | win_status | Long | No | - | Status variable indicating which properties to set |
3 | zorder | Long | No | - | front or back |
4 | x | Long | No | - | x-position relative to upper left corner of desktop |
5 | y | Long | No | - | y-position relative to upper left corner of desktop |
6 | cx | Long | No | - | Width of window |
7 | cy | Long | No | - | Height of window |
Return Code | Description | ||||
JGS_OK | The function was successful | ||||
JGS_NOTCONNECTED | Your application is not currently connected to any valid session | ||||
JGS_SYSERROR | The function failed due to a system error | ||||
JGS_UNAVAILABLE | The session is already in use by another application | ||||
JGS_PARAMETERERROR | Missing or invalid parameter | ||||
JGS_PSENDED | The session has ended | ||||
Sample Code
| Background Color | ||
|---|---|---|
| ||
| Dim mySession as String Dim result as Long Dim x, y, cx, cy as Long Dim win_stat as Long Dim zorder zorder = 0 win_stat = 1 ' size window x = 100 y = 50 cx = 500 cy = 350 mySession = "E" result = win.VBS_SetStatus(mySession, win_stat, zorder, x, y, cx, cy) |
QWS3270 Automation copyright © Jolly Giant Software Inc. All rights reserved.