Listbox: Inhalt formatierter Zeilen auf Variablen verteilen

[Tormentor32]

Sorry, aber ich habs grad ausprobiert in nem Mini-Pogramm, bei Random(2) kommt entweder 1 oder 0, ist ja auch logisch, denn er darf aus Zwei Sachen das Ergebnis wählen, in diesem Fall eins oder null! Wenn ich also Random(12) nehme, dann kriege ich Wert von 0 bis 11, denn das sind zwölf werte, weil die null ja auch einer ist

hat zwar nichts mit dem Thema zu tun...

[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));