Wenn auch keine wirkliche Lösung, hab ich zumindest einen Workaround in dem ich mir den Index merke, ihn auf -1 setze, den Node verschiebe und ihn dann wieder setze:
Delphi-Quellcode:
procedure TForm1.Button3Click(Sender: TObject);
var oldStateIndex:integer;
begin
oldStateIndex:=child.StateIndex;
child.StateIndex:=-1;
child.MoveTo(par,naAddChild);
child.StateIndex:=oldStateIndex;
end;
(Verständnisfrage zum Forum: Soll ich das als erledigt markieren?)