topic-27083

Board index FiveWin para Harbour/xHarbour RbBtn - No aplica Font

Posts: 1380

Joined: Fri Oct 14, 2005 01:28 PM

RbBtn - No aplica Font
Posted: Wed Aug 28, 2013 01:11 AM

Estimados;
Tengo el siguiente Dialog:

   // Dialogo
   ::SetCSFont()
   DEFINE DIALOG oDlg RESOURCE "dlg_Articulos" OF oW0 FONT ::hFont["Tahoma14"]
   oDlg:lHelpIcon:= FALSE
   
   ...

   REDEFINE RBBTN PROMPT "Filtra"+CRLF+"por Rubro" ID 330 OF oDlg ;
            BITMAP  "bmp_FilRub" TOP ROUND ;
            FONT    ::hFont["Calibri11"] ;
            ACTION  ""

Al ejecutarse todo se muestra con el Font declarado en el Dialog
Cual es la solución?
Uso FWH 12.04

gracias

Resistencia - "Ciudad de las Esculturas"

Chaco - Argentina

Antonio Linares

Posts: 44158

Joined: Thu Oct 06, 2005 05:47 PM

Re: RbBtn - No aplica Font
Posted: Mon Sep 09, 2013 12:48 PM

Mario,

En el método Redefine() de la Clase TRBtn no se estaba asignando el font:

Code (fw): Select all Collapse

METHOD Redefine( ... ) CLASS TRBtn

   ...
   if ! Empty( oFont )
      ::SetFont( oFont )
   endif
   ...

regards, saludos

Antonio Linares
www.fivetechsoft.com

MarioG

Posts: 1380

Joined: Fri Oct 14, 2005 01:28 PM

Re: RbBtn - No aplica Font
Posted: Mon Sep 09, 2013 01:12 PM

muchas gracias!

Resistencia - "Ciudad de las Esculturas"

Chaco - Argentina

FiveTech Support Forums

Continue the discussion