KeepAspectRatio, SynopticCmdTarget Property

Syntax	KeepAspectRatio = _Boolean
Description	Used to read or set the screen's 'Keep Aspect Ratio (Web Client HTML5)' property which is used to reside the screen page displayed in the Web Client HTML5 session. When this is active, it keeps the screen's aspect ratio no matter what has been has been set in the screen's "Fit In Windows" property.

Parameter

Description

None

Result

boolean

Example:

'Nell'Ambiente Sinottico

Public Sub Click()

Dim lRet As Integer

lRet = KeepAspectRatio

MsgBox "KeepAspectRatio = " & CStr(lRet), vbOkOnly, "Test KeepAspectRatio "

End Sub

‘in un Oggetto Grafico del Sinottico

Public Sub Click()

Dim ObjSyn As SynopticCmdTarget

Set ObjSyn = GetSynopticObject

ObjSyn.KeepAspectRatio = Not ObjSyn.KeepAspectRatio

Debug.Print "KeepAspectRatio = " & CStr(CBool(ObjSyn.KeepAspectRatio))

Set ObjSyn = Nothing

End Sub