Something like this should work with all widgetsets:

  for i := 0 to Pred(Screen.Fonts.Count) do
    ComboBox1.Items.Add(Screen.Fonts[i]);

Because of the large number of fonts available on OS X, you might want to use a 
TListBox instead of a TComboBox.

Thanks.

-Phil


-----Original Message-----
From: Dominique Louis [mailto:[EMAIL PROTECTED]
Sent: Sun 10/14/2007 2:02 PM
To: [email protected]
Subject: [lazarus] Enumerating Fonts on Mac OS X...
 
Hi all,
   What is the easier way to get the list of Fonts currently installed 
on a Mac OS X system. I'd like to populate a Combobox with the Fonts 
currently installed on the system.

Dominique.

_________________________________________________________________
     To unsubscribe: mail [EMAIL PROTECTED] with
                "unsubscribe" as the Subject
   archives at http://www.lazarus.freepascal.org/mailarchives

<<winmail.dat>>

Reply via email to