FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour consulta 2 temas
Posts: 0
Joined: unknown
consulta 2 temas
Posted: Thu Sep 29, 2022 10:00 AM

Hola gente, primer tema, necesito hacer botones redondos con resource, estuve viendo los ejemplos y todos están sin resource, algún ejemplo?

Segundo tema, se puede saber la ubicación desde donde estamos conectados?

Saludos
Jorge

Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: consulta 2 temas
Posted: Thu Sep 29, 2022 10:05 AM
Estimado Jorge,

Te sería más simple usar recursos estandard (rectangulares o cuadrados) y en la imagen hacer transparente lo que quieras que no se vea

Code (fw): Select all Collapse
#include "FiveWin.ch"

function Main()

   MsgInfo( PublicIP() )  

return nil

function PublicIP()

return WebPageContents( "https://www.fivetechsoft.com/getip.php" )
regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM
Re: consulta 2 temas
Posted: Thu Sep 29, 2022 05:09 PM
jpcavagnaro wrote:Hola gente, primer tema, necesito hacer botones redondos con resource, estuve viendo los ejemplos y todos están sin resource, algún ejemplo?
Saludos
Jorge

While using FWH, the same syntax works whether you use bitmap file name or resource name.
If you already found some examples, please replace the bmp file names with your resource names.
Regards



G. N. Rao.

Hyderabad, India
Posts: 8515
Joined: Tue Dec 20, 2005 07:36 PM
Re: consulta 2 temas
Posted: Thu Sep 29, 2022 05:56 PM
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
Posts: 0
Joined: unknown
Re: consulta 2 temas
Posted: Fri Sep 30, 2022 08:19 PM

Hola, estoy viendo de hacerlo tsbutton, tengo que cambiar la imagen del botón en forma dinámica, como hago?

Lo estoy trabajando con resources.

Saludos
Jorge

Posts: 1344
Joined: Wed Nov 16, 2005 09:14 PM
Re: consulta 2 temas
Posted: Sat Oct 01, 2022 11:53 AM

Con TSButtons podes usar el metod ChangeBitMap
ChangeBitMap( anBmps, acBmps, lResource )
Por ejemplo
oBot:ChangeBitMap( 1, "NUEVO",.T. )
Donde cambias la imagen principal del boton con el BITMAP de recurso de nombre "NUEVO"
O si tenes definido mas de una imagen para el boton (Cuando se presiona, cuando esta disable, etc) le pasas 2 arrays, uno con los botones de que posicion cambias, y otro con los nuevos recursos

Posts: 0
Joined: unknown
Re: consulta 2 temas
Posted: Mon Oct 03, 2022 12:37 PM

Buenísimo,

Muchas gracias.
Saludos
Jorge

Continue the discussion