Funzione FindObject

Permette di fare riferimento a un oggetto come parametro a stringa durante l'esecuzione usando il suo 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: FindPropertyObject

Sintassi:


FindObject( ObjName As String )

Parametri:

NomeOgg: stringa che specifica il nome dell'oggetto a cui volete fare riferimento al runtime.

Codici di errore:

5 Richiamo di procedura non valido

12 Variabile non definita

Sosteneteci!