Listbox: Inhalt formatierter Zeilen auf Variablen verteilen

[Zacherl]

Mhh stimmt, aber Random(0) ergibt trotzdem 0 ... insofern müsste das -1 beim Random entfernt werden:

Delphi-Quellcode:

RandomStr := ListBox1.Items[Random(ListBox1.Items.Count)]; 
Spanisch := Copy(RandomStr, 1, pos(Char(VK_TAB), RandomStr)); 
Deutsch := Copy(RandomStr, pos(Char(VK_TAB), RandomStr) + 1, length(RandomStr));