topic-26674

Posts: 582

Joined: Fri Oct 07, 2005 02:17 PM

Set Message to en Fwh 13.05
Posted: Fri Jun 28, 2013 03:19 AM

Saludos Antonio,

Tengo un problema con el "Set Message" que no tengo con ninguna de mis versiones anteriores 10.02 y 12.02, si lo defino una sola vez, no pasa nada, pero si lo defino 2 veces sale "intermitente" osea el anterior texto y el nuevo se van presentando uno encima del otro entrando en un LOOP que solo termina al salir del sistema.
Y si por alguna razon usas el MESSAGE en las opciones de Menu estas tambien se sobreponen podes probarlo con cualquier SET MESSAGE que uses 2 o mas veces.
Gracias por tu atencion

Enrrique Vertiz Pitta

Lima-Peru

xHb 1.23.1026X, Fwh 25.01, BCC74, MySQL 8.0.X, SQLLIB 1.9m

cnavarro

Posts: 6755

Joined: Wed Feb 15, 2012 08:25 PM

Re: Set Message to en Fwh 13.05
Posted: Fri Jun 28, 2013 08:37 AM

Puede estar relacionado con el siguiente post:

viewtopic.php?f=6t=26535#p146543

Saludos

&

Cristobal Navarro

Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo

El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces

Enrrique Vertiz

Posts: 582

Joined: Fri Oct 07, 2005 02:17 PM

Re: Set Message to en Fwh 13.05
Posted: Fri Jun 28, 2013 01:47 PM

Cristobal, gracias por tu respuesta

Si bien haciendo los cambios ahi indicados no me soluciono el problema, me dio al idea de compilar solo ese source de la version anterior y con eso por el momento esta Ok

Enrrique Vertiz Pitta

Lima-Peru

xHb 1.23.1026X, Fwh 25.01, BCC74, MySQL 8.0.X, SQLLIB 1.9m

Maggiro

Posts: 85

Joined: Thu Oct 14, 2010 03:26 AM

Re: Set Message to en Fwh 13.05
Posted: Tue Dec 22, 2015 05:38 AM

Enrique:
Dos cosas sobre tu consulta
- Primero, para cambiar el SET MESSAGE, tu ventana STATIC tiene que ser pasada hacia la función que modifica el mensaje
Ejemplo : función modifica_mensaje(ventana_poseedora)
- Segundo, modifica SET MESSAGE con el comando:
ventana_poseedora:Setmsg('tu nuevo mensaje')
Espero te sirva
Saludos
Julio César Gómez Cortéz
Godryc Experiencias

Rick Lipkin

Posts: 2706

Joined: Fri Oct 07, 2005 01:50 PM

Re: Set Message to en Fwh 13.05
Posted: Tue Dec 22, 2015 01:34 PM

Enrique

Consider these snipits of code based on the Main MDI window. In this code I allow a different user to login to my application and I have to update SET MESSAGE in the BuildMenu() part of the code. xMessage is defined as Public because Set Message is not defined prior to the main MDI and it can not be passed to BuildMenu() because xMessage is still NIL at the top of the program.

The changes to SET MESSAGE are defined with the BuildMenu() code .. again these are just snipits of code within my Main() code :

Code (fw): Select all Collapse

Public xMessage

//
//

xMESSAGE :=  "User  "+xLOGIN+"    Rights  "+cRIGHTS+        ;
      "     Default= "+cDEFA+"      Rdd= "+cRDD+            ;
      "     Revision  "+DTOC(dEXE)+;
      "  -r"+str(nSCR1,4)+" x "+STR(nSCR2,4)

DEFINE WINDOW oWndMain TITLE cTitle ;
       MENU BuildMenu(dExe,cRdd,nSCR1,nSCR2);
       ICON oIco ;
       MDI


      SET MESSAGE OF oWndMain     ;
       to xMessage DATE CLOCK 2010

Activate Window oWndMain MAXIMIZED    


// in BuildMenu()

MENUITEM "&Login Diff User" ;
     ACTION( _Log_in( "M" ), ;
        cRIGHTS := _Rights(),             ;
        xMESSAGE :=  ( "User  "+xLOGIN+"    Rights  "+cRIGHTS+        ;
                              "     Default= "+cDEFA+"      Rdd= "+cRDD+  ;
                              "     Revision  "+DTOC(dEXE)+;
                              "  -r"+str(nSCR1,4)+" x "+STR(nSCR2,4)),;
        oMenu:End(),;                                                      // end the current menu
        oWndMain:oMsgBar:cMsgDef := xMessage,oWndMain:oMsgBar:ReFresh(),;  //redefine set message
        oWndMain:SetMenu( BuildMenu( dEXE,cRDD,nSCR1,nSCR2 )),;            // redefine buildmenu()
        MsgInfo( "Current User is now   "+xLOGIN ))

Rick Lipkin

FiveTech Support Forums

Continue the discussion