Fokusverlust beim Editieren eines VirtualStringTrees

[sh17]

und am besten noch

Delphi-Quellcode:

OnFocusChanged(
  Sender: TBaseVirtualTree; Node: PVirtualNode; Column: TColumnIndex);
begin
  if Assigned(Node) then
  if not (tsIncrementalSearching in Sender.TreeStates) then
  begin
    Sender.EditNode(Node, Column);
  end;
end;