Want to protect your cyber security and still get fast solutions? Ask a secure question today.Go Premium

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 276
  • Last Modified:

Fonts

Hi,

A quick question. How can i get the list of all installed fonts on a machine into a listbox. Thanks
0
Prototype_T-104
Asked:
Prototype_T-104
  • 5
  • 2
1 Solution
 
Slick812Commented:
ListBox1.Clear;
ListBox1.Items := Screen.Fonts;
0
 
Slick812Commented:
this is more better
ListBox1.Items.Assign(Screen.Fonts);
0
 
Prototype_T-104Author Commented:
Thanks alot,but just one more question. How to apply the selected font to a Memo...it would be inpossible to go like If ListBox1.ItemInedx = 1.... and so on, is there a quicker way?! Thanks alot Slick812!!
0
Concerto Cloud for Software Providers & ISVs

Can Concerto Cloud Services help you focus on evolving your application offerings, while delivering the best cloud experience to your customers? From DevOps to revenue models and customer support, the answer is yes!

Learn how Concerto can help you.

 
Slick812Commented:
OK, I have not tested this but

Memo1.Font.Name := ListBox1.Items[ListBox1.ItemInedx];
0
 
Slick812Commented:
Memo1.Font.Name := ListBox1.Items[ListBox1.ItemIndex];
0
 
Prototype_T-104Author Commented:
Thanks Slick812 you halped me very very much. Thank you!!
0
 
Slick812Commented:
you are very welcome
good luck with your project
0

Featured Post

Upgrade your Question Security!

Your question, your audience. Choose who sees your identity—and your question—with question security.

  • 5
  • 2
Tackle projects and never again get stuck behind a technical roadblock.
Join Now