topic-18818

Posts: 883

Joined: Thu Dec 24, 2009 12:46 AM

TSButton Cambiar BMP (Solucionado)
Posted: Sun May 16, 2010 08:38 PM

Hola,
alguien sabe si un Sbutton permitiria el cambio del bmp en tiempo de ejecucion, habiendo este sido asignado directamente:

Code (fw): Select all Collapse

REDEFINE SBUTTON oCalc[1] ID 4051 OF oDialog prompt '0' FILENAME '..\botones\BOTON1.bmp' font oFont2 TEXT ON_CENTER PIXEL ROUNDRECT NOBOXTR ADJUST ACTION Calc('0')

Actualmente utilizo un brush, que sí me permite cambiarlo en tiempo de ejecucion, pero me da problemas en Windows Vista y en Windows 7, aún utilizando la clausula ADJUST

El problema creo es que el BMP es menor que el tamaño del recurso, por eso quiero evitar tener que usarlo como un BRUSH...

=====>

Bayron Landaverry
xBasePHP.com
(215)2226600 Philadelphia,PA, USA
MayaBuilders@gMail.com
Guatemala

FWH25.06--Harbour 3.0.0--BCC7.7--UEstudio 10.10
Windows 10

FiveWin, One line of code and it's done...

Bayron

Posts: 883

Joined: Thu Dec 24, 2009 12:46 AM

Re: TSButton Cambiar BMP (Solucionado)
Posted: Sun May 16, 2010 09:28 PM

Solución:

Code (fw): Select all Collapse

DEFINE BRUSH oCalculadora                ////Dejar vacio

REDEFINE SBUTTON oCalc[1] ID 4051 OF oDialog prompt '0' BRUSH oCalculadora font oFont2 TEXT ON_CENTER PIXEL ROUNDRECT NOBOXTR ADJUST ACTION Calc('0')

oCalc[1]:ChangeBitMap( 1, '..\botones\BOTON1.bmp' )

De esta manera, se pintan bien los botones en Windows Vista y Windows 7. Este problema me lo daba, al instalar el aplicativo en sistemas nuevos Windows y desaparecía misteriosamente al instalar Windows Office.
Tambien se generaba al cambiar el tamaño de texto y recursos desde la opcion CONTROL PANEL \\ DISPLAY y colocarlo en MEDIUM, LARGER no reproduce el problema....

Por favor noten que el problema era, que yo declaraba el BMP por medio del BRUSH, por necesidades propias...

=====>

Bayron Landaverry
xBasePHP.com
(215)2226600 Philadelphia,PA, USA
MayaBuilders@gMail.com
Guatemala

FWH25.06--Harbour 3.0.0--BCC7.7--UEstudio 10.10
Windows 10

FiveWin, One line of code and it's done...

FiveTech Support Forums

Continue the discussion