Hallo,
ich möchte das in meinen TreeView beim select auf dem ersten Node , dieser fett markiert wird.
Das tut es auch, nur leider scheint der Focus nicht zu wissen wie lang der neue Text ist, es wird nur die alte Länge focusiert.
Wie kann ich das ändern?
Delphi-Quellcode:
procedure TMainFrm.Book_TVCustomDrawItem(Sender: TCustomTreeView;
Node: TTreeNode; State: TCustomDrawState; var DefaultDraw: Boolean);
begin
if Node.Level = 1 then
Sender.Canvas.Font.Size := Sender.Canvas.Font.Size - 2;
if Node.Level = 0 then
if cdsFocused in State then begin
Sender.Canvas.Font.Style := Sender.Canvas.Font.Style + [fsBold];
end;
end;