say / color

say / color

Postby clemerson » Thu Nov 20, 2008 4: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 ?
User avatar
clemerson
 
Posts: 58
Joined: Fri Mar 10, 2006 8:13 pm
Location: Brazil

Postby jrestojeda » Thu Nov 20, 2008 5:01 pm

Prueba lo siguiente:

Code: Select all  Expand view
@ 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.
User avatar
jrestojeda
 
Posts: 601
Joined: Wed Jul 04, 2007 3:51 pm
Location: Buenos Aires - Argentina

Postby Daniel Garcia-Gil » Thu Nov 20, 2008 5:03 pm

oSayON:setText("TEST")
oSayON:setColor(colortext, colorpane)
User avatar
Daniel Garcia-Gil
 
Posts: 2365
Joined: Wed Nov 02, 2005 11:46 pm
Location: Isla de Margarita

Postby clemerson » Thu Nov 20, 2008 5:25 pm

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


usei oSayON:Refresh() funcionou :)
User avatar
clemerson
 
Posts: 58
Joined: Fri Mar 10, 2006 8:13 pm
Location: Brazil


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot] and 134 guests