Mit POS mehrere Kommata ausfindig machen

[Wagwan]

Hi Leute,

ich habe eine Art Vokabletrainer Programmiert. Jede Frage, Antwort, usw ist in dem Objekt TEST gespeichert. Allerdings gibts es einige Antworten, die aus mehreren Teilaspekten bestehen. In diesem Fall ist TEST.Antwort='Aspekt1, Aspekt2, usw'.
Ich möchte nun mittels copy and pos die Aspekte einzeln in ein Memo ausgeben. Das Problem ist, dass der POS-Befehl immer nur das erste Komma findet.
Nun suche ich eine Möglichkeit auch die anderen Kommata mittels POS zu erfassen.

Ich bin für jede Hilfe dankbar!

[MathiasSimmack]

[cl]"explode"[/cl] dürfte sein was du suchst. :)

[Tryer]

Geht auch einfacher:

Delphi-Quellcode:

Memo1.Lines.CommaText := Test.Antwort;

:)

MfG,
Tryer

[Hansa]

copy und delete dürfte sein, was du suchst. So würd ichs machen :

Aspekt1 := Copy (st,1,pos (',');
delete (st,pos(',');
Aspekt2 := Copy (st,1,pos (',');
delete (st,pos(',');

ähmm, so ungefähr jedenfalls. 8)