Форматирование текста в Delphi

[Кириллл]

Изменил суть вопроса:
использую ListView , вешаю обработчик на OnCustomDrawItem.
Пишу внутри Sender.Canvas.Font.Style := Canvas.Font.Style + [fsBold]; и у меня всё становится жирным. А мне надо что бы жирным становился только тот caption который я редактирую.
Подскажите как это сделать ?

[mrandrey]

В переменной хранится только текст, а отображаться он будет таким, какие настройки шрифта для компонента или формы, если компонент поддерживает форматирование то оно стандартное(смотри в демке к TRichedit), а если сам будешь выводить на канву, тогда придумай чтото сам.
Например:


{B$текст$B} - все что между {B$ и $B} жирное
{U$текст$U} - все что между {U$ и $U} подчеркнутое
{L$текст$L} - все что между {L$ и $L} наклонное и т.д.

[JTG]

В OnCustomDrawItem по идее должен быть параметр index, делай проверку:

If index=1 {1й элемент} then Sender.Canvas.Font.Style := Canvas.Font.Style + [fsBold]

[mrandrey]

попробуй так

if cdsSelected in state then
Sender.Canvas.Font.Style := Canvas.Font.Style + [fsBold]
else
Sender.Canvas.Font.Style := Canvas.Font.Style ;

смотри TCustomDrawState может найдешь чтото лучше чем cdsSelected?