PC SOFT

FOROS PROFESIONALES
WINDEVWEBDEV y WINDEV Mobile

Inicio → WINDEV 2024 → Asignar un control clonado a un panel de un tab
Asignar un control clonado a un panel de un tab
Iniciado por Santiago, 04,dic. 2008 15:41 - No hay respuesta
Publicado el 04,diciembre 2008 - 15:41
En diseño puedo especificar que una Internal Window Control se asigne a un panel concreto o a ninguno detro de un tab control. Por programación estoy clonando un Internal Window Control y quiero poder asignar el control clonado a un panel concreto. ¿Es esto posible?

El objetivo es poder asignar cualquier ventana interna a cualquier panel de un tab.

Utilizo el siguiente código.

***********************************
numtab is int = buscaTabDatosLibre() //Retorna un panel no usado

IF(numtab=0) THEN
Info("Agotado el número de tabs")
ELSE
activaTab(numtab,"Póliza")
nuevaInternalWindow is string="IW_InternalWindowPaneC" + numtab
ControlClone(PRESS_IW_InternalPrincipal.IW_InternalWindowPane,nuevaInternalWindow)
ChangeSourceWindow(nuevaInternalWindow,EXPRESS_IW_InternalPoliza)
¡¡¡EL CONTROL ES CLONADO PERO NO PUEDO ASIGNARLO A OTRO PANEL!!!
END
***************************************

***************************************
PROCEDURE buscaTabDatosLibre()

numtab is int
nummax is int = EXPRESS_IW_InternalPrincipal.TAB_Datos..Occurrence
FOR numtab = 1 TO nummax
IF(EXPRESS_IW_InternalPrincipal.TAB_Datos[numtab]..Visible=False) THEN
RESULT(numtab)
END
END
RESULT(0)
***************************************

***************************************
PROCEDURE activaTab(numtab,texto)
EXPRESS_IW_InternalPrincipal.TAB_Datos[numtab]..Caption=texto
EXPRESS_IW_InternalPrincipal.TAB_Datos[numtab]..Visible=True
EXPRESS_IW_InternalPrincipal.TAB_Datos=numtab
***************************************