Conteúdo

# Função FindObject

Permite que um objeto seja tratado durante o momento de execução como um parâmetro de uma cadeia de texto através do nome do objeto.

Por exemplo, o seguinte comando:

    MyObj.Prop1.Command = 5

corresponde ao bloco de comandos:

    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 que sejam criados nomes de forma dinâmica durante o tempo de execução. Por exemplo:

"TextEdit1" to TextEdit5" num ciclo para criar cinco nomes de controlo.

Consultar também: FindPropertyObject

## Sintaxe:

    FindObject( ObjName As String )

## Parâmetros:

NomeObj: cadeia que especifica o nome do objeto ao qual se pretende dirigir durante o tempo de execução.

### Códigos de erro

5 Chamada de procedimento inválido

12 Variável não definida

Necessitamos da sua ajuda!