FindObject Function

FindObject tekee mahdolliseksi objektin osoittamisen ajonaikaisesti merkkijonoparametrilla objektin nimen kautta.

Esimerkiksi, seuraavaa komento:

MyObj.Prop1.Command = 5

vastaa käskylohkoa:

Dim ObjVar as Object

Dim ObjProp as Object

ObjName As String = "MyObj"

ObjVar = FindObject( ObjName As String )

PropName As String = "Prop1"

ObjProp = FindPropertyObject( ObjVar, PropName As String )

ObjProp.Command = 5

Tämä tekee mahdolliseksi luoda dynaamisesti ajonaikaisia nimiä. Esimerkki:

"TextEdit1" to "TextEdit5" in a loop to create five control names.

Katso myös: FindPropertyObject

Syntaksi:

FindObject( ObjName As String )

Parametrit:

Objektinimi: merkkijono, joka määrittää ajonaikaisesti osoitettavan objektin nimen.

Error codes:

5 Virheellinen proseduurikutsu

12 Muuttujaa ei ole määritetty