Hi, erstmal danke für deine tolle Kollektion, hat mir echt geholfen!
Aber um die ComboBox mit den Schriftarten zu füllen würde ich diese kürzere Variante wählen:
ComboBox1.Items := Screen.Fonts;
Und zum Nutzen im RichEdit:
Rich.SelAttributes.Name:=Combobox1.Text;