was steht den in EditListCount.Text?
wenn drin steht, dass wievielte node von oben es ist müsste das so gehen:
Delphi-Quellcode:
var
node : pvirtualnode;
begin
node := vst.GetFirst;
for i = 0 to strtoint(EditListCount.Text) do
begin
node := vst.GetNext(node);
end;
vst.focusednode := node;
VST.Selected[VST.FocusedNode] := True;
end;