FONT

[wmormar]

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

[Antonio Linares]

William,

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

Code: Select all  Expand view  RUN

#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   


[wmormar]

William,

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

Code: Select all  Expand view  RUN

#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