Пишу компонент с прорадителем TTreeView. Необходимо сделать выделение заданного слова в элементах, например, жирным текстом. По идеи надо переписать метод который отрисовывает текс элементов. Вот роюсь никак не могу найти этот момент. Может кто нить поможет? Спасибо

Здравствуйте, el_serpiente, Вы писали:

_>Пишу компонент с прорадителем TTreeView. Необходимо сделать выделение заданного слова в элементах, например, жирным текстом. По идеи надо переписать метод который отрисовывает текс элементов. Вот роюсь никак не могу найти этот момент. Может кто нить поможет? Спасибо
Вот набросал пример:

procedure TForm1.TreeView1CustomDrawItem(Sender: TCustomTreeView;
  Node: TTreeNode; State: TCustomDrawState; var DefaultDraw: Boolean);
var
    R : TRect;
begin
  DefaultDraw := Node.Data=0;
  if not DefaultDraw then
   begin
   R := Node.DisplayRect(false);
   Sender.Canvas.Font.Style:=[fsBold];
   Sender.Canvas.TextOut(r.Left,r.Top,Node.Text);
   end;
end;

Устанавливай в узлах где жирный шрифт Data=1 и 0 для стандартного отображения.