Hi an alle,
also ich hab Folgendes Problem ich habe einen String in den Wörter geladen wurden und zwar mehrere immer mit einem Komma abgetrennt also zB. ein,eine,eines,
Jez möchte ich aus diesem String die einzelnen Wörter rausladen und diese dann mit einer Eingabe vergleichen.
Wenn ich jez mit:
Delphi-Quelltext
1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12: 13: 14:
| function AusString(Wort: Sring):TStringList; var k, i: Integer; begin k := 0 for i := 0 to Length(Wort) do begin if Wort[i] = ',' then begin result.Add(copy(Wort,k,i-1)); k := i+1; end; end; end; |
die Wörter aus dem String rauslese und in ne TStringList schreibe, könnt ich se ja wieder auslesen, aber die funktion passt irg nich.
Was is da falsch?
Wie könnt ich des anders machen?
Moderiert von
Gausi: Quote- durch Delphi-Tags ersetzt