Listboxeintrag eine Position nach oben oder unten?

[mlspider]

Hallo,

versuche mit:

Delphi-Quellcode:

procedure TForm1.Button5Click(Sender: TObject);
begin
 ListBox1.Selected[ListBox1.ItemIndex -1];
end;

einen selektierten Eintrag in der Listbox um eine Position nach oben zu verschieben. Funktioniert aber nicht.