Meine Drag'n'Drop-Funktion ergänzen

[DeddyH]

Trotzdem finde ich solchen Code etwas optimistisch:

Zitat:

Delphi-Quellcode:

List2:=Explode('<>', List[i]);
    ListBox1.Items.Insert(i, List2[1]);
    ListBox2.Items.Insert(i, List2[2]);
    ListBox3.Items.Insert(i, List2[3]);
    ListBox4.Items.Insert(i, List2[4]);
    List2.Free;

Du solltest nach dem Explode zumindest überprüfen, ob überhaupt mehr als 4 Elemente in der Liste stehen, das war vermutlich auch der Grund für den Fehler.

[edit] [/edit]