LISTA DE FONTES DO WINDOWS

JONES7 04/10/2010 10:30:52
#354352

Olá! Gostaria de saber como posso selecionar as fontes do windows e colocá-las em uma combo, ou se já existe um componente para isso.

Obrigado!

MARCELO.TREZE 04/10/2010 10:41:03
#354354 Resposta escolhida

assim

Private Sub Form_Load()
    Dim i
          For i = 1 To Screen.FontCount - 1
        Combo1.AddItem Screen.Fonts(i)
    Next i
End Sub

JONES7 04/10/2010 10:53:36
#354356

Isso mesmo que eu queria!! Obrigado!

Tópico encerrado , respostas não são mais permitidas

Voltar