String schnell und einfach zerlegen?

[DiscMix]

Hallo,

ich habe einen String den ich zerlegen möchte.

BSP: O|1|Bezeichnung|Befehl|Pfad

wobei ich eben nicht weis wie lang die einzelnen "Abschnitte"
sein werden.

Ich dachte ich könnte das irgendwie mit eine Function machen,
mir fehlt aber der irgendwie der Ansatz.

In der Function wollte ich so etwas wie

repeat
inc(h)
until (s[h]='|') or (h >= Length(s));

s=Der String
h=Ein Zähler pro Buchstabe.

Wie kann ich die Function am besten so aufbauen, damit
ich diese für jeden "Abschnitt" benutzen kann?

Danke und Gruss aus Hamburg
Marco