Autor Beitrag
Hochhaus
ontopic starontopic starontopic starontopic starhalf ontopic starofftopic starofftopic starofftopic star
Beiträge: 662
Erhaltene Danke: 8

Windows 7
Delphi XE2
BeitragVerfasst: Fr 21.10.11 17:07 
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:
ausblenden Delphi-Quelltext
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 user profile iconNarses: Delphi-Tags hinzugefügt
Niko S.
ontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic star
Beiträge: 566
Erhaltene Danke: 10

Win 7, Ubuntu
Lazarus, Turbo Delphi, Delphu 7 PE
BeitragVerfasst: Fr 21.10.11 17:39 
www.delphi-forum.de/...ler+123_95549,0.html
Schau mal da... Es gibt viele solcher Fälle.
Narses
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Administrator
Beiträge: 10183
Erhaltene Danke: 1256

W10ent
TP3 .. D7pro .. D10.2CE
BeitragVerfasst: Fr 21.10.11 18:25 
Moin!

user profile iconHochhaus hat folgendes geschrieben Zum zitierten Posting springen:
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:
ausblenden Delphi-Quelltext
1:
2:
3:
begin
  ShowMessage('Hello World!');
end;

cu
Narses

_________________
There are 10 types of people - those who understand binary and those who don´t.
Hochhaus Threadstarter
ontopic starontopic starontopic starontopic starhalf ontopic starofftopic starofftopic starofftopic star
Beiträge: 662
Erhaltene Danke: 8

Windows 7
Delphi XE2
BeitragVerfasst: Sa 22.10.11 11:32 
user profile iconNiko S. hat folgendes geschrieben Zum zitierten Posting springen:
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
BenBE
ontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic star
Beiträge: 8721
Erhaltene Danke: 191

Win95, Win98SE, Win2K, WinXP
D1S, D3S, D4S, D5E, D6E, D7E, D9PE, D10E, D12P, DXEP, L0.9\FPC2.0
BeitragVerfasst: So 23.10.11 13:49 
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.

Für diesen Beitrag haben gedankt: Hochhaus
jaenicke
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 19314
Erhaltene Danke: 1747

W11 x64 (Chrome, Edge)
Delphi 11 Pro, Oxygene, C# (VS 2022), JS/HTML, Java (NB), PHP, Lazarus
BeitragVerfasst: So 23.10.11 14:01 
Oder einfach direkt in Delphi mit SysErrorMessage ausgeben lassen:
ausblenden Delphi-Quelltext
1:
ShowMessage(SysErrorMessage(123));					
--> SysErrorMessage
bzw. besser natürlich mit dem letzten Fehler:
ausblenden Delphi-Quelltext
1:
ShowMessage(SysErrorMessage(GetLastError));					
Einloggen, um Attachments anzusehen!

Für diesen Beitrag haben gedankt: Hochhaus
Singlepin
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 36
Erhaltene Danke: 4

WinXP
Delphi6 MySQL
BeitragVerfasst: So 23.10.11 20:28 
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.
Hochhaus Threadstarter
ontopic starontopic starontopic starontopic starhalf ontopic starofftopic starofftopic starofftopic star
Beiträge: 662
Erhaltene Danke: 8

Windows 7
Delphi XE2
BeitragVerfasst: Mo 24.10.11 14:27 
Moderiert von user profile iconNarses: 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
Singlepin
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 36
Erhaltene Danke: 4

WinXP
Delphi6 MySQL
BeitragVerfasst: Mo 24.10.11 17:38 
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.

Für diesen Beitrag haben gedankt: Hochhaus
Hochhaus Threadstarter
ontopic starontopic starontopic starontopic starhalf ontopic starofftopic starofftopic starofftopic star
Beiträge: 662
Erhaltene Danke: 8

Windows 7
Delphi XE2
BeitragVerfasst: Mo 24.10.11 18:06 
Moderiert von user profile iconNarses: 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... ...
Singlepin
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 36
Erhaltene Danke: 4

WinXP
Delphi6 MySQL
BeitragVerfasst: Mo 24.10.11 19:12 
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

Für diesen Beitrag haben gedankt: Hochhaus
Hochhaus Threadstarter
ontopic starontopic starontopic starontopic starhalf ontopic starofftopic starofftopic starofftopic star
Beiträge: 662
Erhaltene Danke: 8

Windows 7
Delphi XE2
BeitragVerfasst: Di 25.10.11 12:45 
Moderiert von user profile iconNarses: 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
jasocul
ontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic star
Beiträge: 6393
Erhaltene Danke: 147

Windows 7 + Windows 10
Sydney Prof + CE
BeitragVerfasst: Di 25.10.11 12:53 
user profile iconHochhaus hat folgendes geschrieben Zum zitierten Posting springen:
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
Luckie
Ehemaliges Mitglied
Erhaltene Danke: 1



BeitragVerfasst: Di 25.10.11 13:03 
user profile iconHochhaus hat folgendes geschrieben Zum zitierten Posting springen:
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.

Für diesen Beitrag haben gedankt: Hochhaus
Hochhaus Threadstarter
ontopic starontopic starontopic starontopic starhalf ontopic starofftopic starofftopic starofftopic star
Beiträge: 662
Erhaltene Danke: 8

Windows 7
Delphi XE2
BeitragVerfasst: Di 25.10.11 13:11 
Moderiert von user profile iconNarses: Komplett-Zitat des letzten Beitrags entfernt.

Ja. In der Tat, leider.
jaenicke
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 19314
Erhaltene Danke: 1747

W11 x64 (Chrome, Edge)
Delphi 11 Pro, Oxygene, C# (VS 2022), JS/HTML, Java (NB), PHP, Lazarus
BeitragVerfasst: Di 25.10.11 14:13 
user profile iconHochhaus hat folgendes geschrieben Zum zitierten Posting springen:
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...

Für diesen Beitrag haben gedankt: Hochhaus
Hochhaus Threadstarter
ontopic starontopic starontopic starontopic starhalf ontopic starofftopic starofftopic starofftopic star
Beiträge: 662
Erhaltene Danke: 8

Windows 7
Delphi XE2
BeitragVerfasst: Di 25.10.11 15:42 
Das ist ein guter Korrekturvorschlag: Ich werde jetzt dann bei Dateizugriffen den kompletten Pfad aufgrund von ParamStr(0) benützen.
jaenicke
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 19314
Erhaltene Danke: 1747

W11 x64 (Chrome, Edge)
Delphi 11 Pro, Oxygene, C# (VS 2022), JS/HTML, Java (NB), PHP, Lazarus
BeitragVerfasst: Di 25.10.11 16:51 
Wobei du im eigenen Verzeichnis in der Regel keinen Schreibzugriff hast.
www.delphi-library.d...ewtopic.php?p=548600

Für diesen Beitrag haben gedankt: Hochhaus