[RaDex]

Сообщение от Pilot_Red

Как вариант можно так.

if richedit1.SelAttributes.Style = [fsBold] then .....

(но если нужно без выделений... тогда хз)

Вот именно как-то без выделения например в таком коде:

for i:=0 to richedit1.Lines.Count-1 do
begin
если richedit1.Lines.Strings[i] написано жирным, то выполнить ...
end;