FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour FONT
Posts: 1076
Joined: Fri Oct 07, 2005 10:41 PM
FONT
Posted: Sat Dec 02, 2006 11:52 PM

Hola,

Se podria generar o setear el FONT con un color?

es posible esto?

DEFINE FONT "TAHOMA" ... COLOR CLR_RED

Gracias de antemano por la tención

William Morales

William, Morales

Saludos



méxico.sureste
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
FONT
Posted: Sun Dec 03, 2006 10:22 AM
William,

No. En principio el color es un atributo que no pertenece al font sino al hDC (device context):
#include "FiveWin.ch"

function Main()

   local oWnd, oFont

   DEFINE WINDOW oWnd
   
   DEFINE FONT oFont NAME "Verdana" SIZE 0, -20
   
   ACTIVATE WINDOW oWnd ;
      ON PAINT oWnd:Say( 2, 2, "Hello world!", CLR_HRED, CLR_WHITE, oFont )
   
   oFont:End()

return nil

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 1076
Joined: Fri Oct 07, 2005 10:41 PM
FONT
Posted: Mon Dec 04, 2006 02:19 AM
Antonio Linares wrote:William,

No. En principio el color es un atributo que no pertenece al font sino al hDC (device context):
#include "FiveWin.ch"

function Main()

   local oWnd, oFont

   DEFINE WINDOW oWnd
   
   DEFINE FONT oFont NAME "Verdana" SIZE 0, -20
   
   ACTIVATE WINDOW oWnd ;
      ON PAINT oWnd:Say( 2, 2, "Hello world!", CLR_HRED, CLR_WHITE, oFont )
   
   oFont:End()

return nil



Antonio,

Gracias antes que nada por la atención.

Estuve revisando y efectivamente, parece que lo que busco no es posible

Saludos
William, Morales

Saludos



méxico.sureste

Continue the discussion