Trenn doch einfach deinen String auf (an den Leerzeichen), nun hast du die einzelnen Teile in einen schönem Array, jetzt entferne das letzte Zeichen beim Nachnamen (ist ja das Komma) und fertig.
Split-Funtkion
Oder so:
Delphi-Quellcode:
S := '[NACHNAME], [VORNAME] [LOGINTIME] [URLAUB BIS] [KRANK BIS]';
i := Pos(', ', S);
i2 := PosEx(' ', S, i + 2);
Nachname := Copy(S, 1, i - 1);
Vorname := Copy(S, i + 2, i2 - i - 2);
(Angaben ohne Waffe)