Systemschriftarten mit Delphi finden

Was ist der beste Weg, um alle verfügbaren Systemschriftarten zu finden, damit sie in einem Dropdown-Auswahlfeld angezeigt werden können? Ich möchte auch zwischen Unicode- und Nicht-Unicode-Schriftarten unterscheiden. Ich verwende Delphi 2009, ...