TFTP Server mit idTrivialFTPServer sendet keine Daten

[Alex.P]

Hallo,

ich habe ein Problem mit der Indy Komponente idTrivialFTPServer unter Delphi 2009.

Es soll einen TFTP Server aufgesetzt werden mit dem an den Linux Bootloader U-Boot bestimmte Files geschickt werden können.

Der TFTP Server läuft, das Terminal schickt eine Anfrage.
Die Methode IdTrivialFTPServer1ReadFile wird aufgerufen.
Die Datei existiert und es wird ein Stream erzeugt und zurück gegeben

Delphi-Quellcode:

TFTPFileStream1 := TFileStream.Create( TFTPPath+Filename, fmOpenRead OR fmShareDenyWrite );
AStream := TFTPFileStream1;
GrantAccess := True;

Das Terminal empfängt ein Zeichen,
Übertragung ist angeblich erfolgreich beendet.

Kein Fehler aber die Datei wurde nicht gesendet...

Wenn ich mich einem TFTP Client eine Datei anfordere wird die Datei mit 0kb angelegt.