Fehlermeldung bei AssignFile

[MSerror]

Ich benutze Delphi 2010 Pro.
Das Problem mit AssignFile und Reset gibt es auf allen Windows 7 x64 Distributionen.

Hier ein Stück Code:

Delphi-Quellcode:

type
    myfile = RECORD
             name    : string[100];
             email   : string[40];
             end;
var
   meinedatei  : File Of myfile;

begin
    if FileExists('myfile.dat') then
    begin
      AssignFile(meinedatei,'myfile.dat');
 {$I-}
      Reset(meinedatei);
 {$I+}
      if IOResult <> 0 then
         ShowMessage('Problem beim Lesen von myfile.dat! Fehler: ' + IntToStr(IOResult));
      CloseFile(meinedatei);
    end;
end.

Reset bricht ab, IOResult liefert "0" als Funktionsergebnis und zeigt trotzdem die Message "Problem beim Lesen..".
Wenn ich allerdings den gleichen Code mit dem alten Delphi 3 Client/Server Compiler ausführbar mache, dann läuft es problemlos
auf allen Windows Varianten egal ob es ein 32- oder 64-Bit Betriebssystem ist.

Hat jemand eine Idee?