FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour ::bfont de la clase TWbrowse de HDC
Posts: 1088
Joined: Fri Oct 07, 2005 03:33 PM
::bfont de la clase TWbrowse de HDC
Posted: Thu May 03, 2007 08:34 PM

Holas,

no se si estoy mal pero creo que no esta implementado la parte de la DATA bfont de la classe twbrowse de HDC, o es que tengo una version antigua.

definiendi bfont supuestamente tendriamos la posibilidad de definr un tipo de font para cada parte del browse, pero probando y viendo el codigo creo que no esta implementado.

Alguien lo tiene implementado?

saludos

Marcelo

Posts: 366
Joined: Wed Aug 30, 2006 05:25 PM
::bfont de la clase TWbrowse de HDC
Posted: Thu May 03, 2007 09:18 PM

Marcelo:

Si usas la clase publicada en el foro por Antonio
te debe funcionar.

oLbx:bFont := {|nRow,nCol,nStyleLine| ;
IIF( nStyleLine = 0 , oFont1:hFont,;
IIF( nStyleLine = 3 , oFont2:hFont , ;
IIF( nStyleLine = 2 , oFont2:hFont , ;
IIF( nStyleLine = 4 , oFont1:hFont , ;
IIF( nStyleLine = 1 , oFont2:hFont , ) ) ) ))}

Saludos.

Ruben Fernandez

Gracias y Saludos

Ruben Fernandez - Uruguay

FWH 11.06, Harbour, Borland 5.82
Posts: 1088
Joined: Fri Oct 07, 2005 03:33 PM
::bfont de la clase TWbrowse de HDC
Posted: Fri May 04, 2007 12:30 PM
Ruben,

ya la consegui y creo que esta mejor, creo que le meti mucha mano a la que tengo.

gracias y saludos

Marcelo


Ruben Fernandez wrote:Marcelo:

Si usas la clase publicada en el foro por Antonio
te debe funcionar.

oLbx:bFont := {|nRow,nCol,nStyleLine| ;
IIF( nStyleLine = 0 , oFont1:hFont,;
IIF( nStyleLine = 3 , oFont2:hFont , ;
IIF( nStyleLine = 2 , oFont2:hFont , ;
IIF( nStyleLine = 4 , oFont1:hFont , ;
IIF( nStyleLine = 1 , oFont2:hFont , ) ) ) ))}

Saludos.

Ruben Fernandez
Posts: 845
Joined: Sun Oct 09, 2005 05:36 PM
::bfont de la clase TWbrowse de HDC
Posted: Fri May 04, 2007 01:55 PM

marcelo,

lo uso sin problemas en los encabezados, si lo quieres usar dentro del browse no hay problema, nomas elige el nStyleLine correcto,
1=encabezados
2=browse
3=footers

oBDep:bFont := {|nRow,nCol,nStyleLine| ;
IF(nStyleLine==1 .AND. nCol==1,oFnt:hFont,) }

salu2
paco

____________________

Paco

Continue the discussion