TVarBytesField - Wie schreibt/liest man die Bytes

[schlock]

Hallo,
ich hab folgendes warscheinlich einfache Problem. Ich möchte eine Datei die binäre Daten enthält in ein TVarBytesField schreiben. Dazu lese ich die Datei in einen FileStream und habe somit Zugriff auf die einzelnen Bytes.

Delphi-Quellcode:

  binSource:= TFileStream.Create('Data.bin', fmOpenRead);

Um jetzt den Inhalt des Streams ins VarBytesField zu bekommen muss ich die die Methode SetData benutzen. Die will aber einen Pointer haben und ich komm einfach nicht drauf worauf der zeigen soll.
Also bin ich etwa so weit:

Delphi-Quellcode:

var
  varBytes: TVarBytesField;

?? ptr : Pointer; ???

begin
  varBytes:= TVarBytesField.Create(Self);

  varBytes.SetData( ptr ); // Was muss ptr referenzieren ??
end;

Hat jemand eine Idee ...