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?