listar fuentes instaladas
Publicado por ptorres (1 intervención) el 21/02/2021 20:28:28
Hola, desde vb.net intento listarlas y lo único que encuentro es esto, pero esto en vb.net ya no funciona.
-------- otra opción es esta, pero ahí no tengo el nombre de la fuente que es lo que busco -------------
Alguien sabe como hacerlo? gracias
1
2
3
4
Dim i_Font As Integer
For i_Font = 0 To Screen.FontCount - 1
List1.AddItem Screen.Fonts(i_Font)
Next
-------- otra opción es esta, pero ahí no tengo el nombre de la fuente que es lo que busco -------------
1
2
3
4
Dim RegKey = "Software\\Microsoft\\Windows NT\\CurrentVersion\\Fonts"
Dim Fuentes = From aif In My.Computer.Registry.LocalMachine.OpenSubKey(RegKey).GetValueNames
Select My.Computer.Registry.LocalMachine.OpenSubKey(RegKey).GetValue(aif)
ComboBox1.Items.AddRange(Fuentes.ToArray)
Alguien sabe como hacerlo? gracias
Valora esta pregunta
0
