Hallo allerseits !

was bedeutet "E/A Fehler 123" zur Laufzeit des Programmes ? Das Kompilieren läuft ohne Fehler durch, beim Ausführen stürzt das Proggi ab.

Code:

Delphi-Quelltext    ausgeblendet	markieren
1: 2: 3: 4: 5: 6: AssignFile(G, S); AssignFile(H, T); Reset(G); <- Hier ist der Fehler ! Rewrite(H); StrZ := ''; Writeln(H, 'Titel: ',

Dann noch eine dumme Frage: Wie markieren ich den Quellcode als solchen in den Beiträgen ?

Danke im Voraus für die Antworten !

Moderiert von Narses: Delphi-Tags hinzugefügt

www.delphi-forum.de/...ler+123_95549,0.html
Schau mal da... Es gibt viele solcher Fälle.

Moin!

Hochhaus hat folgendes geschrieben :

Dann noch eine dumme Frage: Wie markieren ich den Quellcode als solchen in den Beiträgen ?

Markiere den Quelltext und klicke auf das Pluszeichen neben dem "Delphi" oben im Editor. Du kannst die Delphi-Tags auch manuell setzen:

[delphi]begin
ShowMessage('Hello World!');
end;[/delphi]

wird zu:

Delphi-Quelltext    ausgeblendet	markieren
1: 2: 3: begin ShowMessage('Hello World!'); end;

cu
Narses

Niko S. hat folgendes geschrieben :

http://www.delphi-forum.de/topic_EA+Fehler+123_95549,0.html Schau mal da... Es gibt viele solcher Fälle.

Da ich den Grund für so einen Fall nicht finden kann, habe ich einfach zuoberst im Proggi ein {$I-} eingefügt. Jetzt funktioniert alles TipTop. Gruss, Hochhaus

Fehlerursache steht doch in der Fehlermeldung. Einfach mal nachschlagen, z.B. bei Microsoft unter "Windows Status Codes MSDN Library Error 123" und du findest die Lösung ...

Anyone who is capable of being elected president should on no account be allowed to do the job.
Ich code EdgeMonkey - In dubio pro Setting.

Oder einfach direkt in Delphi mit SysErrorMessage ausgeben lassen:

Delphi-Quelltext    ausgeblendet	markieren
1: ShowMessage(SysErrorMessage(123));

-->
bzw. besser natürlich mit dem letzten Fehler:

Delphi-Quelltext    ausgeblendet	markieren
1: ShowMessage(SysErrorMessage(GetLastError));

Zitat:

Niko S. hat folgendes geschrieben : www.delphi-forum.de/...ler+123_95549,0.html Schau mal da... Es gibt viele solcher Fälle. Da ich den Grund für so einen Fall nicht finden kann, habe ich einfach zuoberst im Proggi ein {$I-} eingefügt. Jetzt funktioniert alles TipTop. Gruss, Hochhaus

Das glaube ich nicht.
Das gleiche ist wenn der Feuerwehrmann die Alarmglocke abstellt und behaupte: das Feuer ist aus.
Schau noch mal in den Link.

Moderiert von Narses: Komplett-Zitat des letzten Beitrags entfernt.

Es ist in der Tat so, dass die Feuerwehr ausrückt ! Nur dummerweise wegen einem "Fehlalarm". Und wenn man den abstellt, ist alles ok.

Wenn ich einen echten Fehler in meinem Programm hätte, würde ich das an der Funktionsweise der Datei-Eingabe/Ausgabe sehr schnell realisieren. Irgendwo in meinen Dateien wäre dann der "Wurm" drin.

Gruss, Hochhaus

Hallo Hochhaus,

das dein Programm funktioniert halte ich durchaus für möglich.
Das dein Dateiname, Verzeichnisname usw. fehlerhaft ist solltest du schon mitbekommen haben,
daß dein Programm gegen den Willen des Betriebssystems trotzdem damit umgehen kann sollte dich nicht beruhigen.
Du hast die Fehlermeldung deaktiviert, was ist wenn nun ein anderer Fehler auftritt. Festplatte voll, Schreibfehler usw.
Dann bekommst du das nicht mit und wenn die Daten dann zum Teufel gegangen sich hast du eben Pech gehabt.
Du kannst machen was du willst, aber ich würde den Fehler(kein Fehlalarm) beseitigen und die Alarmsirene wieder anstellen.

Moderiert von Narses: Komplett-Zitat des letzten Beitrags entfernt.

Ok, ich versuche es. Der Fehler tritt nicht nur an der bewussten Stelle auf, sondern bei JEDEM "Reset(F)" im ganzen Programm. Mal ist die Fehlernummer "E/A Fehler 123", Mal "EA-Fehler 32" usw. usw. Bei der Vergabe der Fehlernummer regiert der Zufall... ...

Ein guter Entschluß!

Übrigens glaube ich hier nicht an Zufälle.
Beherzige den Tip von Jaenicke (weiter oben). Da hast du die Fehlebeschreibung im Klartext.
Deine Nr. 32 paßt zum Thema, du versucht die Datei zu öffnen obwohl sie schon geöffnet ist.

viel Erfolg

Moderiert von Narses: Komplett-Zitat des letzten Beitrags entfernt.

Ich habe den Fehler gefunden: Eine Anweisung "ChDir(S)" in ein Unterverzeichnis, das nicht existiert, war der Grund. Dummerweise kommt bei dieser Anweisung keine Fehlermeldung (!), sondern erst später, wo ich versuche, in diesem Verzeichnis eine Datei zu öffnen. Es wäre oft sehr hilfreich, wenn der Fehler in der richtigen Zeile auftritt, und nicht 100 Programmzeilen weiter unten, wo man ihn nicht sucht.

Gruss,


Hochhaus

Hochhaus hat folgendes geschrieben :

Es wäre oft sehr hilfreich, wenn der Fehler in der richtigen Zeile auftritt, und nicht 100 Programmzeilen weiter unten, wo man ihn nicht sucht.

Das passiert ja auch. Bei manchen Prozeduren muss man allerdings das IOResult explizit abfragen.
docwiki.embarcadero..../XE2/de/System.ChDir

Hochhaus hat folgendes geschrieben :

wenn der Fehler in der richtigen Zeile auftritt, und nicht 100 Programmzeilen weiter unten, wo man ihn nicht sucht.

Dann hast du offensichtlich an dieser Stelle mit der Fehlerbehandlung geschlampt.

Moderiert von Narses: Komplett-Zitat des letzten Beitrags entfernt.

Ja. In der Tat, leider.

Hochhaus hat folgendes geschrieben :

Ich habe den Fehler gefunden: Eine Anweisung "ChDir(S)" in ein Unterverzeichnis, das nicht existiert, war der Grund. Dummerweise kommt bei dieser Anweisung keine Fehlermeldung (!), sondern erst später, wo ich versuche, in diesem Verzeichnis eine Datei zu öffnen. Es wäre oft sehr hilfreich, wenn der Fehler in der richtigen Zeile auftritt, und nicht 100 Programmzeilen weiter unten, wo man ihn nicht sucht.

Dann ist der Fehler ja ein ganz anderer:
Du hast die Pfadangaben vergessen. Stattdessen mit ChDir usw. rumzufrickeln ist halt wenig sinnvoll.

Wenn du bei Dateizugriffen keinen kompletten Pfad angibst, brauchst du dich über Fehler auch nicht wundern...

Das ist ein guter Korrekturvorschlag: Ich werde jetzt dann bei Dateizugriffen den kompletten Pfad aufgrund von ParamStr(0) benützen.

Wobei du im eigenen Verzeichnis in der Regel keinen Schreibzugriff hast.
www.delphi-library.d...ewtopic.php?p=548600