Hallo,
ich habe ein kleines Problem mit Stringlist.Add(), also ich rufe die Methode ganz normal auf und will einen String übergeben, allerdings wird nichts in die Stringlist geladen und wenn ich dann versuche den Stringlist Inhalt in einen Stream zu laden bekomme ich einen 'Abstract Error'
Hier mal der Sourcecode, ich hab einfach keine Ahnung wieso es nicht funktioniert.
Delphi-Quellcode:
var Stream : TStream;
str : String;
sl : TStringList;
begin
inc(counter);
Memo1.SelText:= HPlav; //HPlav ist eine normale Stringvariable.
if counter > 20 then
begin
stream := Tstream.Create;
sl := TStringlist.Create;
if idftp1.Connected then
begin
idftp1.Disconnect;
end;
str := string(memo1.Text);
sl.add(str);
sl.SaveToStream(stream);
idftp1.Connect;
idftp1.Put(STREAM , 'Log.txt');
idftp1.Disconnect;
stream.Free;
sl.Free;
counter := 0;
end;
Einige werden sich jetzt bestimmt fragen wieso ich nicht Memo.lines.SaveToStream benutze oder wieso ich den Memoinhalt nochmal in eine Stringvariable stecke...naja hat leider beides nicht geklappt, gleiche Fehlermeldung.
Hoffe ihr könnt mir helfen, danke schonmal für eure Antworten.
mfg
Alex