FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para CA-Clipper Cambiar Color Botton
Posts: 537
Joined: Mon Jan 16, 2006 03:42 PM
Cambiar Color Botton
Posted: Wed Mar 22, 2006 01:51 PM

Una consulta amigos como le cambio el color un botton
Saludos

Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM
Cambiar Color Botton
Posted: Wed Mar 22, 2006 05:42 PM

A un botón estandard no le puedes cambiar el color. Lo que puedes hacer es usar un botón TBtnBmp y usar un bitmap con un determinado color.

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 537
Joined: Mon Jan 16, 2006 03:42 PM
Cambiar Color Botton
Posted: Thu Mar 23, 2006 01:17 PM

Antonio pero al BtnBmp si es Rojo como le puedo cambiar a amarillo en el mismo ID

REDEFINE BTNBMP ID 105 OF oDlg RESOURCE "Rojo"

Saludos

Posts: 1054
Joined: Sun Oct 09, 2005 10:41 PM
Cambiar Color Botton
Posted: Thu Mar 23, 2006 07:50 PM

Hola jbrita: Funciona asi: Salu2 Willi

...
...
REDEFINE BTNBMP oTVenta ;
RESOURCE "EFECTIVO" CENTER NOBORDER ;
PROMPT "Efectivo Cash" ;
FONT oFont3 ;
ACTION (nTVenta:=EfectivoTarjeta(oTVenta,nTVenta), ;
oTicket:SetFocus)) ;
ID 121 OF oDlg
...
...
...

oTVenta:LoadBitMaps("EFECTIVO")
oTVenta:SetText("Efectivo Cash")
oTVenta:Refresh()

Return(Nil)

Posts: 1054
Joined: Sun Oct 09, 2005 10:41 PM
Cambiar Color Botton
Posted: Thu Mar 23, 2006 07:52 PM

UPs,,, sorry, era esa linea para cambiar la imagen y texto que la activas segun sea tu necesidad:

..
..
Function CambiaBmp(oTVenta)
oTVenta:LoadBitMaps("VISAMASTER")
oTVenta:SetText("Tarjeta de Crédito")
oTVenta:Refresh()
Return(Nil)

Continue the discussion