если любишь трудности то вот тебе небольшой кусочек кода:
mem.SelStart:=Position+Counter-1;
mem.SelLength:=Length(_Text_TextCopy(Dictionary, '@', Index));
mem.selattributes.style := [fsbold];
mem.selattributes.Color := clBlue;
суть:
находим кусочек текста который хотим подстветить и применяем ему новый стиль - в данном случае жирный и синий.
|