Как отобразить список шрифтов

[Александр80]

Как в ComboBox отобразит список шрифтов установленных в системе. А может для этого надо что-то другое подскажите пожалуйста, как это далается.

Заранее спасибо...

[Nord777]

Dim FF As System.Drawing.FontFamily
Dim IFC As New System.Drawing.Text.InstalledFontCollection

For Each FF In IFC.Families
ComboBox1.Items.Add(FF.Name())
Next

[Александр80]

Nord777 - Спасибо, ты настоящий друг.....