FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour say / color
Posts: 58
Joined: Fri Mar 10, 2006 08:13 PM
say / color
Posted: Thu Nov 20, 2008 04:50 PM

@ 17.1,65 SAY oSayON var SayON OF oDlg COLOR CLR_RED,GetSysColor(15) Font oFont5 SIZE 65,25
oSayON:setText("TEST")

como cambiar/trocar para color BLUE ?

Posts: 601
Joined: Wed Jul 04, 2007 03:51 PM
say / color
Posted: Thu Nov 20, 2008 05:01 PM
Prueba lo siguiente:

@ 17.1,65 SAY oSayON var SayON OF oDlg COLOR RGB( , , ) ,GetSysColor(15) Font oFont5 SIZE 65,25 
oSayON:setText("TEST")


Donde en RGB( , , ) le envías los parametros del color que necesites.

Espero te sirva.
Saludos, Esteban.
Ojeda Esteban Eduardo.

Buenos Aires - Argentina.

FWH - PellesC - DBF/CDX - ADS - Gloriosos .Bat - MySql - C# .net - FastReport

Skype: jreduojeda
Posts: 2365
Joined: Wed Nov 02, 2005 11:46 PM
say / color
Posted: Thu Nov 20, 2008 05:03 PM

oSayON:setText("TEST")
oSayON:setColor(colortext, colorpane)

Posts: 58
Joined: Fri Mar 10, 2006 08:13 PM
say / color
Posted: Thu Nov 20, 2008 05:25 PM
mcfox wrote:oSayON:setText("TEST")
oSayON:setColor(colortext, colorpane)


usei oSayON:Refresh() funcionou :-)

Continue the discussion