Ach, trennen musst Du ja noch:
Delphi-Quellcode:
Procedure TForm1,TrenneJahrUndEreignis (text : String; Var jahr, ereignis : string);
Begin
...
jahr := ...
ereignis := ...
End;
Hier wird dir 'Pos' und 'Copy' weiterhelfen, und die Tatsache, das z.B. das Semikolon Jahr und Ereignis trennt.
Mehr Hilfe gibt es aber nicht
Also wenn schon liest man das nicht in eine unsichtbare Listbox ein und trennt dann mühevoll via Pos und Copy, sondern verwendet gleich zwei lokal deklarierte Stringlisten, wovon die eine zur Trennung der Werte der
CSV-Datei dient. Das Ergebnis kommt dann in ein entsprechendes Record-Array, so daß Jahr und dazugehörendes geschichtliches Ereignis stets durch dieselbe ID verbunden sind. Auf die ID kann man dann locker einen Zufallsgenertator ansetzen.