[nicht-Profi] Datentyp auf bestimmte Weise darstellen

[Nelphin]

Ich bin durch zufall darauf gekommen das es für diesen Typ eine delphi komponente TGUID zu geben scheint.

zusätzlich habe ich diese Klasse gefunden: http://delphi.about.com/library/weekly/aa022205a.htm

jetzt habe ich meinen code umgebaut:

Delphi-Quellcode:

procedure TForm1.Button9Click(Sender: TObject);
var
MyGUID:TGuid;
fs: TFilestream;
MyGuidStr:string;
begin
fs:=TFilestream.Create(edit1.Text,fmopenread);

fs.Position:=89;
fs.Readbuffer(MyGUID,16);                 //leider bekomme ich jetzt hier einen fehler
MyGuidStr:=TGuidex.ToString(MyGuid);
Listbox1.items.add(MyGuidStr);

fs.free;
end;

bekomme aber einen

Zitat:

stream lesefehler

kann mir jemand weiterhelfen?