FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveLinux / FiveDroid (Android) Ejemplo de SET MESSAGE en FiveLinux
Posts: 170
Joined: Sat Aug 07, 2010 11:36 PM
Ejemplo de SET MESSAGE en FiveLinux
Posted: Wed Apr 13, 2011 09:10 PM

Tengo un SET MESSAGE en mi menu principal y quiero ir cambiando el texto a medida que pasa por otros lados.

Al colocar SET MESSAGE funciona bien pero cuando quiero actualizar el mensaje, no he conseguido hacerlo.

DEFINE WINDOW oWnd_Principal TITLE cTitulo SIZE 800, 600
SET MESSAGE OF oWnd_Principal TO " Hola "

ACTIVATE WINDOW oWnd_Principal

¿como lo puedo hacer para cambiar el mensaje en otro proceso?
He probado:
SET MESSAGE OF oWnd_Principal TO " Chao "
oWnd_Principal:oMsgBar:SetText("Chao")
oWnd_Principal:oMsgBar:cMsg:="Chao"

Cualquier ayuda se agradece...

Jorge Gayoso :oops:

Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: Ejemplo de SET MESSAGE en FiveLinux
Posted: Sat Apr 16, 2011 12:33 PM
Jorge,

Prueba este ejemplo, por el momento es una solución a falta de implementar MESSAGE en los MENUITEMS:

Code (fw): Select all Collapse
#include "FiveLinux.ch"

static oWnd

function Main()

   DEFINE WINDOW oWnd TITLE "Menu test" MENU BuildMenu()

   SET MESSAGE OF oWnd TO "FiveLinux power!"

   ACTIVATE WINDOW oWnd

return nil

function BuildMenu()

   local oMenu

   MENU oMenu
     MENUITEM "One" ACTION oWnd:oMsgBar:SetText( "One" )
     MENUITEM "Two" ACTION oWnd:oMsgBar:SetText( "Two" )
     MENUITEM "Three" ACTION oWnd:oMsgBar:SetText( "Three" )
   ENDMENU

return oMenu
regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 170
Joined: Sat Aug 07, 2010 11:36 PM
Re: Ejemplo de SET MESSAGE en FiveLinux
Posted: Tue Apr 26, 2011 02:01 PM
Ok, resulto bien.

Se agradece.



jgayoso wrote:Tengo un SET MESSAGE en mi menu principal y quiero ir cambiando el texto a medida que pasa por otros lados.

Al colocar SET MESSAGE funciona bien pero cuando quiero actualizar el mensaje, no he conseguido hacerlo.

DEFINE WINDOW oWnd_Principal TITLE cTitulo SIZE 800, 600
SET MESSAGE OF oWnd_Principal TO " Hola "


ACTIVATE WINDOW oWnd_Principal


¿como lo puedo hacer para cambiar el mensaje en otro proceso?
He probado:
SET MESSAGE OF oWnd_Principal TO " Chao "
oWnd_Principal:SetText("Chao")
oWnd_Principal:="Chao"


Cualquier ayuda se agradece...

Jorge Gayoso :-)

Continue the discussion