FindPropertyObject Function

Võimaldab pöörduda käitusajal objektide poole stringiparameetrina objekti nime abil.

Näiteks järgmine käsk:

MyObj.Prop1.Command = 5

vastab käsuplokile:

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

See võimaldab käitusajal luua nimed dünaamiliselt. Näiteks:

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

Vaata ka: FindObject

SĂĽntaks:

FindPropertyObject( ObjVar, PropName As String )

Parameetrid:

ObjVar: objektimuutuja, mille soovid käitusajal dünaamiliselt määrata.

PropName: string, mis määrab selle omaduse nime, mille poole soovid käitusajal pöörduda.

Error codes:

5 Vigane protseduuri väljakutse

12 Muutuja ei ole defineeritud

14 Vigane parameeter

52 Vigane failinimi või failide arv

57 Seadme sisend-/väljundviga