Kann fast nicht sein ...
Die Tokenize-Funktion arbeitet korrekt, und deine While-Schleife zum Füllen des Arrays eigentlich auch (abgesehen davon, dass du dir count oder i sparen könntest - aber das ist egal).
Bist du sicher, dass deine "Inhaltsprüfung" korrekt ist? Eigentlich sollte dein test3-Array korrekt gefüllt sein.
Belege doch dein String test mal händisch mit '123#456#789#abc#def' oder was weiss ich was. Also ohne den Umweg über
Delphi-Quellcode:
listitem:= ssl_anzeige.Selected;
test:=listitem.Subitems.GetText;
Das müsste - wie gesagt - funktionieren.