Hier ein weiterer Vorschlag...
Delphi-Quellcode:
procedure TForm.VSTMouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
if not assigned(VST.GetNodeAt(X, Y)) then begin
VST.ClearSelection;
VST.FocusedNode:=nil;
end;
end;