FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour 驴Lista de fuentes instaladas? (solucionado)
Posts: 728
Joined: Fri Oct 07, 2005 07:38 AM
驴Lista de fuentes instaladas? (solucionado)
Posted: Thu Feb 05, 2015 11:38 AM

Hola amigos, 驴c贸mo puedo obtener un listado de todas las fuentes instaladas en el sistema?
Mi intenci贸n es cargarlas en un array. Estoy usando la funci贸n Choosefont actualmente pero requiero implementarlo en un di谩logo integrado en la aplicaci贸n.
Gracias,

Angel Salom
Visionwin Software - https://www.visionwin.com
------------------------------------------------------------
fwh 19.05 - harbour 3.2 - bcc 7.4
Posts: 6755
Joined: Wed Feb 15, 2012 08:25 PM
Re: 驴Lista de fuentes instaladas?
Posted: Thu Feb 05, 2015 11:40 AM
Mira a ver

Code (fw): Select all Collapse
   if Empty( aFontNames := GetFontNames( hDC ) )
      MsgStop( "Error getting font names", "Stop!" )
      return ( aShowFonts )  //GetFontText( GetFonts() ) )
   else
      ASORT( aFontNames,,, { |x, y| UPPER( x ) < UPPER( y ) } )
   endif
Cristobal Navarro

Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noci贸n del tiempo

El secreto de la felicidad no est谩 en hacer lo que te gusta, sino en que te guste lo que haces
Posts: 728
Joined: Fri Oct 07, 2005 07:38 AM
Re: 驴Lista de fuentes instaladas?
Posted: Thu Feb 05, 2015 11:52 AM

Perfecto, en GetFontNames estaba la soluci贸n.
隆Gracias!

Angel Salom
Visionwin Software - https://www.visionwin.com
------------------------------------------------------------
fwh 19.05 - harbour 3.2 - bcc 7.4
Posts: 601
Joined: Wed Jul 04, 2007 03:51 PM
Re: 驴Lista de fuentes instaladas? (solucionado)
Posted: Thu Feb 05, 2015 07:38 PM

Una alternativa...

viewtopic.php?f=6t=26737p=148073#p148073
Saludos,

&&

Ojeda Esteban Eduardo.

Buenos Aires - Argentina.

FWH - PellesC - DBF/CDX - ADS - Gloriosos .Bat - MySql - C# .net - FastReport

Skype: jreduojeda

Continue the discussion