Función FindObject

Activa o direccionamento de obxectos en tempo de execución como un parámetro de cadea por medio do seu nome.

Por exemplo, a seguinte orde:

MyObj.Prop1.Command = 5

corresponde ao bloque de ordes:

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

Isto permite crear nomes dinamicamente en tempo de execución. Por exemplo:

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

See also: FindPropertyObject

Sintaxe:

FindObject( ObjName As String )

Parámetros:

ObjName: String that specifies the name of the object that you want to address at run-time.