---

Hej

Hvordan kan jeg liste alle de font typer som er på brugerens maskine, samt størrelserne på disse?

Doc

---

Følgende lille stump kode fylder en Listbox med alle installerede fonte :

Com_Font.Clear

For i = 0 To Screen.FontCount - 1
Com_Font.AddItem Screen.Fonts(i)
Next i

---

Følgende lille stump kode fylder en Listbox med alle installerede fonte :

Com_Font.Clear

For i = 0 To Screen.FontCount - 1
Com_Font.AddItem Screen.Fonts(i)
Next i

---

...og så var der lige det med størrelserne...jeg tror ikke du kan "se" nogle forventede fontstørrelser...du kan jo bare lave en listbox med standardstørrelser : 8,9,10,12, 14, 16 osv.
En TrueType-font vil altid tilpasse sig den fontstørrelse du sætter...

---

doc skrev:
> Hej
>
> Hvordan kan jeg liste alle de font typer som er på brugerens maskine,
> samt størrelserne på disse?

Du kan i hvert fald liste alle skrifttyperne meget nemt:

'Placer en ListBox på en form og skriv følgende kode:
Private Sub Form_Load()
List1.Sorted = True 'Hvis de skal vises sorteret
For i = 0 To Screen.FontCount - 1
List1.AddItem Screen.Fonts(i)
Next i
End Sub

.... men hvis du skal bruge det til valg af skrifttype kan du ligeså godt
bruge Common-Dialog-controllen.

- Bjarke Walling Petersen

---

Tak Pete.

Eftersom du ikke er logget ind i systemet, kan du ikke skrive et indlæg til dette spørgsmål.

Hvis du ikke allerede er registreret, kan du gratis blive medlem, ved at trykke på "Bliv medlem" ude i menuen.