PC SOFT

GRUPOS DE DISCUSSÃO PROFISSIONAL
WINDEVWEBDEV e WINDEV Mobile

Inicio → WINDEV 28 → INCLUIR CODIGO AL INICIO DE CADA PLANO
INCLUIR CODIGO AL INICIO DE CADA PLANO
Iniciado por GARCIA SALVADOR, mar., 19 2020 6:10 PM - 2 respostas
Membro registado
14 mensagems
Publicado em março, 19 2020 - 6:10 PM
Buenas,

Quería saber si alguien tiene una solución para poder incluir código al inicio de un plano.
Pretendo usar planos para evitar hacer muchos módulos similares, pero a veces hay que incluir código de forma similar a como lo hacemos al Inicio de una ventana.

Un saludo,
Membro registado
21 mensagems
Popularité : +1 (1 vote)
Publicado em março, 21 2020 - 12:55 AM
Buena tarde Salvador.

Mira mi solución es mas que sencilla pero efectiva y bien organizada.

En cada ventana coloco un
LOCAL Procedure
que contenga un selector:

// Summary: Cambia de plano y configura cada uno.
// Syntax:
//CambioPlano(1)
//
// Parameters:
// nPlane (int): CambioPlano Plano al cual se cambiara.

Procedure CambioPlano(LOCAL nPlane is int)
SWITCH nPlane
CASE 1
STC_Titulo = "Seleccione bodega"
CASE 2
STC_Titulo = "Escanee el codigo"
CASE 3
STC_Titulo = "Agregue lote manual"
OTHER CASE
STC_Titulo = "Sin Titulo"

END
MyWindow..Plane = nPlane


Y cada vez que haga el cambio de plano mando a llamar esta función, si deseas que solo se ejecute una sola vez usa banderas de control respaldadas con variables globales.

Espero te sirva, Saludos.

--
__________________________
-ercnet.elias@gmail.com-
-Ing. Elias Ramos Cantù-
Membro registado
14 mensagems
Publicado em março, 21 2020 - 11:08 AM
Gracias Elias, es la solución a la que había llegado yo.

Por cierto, sabes como crear un menú emergente, asignado a un botón, de forma dinámica, mediante programa.
Creo bien el botón, pero cuando trato de crear un menú popup para asignárselo, no me deja. Me pide un menú source.
Y me parece que me va a tocar dejar creados menús vacíos por edición, para luego asignarlos a los botones y añadirles opciones.

Gracias y un saludo,