[Delphi] RichEdit i zmiana zaznaczonego textu

Wszyscy piszą jak zmienić kolor tak:
RichEdit.SelAttributes.Color := clBlue

A jak zrobić żeby zaznaczony fragment textu zmienił kolor, rozmiar, styl itd. wybrane z FontDialog
???

Może tak:

if form1.FontDialog1.Execute then
begin
Richedit1.SelAttributes.Color:=Form1.FontDialog1.Font.Color;
// Potem ustaw Styl itd...
end;

:-)

Dzienki działa ale wystarczy:
[code]
FontDialog1.Execute;
Richedit1.SelAttributes.Color:=FontDialog1.Font.Color;
[/code]
ITD.
[diabel]

To if FontDialog1.Execute then jest potrzebne aby nie było numerów w stylu user kliknie na anuluj i mu się czcionka zmienia [diabel]