FindPropertyObject függvény

Lehetővé teszi az objektum nevének karakterlánc-paraméterként való felhasználását az objektumok futásidőbeli megcímzésére.

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" egy ciklusban öt vezérlőelemnév létrehozásához

Lásd még: FindObject

Szintaxis:


FindPropertyObject( ObjVar, PropName As String )

Paraméterek:

Objektumváltozó: Object (objektum) változó, amelyet futásidőben dinamikusan szeretne definiálni.

Tulajdonságnév: Karakterlánc, amely meghatározza a futásidő alatt megcímezni kívánt tulajdonság nevét.

Hibakódok:

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

12 A változó nincs definiálva

14 Érvénytelen paraméter

52 Érvénytelen fájlnév vagy fájlszám

57 Eszköz-I/O-hiba

Please support us!