font tachado

[Francisco Sanchez]

con ms sans serif en un browse como que no lo toma y puse :lStrickeOut - me
parece que era asi - a .T. pero ni caso.
Un saludo

[Francisco Sanchez]

Hice lo siguiente en el evento ondrawRow :
WITH OBJECT oSender
If ( cAlias )->valor == 1
:lParentFont := .f.
:oFont := ::oFontNueva
Else
:oFont := NIL
:lParentFont := .T.
Endif
END WITH
siendo ofontnueva :
WITH OBJECT ::oFontNueva := TFont():New()
:cName := "MS SANS SERIF"
:nSize := 8
:lStrikeOut := .T.
END WITH
Pero ni caso
Un saludo

[ignacio]

Francisco,
Se ha modificado la clase para que puedas cambiar el font a través de su HDC
en el evento OnDrawRow. Algo así:
SelectObject( hDC, oMyFont:Handle )
Ahora el font se establece antes del evento y por lo tanto puedes cambiarlo
tu sin problemas.
Un saludo,
"Francisco Sanchez" <francisco@softwaretotal.biz> escribió en el mensaje
news:43b6df15$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
> Hice lo siguiente en el evento ondrawRow :
>
> WITH OBJECT oSender
> If ( cAlias )->valor == 1
> :lParentFont := .f.
> :oFont := ::oFontNueva
> Else
> :oFont := NIL
> :lParentFont := .T.
> Endif
> END WITH
>
> siendo ofontnueva :
>
> WITH OBJECT ::oFontNueva := TFont():New()
> :cName := "MS SANS SERIF"
> :nSize := 8
> :lStrikeOut := .T.
> END WITH
>
> Pero ni caso
>
> Un saludo
>

[Francisco Sanchez]

Ok perfecto entonces, je ahora solo falta que me paseis la clase.
Un saludo

[ignacio]

Francisco,
Actualmente estamos trabajando con la últimisima versión de xHarbour, de
hace pocos días, que no es compatible con versión que usas con la PR6, por
lo tanto no te puedo mandar el módulo compilado.
Esperamos poder preparar una nueva version esta misma semana que
temporalmente sólo estará disponible para los usuarios registrados. En
nuestras pruebas va bastante bien y se la ve estable, pero debido a la gran
cantidad de cambios que se han hecho en xHarbour queremos ir con pies de
plomo.
Un saludo,
"Francisco Sanchez" <francisco@softwaretotal.biz> escribió en el mensaje
news:[email=43bae6ea@ozsrvnegro.ozlan.local...]43bae6ea@ozsrvnegro.ozlan.local...[/email]
> Ok perfecto entonces, je ahora solo falta que me paseis la clase.
>
> Un saludo
>

[Francisco Sanchez]

Perfecto, muchisimas gracias ignacio por todo.
Un saludo