Listenitem verschieben

[CalganX]

Hi,
ich habe zwei Listen:
1. ListBox1.Items (TStrings);
2. FileList (TStringList);
In der ListBox stehen nur die Dateinamen, die aus den Pfaden in der FileList kommen (müssen somit immer gleich sein von den Positionen).

Nun habe ich noch einen SpinButton auf dem Form. Wenn auf "Up" geklickt wird, soll das aktuelle Item in beiden Listen eins aufwärts gebrachten werden ("Down" dem entsprechend andersrum).
Was tun?

Chris

[RomanK]

Bei ListBox1.Items (TStrings):
listbox1.Items.Move(listbox1.ItemIndex,listbox1.ItemIndex-1);// wenn es ganz oben ist ist es nachher ganz unten!!!! und bei
FileList (TStringList) mit :


filelist.Exchange(listbox1.ItemIndex,listbox1.ItemIndex-1); PS: Das hat mich nur einen kleinen Blick in die Hilfe gekostet

[CalganX]

Laüft einigermaßen. Das Problem: Es kommt immer ein Fehler "ListIndex out of bounds(-1)" Obwohl etwas makiert ist...

Chris