Hier noch mal der Delphi anfänger
Auschnitt 1)
Delphi-Quellcode:
st_woerter := tstringlist.create;
st_woerter2 := tstringlist.create;
setlength(a_speicher, 2);
st_woerter.CommaText := Memo1.text;
s_test := st_woerter.CommaText;
Uschnitt 2)
Delphi-Quellcode:
for a := 0 to st_woerter.Count - 1 do
begin
I := 0;
I := st_woerter2.IndexOf(st_woerter[a]);
showmessage(inttostr(I));
if I < 0 then
begin
index := st_woerter2.AddObject(s_test, TObject(I));
I := integer(st_woerter2.Objects[index]);
inc(I);
st_woerter2.Objects[index] := TObject(I);
end;
end;
Memo2.text := st_woerter2.text;
For schleife weil er ja jedes einzelnes Abgespeichertes Wort kontrollieren soll.
Sonst ist das die gleiche, andere Variablen ok, syntax wie von @DeddyH: ;
nun fällt mir hier aber ja die zähl variable als auch speichert er jedes wort in der stringlist 2 ?!
bitte um Fehler meldung.
( am besten erstmal nur hinweise, fehler suche hilft beim Lernen
)