FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Como cambiar un say
Posts: 652
Joined: Wed Oct 19, 2005 12:03 PM
Como cambiar un say
Posted: Thu Jan 17, 2013 10:41 PM
Hola tengo definido un say desde un recurso y necesito cambiarlo en tiempo de ejecución, probé así pero no funciona, en el recurso no tengo asignado ningún nombre al say

Code (fw): Select all Collapse
REDEFINE CHECKBOX oChex[7] VAR oData:lexporta id 500 of oFold:adialogs[1] update; 
                  on change (iif(oData:lexporta,oSay:settext("País"),oSay:settext("Localidad")),oSay:refresh())

REDEFINE Say oSay Var "Localidad" id 501 of oFold:adialogs[1] update


Que tengo que cambiar???

Gracias
Posts: 652
Joined: Wed Oct 19, 2005 12:03 PM
Re: Como cambiar un say
Posted: Thu Jan 17, 2013 11:25 PM
Hice lo siguiente y funciona

[code
local oSay
etc etc

REDEFINE CHECKBOX oChex[7] VAR oData:lexporta id 500 of oFold:adialogs[1] update;
ON CHANGE (iif( oData:lexporta ,oSay:settext("País"),oSay:settext("Localidad")),oSay:refresh())


REDEFINE Say oSay id 501 of oFold:adialogs[1] update

[/code]

cuando inicia el diálogo no aparece nada,y al hacer los cambios en el checkbox genera los textos, pero lo que necesito es que aparezca cuando inicio el diálogo ya sea dependiendo de la condición que sea una cosa u otra
Posts: 652
Joined: Wed Oct 19, 2005 12:03 PM
Re: Como cambiar un say
Posted: Thu Jan 17, 2013 11:34 PM
Bueno seguí probando y la solución que encontré es la siguiente

Code (fw): Select all Collapse
local oSay
 etc etc

REDEFINE CHECKBOX oChex[7] VAR oData:lexporta id 500 of oFold:adialogs[1] update;
 ON CHANGE (oSay:settext(iif(oData:lexporta,"País","Localidad"),oSay:refresh())


REDEFINE Say oSay id 501 of oFold:adialogs[1] update

 ACTIVATE DIALOG ODLGCLI CENTER ON INIT (oSay:settext(iif(oData:lexporta,"País","Localidad")),oNcli:setfocus(),.f.)


Gracias
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: Como cambiar un say
Posted: Fri Jan 18, 2013 12:36 PM

oSay:SetText( ... )

regards, saludos

Antonio Linares
www.fivetechsoft.com

Continue the discussion