Dateninhalt als TFileStream nach TStream kopieren?

[Schucki]

Ich habe eine Frage an die Profies hier,

gearbeitet habe ich mit sowas noch nie

ich muß an eine Funktion Daten in einen TStream übergeben mein Problem ist, das die Daten auf der Festplatte vorliegen und ich sie aus einer Datei laden muß.

Doch wie zum bekomme ich die Daten nun in einen TStream?

Delphi-Quellcode:

fileStream:TFileStream;
    Stream:TStream;

fileStream:=Create('c:\in.bin',fmOpenRead);
Stream:=TStream.Create;

try

...umkopieren?...

finally
fileStream.Free;
Stream.Free;
end;

Für jeden Tip dankbar!!!
Frank