ContainerControl en tiempo de ejecución

  1. 4 months ago

    Buenos días, necesito poder acceder en tiempo de ejecución mediante unos métodos a unos controles 'ContainerControl' que he creado.

    Ejemplo de ContainerControl con la siguiente estructura

    - ccTextField (ContainerControl)
    Campo (TextField)
    Btn (botón)

    Lo que quiero es poder acceder por código a estos controles ContainerControl, con los controles ‘normales’ (TextField, label, etc.) ya lo tengo conseguido pero no soy capaz de hacerlo con los ContainerControl.

    Este es parte del código que tengo en un método….

    For i = 0 to Window.ControlCount -1

    if Window.Control(i) isA Textfield then

    Dim c as new TextField
    c = TextField(Window.Control(i))
    c.Text = rsV.Field(CampoDestino).StringValue

    elseif Window.Control(i) isA ccTextField then

    Dim cc as new ccTextField
    cc = ccTextField(Window.Control(i))
    cc.Campo.Text = rsV.Filed(CampoDestino).StringValue

    end if

    Next

    Lo errores que me devuelve son del tipo:
    EmbeddedWindowControl cannot be cast to ccTextField.ccTextFiled

    ¿Qué estoy haciendo mal?

    Gracias y un saludo.

  2. 3 months ago

    Javier M

    Jun 8 Pre-Release Testers, Xojo Pro, Third Party Store AprendeXojo - Europe, Spain

    Hola Marcos,

    Una técnica que podrías aplicar es la que se expone en el siguiente tutorial: https://www.aprendexojo.com/2019/02/arrays-de-controles-y-containercontrol/

    Javier

  3. Hola Javier,
    Lo probaré, muchas gracias por responder.

    Marcos

or Sign Up to reply!