Zahlen aus String auslesen

[Yheeky]

Hi,

wie bekomme ich denn alle Zahlen aus einem String, der wiefolgt aussieht:
"0,1,2,11,12"
Die anfänglichen kann ich ja noch mit Pos(',',[...]) rausfiltern, aber dann? Ich habe versucht den String danach rauszulöschen, dann kam es aber zu Problemen mit den 2-stelligen Zahlen. Kann ich nicht die Position jedes einzelnen Kommas herausbekommen?

Gruß Yheeky

[Luckie]

explode

[Yheeky]

Danke Luckie für die schnelle Antwort. Habe aber folgenden Fehler:
[Fehler] Unit1.pas(27): Undefinierter Bezeichner: 'TStringDynArray'

Gruß Yheeky

[Duffy]

Hallo Yheeky,
ich könnte noch String zerlegen - String pick to pieces bieten
bye

[Duffy]

Hallo Yheeky,

Delphi-Quellcode:

type
  TStringDynArray = array of string;

bye

[Yheeky]

Danke Duffy - das funktioniert! Das mit dem "Array Of Strings" habe ich auch gerade in dem Beispiel gefunden, die Variante StringPickToPieces reicht mit aber völlig aus.

Gruß Yheeky

[Snoop007]

Delphi-Quellcode:

var
  s : string;
  i : integer;
begin
  s := edit1.text;
  while length(s) > 0 do
  begin
    i := pos(',',s);
    if i = 0 then
      i := length(s) +1;
    Edit2.Text := Edit2.Text + copy(s,1,i-1) + '-';
    delete(s,1,i);
  end;

anstatt edit2 kannst du ein array o.ä. nehmen


edit : der bindestrich soll nur die trennung der zahlen verdeutlichen kann also entfernt werden