Funzione FindPropertyObject

Permette di fare riferimento agli oggetti come parametri a stringa durante l'esecuzione usando il loro nome.

Ad esempio, il comando seguente:


MyObj.Prop1.Command = 5

corrisponde al seguente blocco di comandi:


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

In questo modo potete creare i nomi dinamicamente durante l'esecuzione del programma. Ad esempio:

"TextEdit1" to "TextEdit5" in un ciclo per creare i nomi di cinque campi di controllo.

Vedere anche: FindObject

Sintassi:


FindPropertyObject( ObjVar, PropName As String )

Parametri:

VarOgg: variabile oggetto da definire dinamicamente al runtime.

NomeProp: stringa che specifica il nome della proprietà a cui volete fare riferimento al runtime.

Codici di errore:

5 Richiamo di procedura non valido

12 Variabile non definita

14 Parametro non valido

52 Nome file o numero file errato

57 Errore di I/O sul dispositivo

Sosteneteci!