Indy FTP fileTransfer via Stream

[J Kadison]

Hallo!

Ich habe mal eine Frage zu der FTP-IndyKomponente.

Und zwar:

Ich möchte eine Datei auf meinem Server in eine TStringlist einlesen und umgekehrt von TStringlist auf den Server als Datei uploaden und zwar ohne Temporäre Dateien auf dem System.
Da dachte ich mir, die funktionen

Delphi-Quellcode:

procedure TIdFTP.Put(const ASource: TStream; const ADestFile: string = '';
 const AAppend: boolean = false);
procedure TIdFTP.Get(const ASourceFile: string; ADest: TStream; AResume: Boolean = false);

wären hier ganz hilfreich.

Aber wenn ich versuche das ganze herunter zu laden, dann bekomme ich einfach NICHTS zurück geliefert

Hier die Funktion:

Delphi-Quellcode:

var
    stream : TStream;
begin

    Result := TStringList.Create;

    try
        stream := TMemoryStream.Create;
        Server.Get(serverpath, stream);
        Result.LoadFromStream(stream);
        stream.Free;                      
    except
        Result.Text := 'ERROR';    
    end;

Wenn ich einen normalen TStream nehme, bekomme ich unschöne fehler: 'Meldung Abstrakter Fehler';
wie kann ich das denn machen, damit ich auch den inhalt der Textdatei auslesen kann?