Exemple

L'exemple suivant montre comment récupérer des caractères d'une zone rectangulaire dans l'espace de présentation pour la connexion associée à l'objet autECLPS.

Dim autECLPSObj as Object Dim PSText String ' Initialize the connection Set autECLPSObj = CreateObject ("ZIEWin.autELCPS") autECLPSObj.SetConnectionByName("A") PSText = GetTextRect(1,1,2,80)