FiveTech Software tech support forums

Hola, Necesito cambar el nombre del usuario en la Ventana oWnd, cada vez que entra al sistema uno diferente, tengo:

DEFINE WINDOW oWnd MDI ;
TITLE "Control de Mantenimientos";
MENU BuildMenu(oWnd) MDI ;
ICON oIco

DEFINE MESSAGE OF oWnd PROMPT cUsuario ;
NOINSET CENTERED KEYBOARD DATE CLOCK

ACTIVATE WINDOW oWnd MAXIMIZED ;
VALID MsgYesNo( HB_OemtoAnsi("¨ Salir del Programa ?") ,HB_OemtoAnsi("Seleccione opci¢n"));
ON INIT Pass(oWnd)

Como puedo "Actualizar" el valor del PROMPT de la barra de MESSAGE para cambiarlo al ingresar al programa ?

Saludos y gracias

servicomver wrote:Hola, Necesito cambar el nombre del usuario en la Ventana oWnd, cada vez que entra al sistema uno diferente, tengo:

DEFINE WINDOW oWnd MDI ;
TITLE "Control de Mantenimientos";
MENU BuildMenu(oWnd) MDI ;
ICON oIco

DEFINE MESSAGE OF oWnd PROMPT cUsuario ;
NOINSET CENTERED KEYBOARD DATE CLOCK

ACTIVATE WINDOW oWnd MAXIMIZED ;
VALID MsgYesNo( HB_OemtoAnsi("¨ Salir del Programa ?") ,HB_OemtoAnsi("Seleccione opci¢n"));
ON INIT Pass(oWnd)

Como puedo "Actualizar" el valor del PROMPT de la barra de MESSAGE para cambiarlo al ingresar al programa ?

Saludos y gracias

DEFINE MESSAGE oMsg OF oWnd PROMPT cUsuario ;
NOINSET CENTERED KEYBOARD DATE CLOCK

Prueba así:

oMsg:SetMsg( "Hola!!! como estas?" )

Fíjate en el 'oMsg' en el -->> DEFINE MESSAGE oMsg OF oWnd ...

Suerte,

Gracias por responder, no marca error, pero tampoco muestra el cambio

Lo has probado asi?

Si no te funciona lo anterior, hazlo asi:

oMsg:cMsgDef := "nuevo mensaje"

oMsg:SetMsg( "Hola!!! como estas?" )
oMsg:Refresh()

Esto funciono perfecto !!!. Gracias

Antonio, necesito actualizar mi Fivewin (es muy vieja), ¿Puedes apoyarme para saber como realizar la compra desde México?, a que cuenta transferir y que mas necesito para compilar correctamente con la nueva versión.

Saludos

oMsg:SetMsg( "Hola!!! como estas?" )
oMsg:Refresh()

No había notado que si hace el cambio, pero al pasar el mouse por la ventana "se pierde nuevamente", ¿Que estoy haciendo mal ?

Haz esto:

oMsg:cMsgDef := "nuevo mensaje"
oMsg:Refresh()

Puedes actualizar desde nuestra web usando la tarjeta de crédito ó por Western Union ó PayPal a alinares@fivetechsoft.com

gracias!

Que tal Antonio, ya realizamos la compra por PAYPAL...Gracias

Recibido, muchas gracias!

Vamos a procesarla ahora mismo

Hola Antonio, que paso sigue para poder recibir la actualización ?

Acabamos de reenviarlo, por favor comprueba tu email

Ha debido haber algún problema con el email anterior, gracias