Ich verstehe nicht warum das nicht funktioniert -.-
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var Stream : TMemoryStream;
var S : TStringlist;
begin
Stream := TMemoryStream.Create;
Stream.Seek(0,soFromBeginning);
S := TStringlist.Create;
S.Add(GetUser); // bzw irgendein string... also es ist 100% kein Leerstring
S.SaveToStream(Stream);
IDFTP1.Put(Stream,'Probe.txt');
end;
die Datei wird auf dem Server angelegt aber sie ist leer -.-