FindPropertyObject Function

Ebligas ke oni rultempe adresu objektojn per ĉena parametro uzanta la objektan nomon.

Ekzemple, la jena komando:


MyObj.Prop1.Command = 5

korespondas al la komanda bloko:


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

Tio ebligas dinamike krei nomojn je rultempo. Ekzemple:

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

Sintakso:


FindPropertyObject( ObjVar, PropName As String )

Parametroj:

ObjVar: Objekta variablo dinamike difinota rultempe.

PropName: Ĉeno kiu specifas la nomon de atributo rultempe adresota.

Error codes:

5 Nevalida procedurvoko

12 Variable not defined

14 Nevalida parametro

52 Nevalida dosiera nomo aŭ dosiera numero

57 Eraro de en/eliga aparato