FindObject Function

Lehetővé teszi, hogy egy objektumot a futásidő alatt az objektum neveként megadott karakterláncként címezzen meg.

Például a következő parancs:

MyObj.Prop1.Command = 5

az alábbi parancsblokknak felel meg:

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

Ez lehetővé teszi nevek dinamikus létrehozását futás közben. Például:

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

Lásd még: FindPropertyObject

Szintaxis:

FindObject( ObjName As String )

Paraméterek:

Objektumnév: Karakterlánc, amely a futásidő alatt megcímezni kívánt objektum nevét adja meg.

Error codes:

5 Érvénytelen eljáráshívás

12 A változó nincs definiálva