Exception bei Reset(FileName)

[philharmony]

Hallo
Ich möchte Daten aus einer Textdatei laden. Ich hole mir den Dateipfad aus einem OpenDialog und möchte die Datei dann öffnen.
Das ganze mache ich ganz normal mit:

Delphi-Quellcode:

FCurrentFile : TextFile;
SourceFileName : String
...
AssignFile(FCurrentFile, SourceFileName);
Reset(FCurrentFile); 
tuwasdamit       
CloseFile(FCurrentFile);

Die Datei wurde zuvor schonmal auf dem selben Wege gespeichert. Und jetzt spuckt mir der Compiler bei Reset(FCurrentFile) eine Exception vom Typ:
External : SIGSEGV bei Adresse 403244
aus. DIe Datei ist nicht schreibgeschützt und nicht anderweitig geöffnet.
Was kann ich tun?

[Zacherl]

Was passiert, wenn du mal direkt die WinAPI CreateFile, ReadFile, WriteFile verwendest? Fals es damit auch fehlschlägt, was sagt GetLastError nach dem Aufruf?

[p80286]

Zitat:

Zitat von philharmony (Beitrag 1199685)

Die Datei wurde zuvor schonmal auf dem selben Wege gespeichert.

Ich denke nicht, daß Du auf diesem Wege Daten gespeichert hast.

Sind da vielleicht dyn. Arrays oder Pointer im Spiel. Hast Du Bereichsprüfung & Co. aktiviert?

Gruß
K-H

[MeierZwoo]

Normalerweise kapselt man ein reset/rewrite/append nach den AssignFile in {$I-} und {$I+} und fragt das IOResult=0 bzw. <>0 ab.

Aber SIGSEGV = Illegal storage access tritt auch bei einem I/O-Error nicht auf. Das SIGSEGV zeigt wohl ehr, daß der PfadName ungültig ist und ins Nirwana schreibt.

[philharmony]

:wall:
Oh man bin ich blöd!
FCurrentFile : TextFile; ist Teil einer Klasse von der ich genau wie viele Instanzen erzeugt habe?
Richtig, die Zeile OpenFile := TOpenFile.create hat gefehlt.