Autor Beitrag
aggroaliarne
Hält's aus hier
Beiträge: 1



BeitragVerfasst: Mo 23.02.09 10:40 
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:
ausblenden 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 user profile iconGausi: Quote- durch Delphi-Tags ersetzt
Xentar
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 2077
Erhaltene Danke: 2

Win XP
Delphi 5 Ent., Delphi 2007 Prof
BeitragVerfasst: Mo 23.02.09 11:05 
1. Die TStringList "result" wird nicht erzeugt. Besser wäre es, du erzeugst die in der aufrufenden Prozedur, und übergibst diese als Parameter.
2. Die TStringList hat schon eine Funktion "CommaText", musst das also nicht slber schreiben ;)

_________________
PROGRAMMER: A device for converting coffee into software.