FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Actualizar en un BMP
Posts: 198
Joined: Fri Nov 18, 2005 07:34 PM

Actualizar en un BMP

Posted: Mon May 11, 2020 09:56 PM

Hola necesito poner una imagen como fondo de una ventana, en una parte de ella necesito tener texto Fijo transparente pero también necesito colocar una variable que deberá actualizarse cada determinado tiempo

por ejemplo:
@ 5, 5 BITMAP oBmp2 FILENAME "c:\conteo\logo.bmp" SIZE 500, 400 OF oWnd NOBORDER

      oBmp:bPainted = { || SetBkMode( oBmp:hDC, 1 ),;
      SetTextColor( oBmp:hDC, CLR_YELLOW ),;
      TextOut( oBmp:hDC, 50, 15, "Actualmente con nosotros" ) }

      //¿ Se puede cambiar el tamaño de la fuente ?

¿ Como se haría para que en otra parte de la misma ventana muestre una variable que cambiará de valor por medio de un timer ?

Gracias a todos, saludos

Posts: 6755
Joined: Wed Feb 15, 2012 08:25 PM

Re: Actualizar en un BMP

Posted: Mon May 11, 2020 11:53 PM

No sé si te he entendido bien
Construye este ejemplo

https://bitbucket.org/fivetech/fivewin- ... ESTGDI.prg

Cristobal Navarro

Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo

El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces
Posts: 198
Joined: Fri Nov 18, 2005 07:34 PM

Re: Actualizar en un BMP

Posted: Tue May 12, 2020 02:34 AM

Gracias por contestar, necesito mostrar una imagen en una ventana maximizada, arriba de la imagen necesito escribir digamos:

Numero de Clientes: [48] "ese numero variará cada 5 minutos"
Lugares disponibles: [152] "ese numero variará cada 5 minutos"

lo que requiero es que se vean de forma "Transparente", como lo hace:

oBmp:bPainted = { || SetBkMode( oBmp:hDC, 1 ),;
SetTextColor( oBmp:hDC, CLR_BLACK ),;
TextOut( oBmp:hDC, 20, 540, "Numero de Clientes:" ) }

Pero necesito cambiarle, el color, el tamaño y la fuente, y poner varios textos, Constantes y Variables,

Se puede hacer ?

Gracias, Saludos

Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM

Re: Actualizar en un BMP

Posted: Tue May 12, 2020 02:46 AM
Code (fw): Select all Collapse
   oBmp:bPainted := <|hDC|
      SetBkMode( hDC, 1 )
      SetTextColor( hDC, CLR_YELLOW )
      oFont1:Activate( hDC )
      TextOut( hDC, 50, 15, "Actualmente con nosotros" )
      oFont1:DeActivate( hDC )
      return nil
      >
Regards



G. N. Rao.

Hyderabad, India

Continue the discussion