Función FindObject

Permite direccionar un objeto en tiempo de ejecución como parámetro de cadena usando su nombre.

Por ejemplo, la orden siguiente:


MyObj.Prop1.Command = 5

corresponde al bloque de órdenes:


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

Esto permite crear nombres dinámicamente en tiempo de ejecución. Por ejemplo:

"TextEdit1" to "TextEdit5" en un bucle para crear cinco nombres de control.

Consulte también: FindPropertyObject

Sintaxis:


FindObject( ObjName As String )

Parámetros:

NombreObj: Cadena que especifica el nombre del objeto que se desea direccionar en tiempo de ejecución.

Códigos de error:

5 Llamada a procedimiento no válida

12 Variable no definida

¡Necesitamos su ayuda!