[Sharky]

привет всем кто читает это
вообщем вот что :
на моей форме есть RichEdit мне нужно что бы прога умела менять шрифт
у каждой буквы
вот что я накуралесил :
if FontDialog1.Execute Then
RichEdit1.Font := FontDialog1.Font;

[Winny]

Код:

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

[Winny]

В коде, который ты написал, ты присваиваешь шрифт FontDialog'а к RichEdit'у. То есть шрифт FontDialog'а присвоится всему RichEdit'у, а нужно чтобы присвоился только выделенному знаку или куску от текста, за это отвечает параметр SelAttributes, а у него есть подпараметр Assign, вот здесть то мы и преписываем выделенному куску текста шрифт FontDialog'а - (FontDialog1.Font). Вот и всё!