[Winny]

Ты имеешь ввиду RichEdit? Если да, то кинь на форму FontDialog и RichEdit. И вот код:

Код:

FontDialog1.Font := RichEdit1.Font; 
if FontDialog1.Execute then 
RichEdit1.SelAttributes.Assign(FontDialog1.Font);