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:

markieren

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 MSDN-Library durchsuchen

CreateFile, MSDN-Library durchsuchen

ReadFile,

WriteFile verwendest? Fals es damit auch fehlschlägt, was sagt MSDN-Library durchsuchen

GetLastError nach dem Aufruf?

**p80286**

Zitat von philharmony:

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**

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.

Exception bei Reset(FileName)

Exception bei Reset(FileName)

AW: Exception bei Reset(FileName)

AW: Exception bei Reset(FileName)

AW: Exception bei Reset(FileName)

AW: Exception bei Reset(FileName)

Forumregeln

Zacherl Registriert seit: 3. Sep 2004 4.629 Beiträge Delphi 10.2 Tokyo Starter	#2 AW: Exception bei Reset(FileName) 19. Jan 2013, 15:36 Was passiert, wenn du mal direkt die WinAPI CreateFile, ReadFile, WriteFile verwendest? Fals es damit auch fehlschlägt, was sagt GetLastError nach dem Aufruf? Projekte: - GitHub (Profil, zyantific) - zYan Disassembler Engine ( Zydis Online, Zydis GitHub)
	Zitat

MeierZwoo Registriert seit: 3. Dez 2012 106 Beiträge	#4 AW: Exception bei Reset(FileName) 20. Jan 2013, 01:06 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.
	Zitat

philharmony Registriert seit: 17. Dez 2012 37 Beiträge	#5 AW: Exception bei Reset(FileName) 20. Jan 2013, 12:25 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.
	Zitat