Forum: Object-Pascal / Delphi-Language
Delphi
by wespi,
11. Feb 2005
Try .. except .. end ist mir als "Pascaler" noch etwas fremd, habe aber jetzt auch das probiert.
Bei mir wird der except .. end code-teil nicht durchlaufen, obwohl definitif ein Dateifehler auftreten muss, denn es existiert ja kein file 'fehler.rec'.
1 try
2 system.assignFile(f,'fehler.rec');
3 system.reset(f);
4 except
5 Ioerror := system.ioresult;
6 ...
Forum: Object-Pascal / Delphi-Language
Delphi
by wespi,
10. Feb 2005
Weiss ich nicht, aber das was Borland (oder Inprise?) an "Funktionen" anbietet, sollte doch auch "funktionieren", oder?
Sonst sollten die gleich sagen -- wird aus dem Sprachumfang gestrichen !
mfg wespi
Forum: Object-Pascal / Delphi-Language
Delphi
by wespi,
10. Feb 2005
Danke für den Tip, hatte ich aber auch schon mal probiert und hat nichts gebracht(schon bevor ich um Hilfe gebeten habe).
Ausserdem dürfte es dann mit dem kleinen Prögrämmchen von weiter oben auch nicht funktionieren, da war's aber auch mit watchfenster ok.
mfg wespi
Forum: Object-Pascal / Delphi-Language
Delphi
by wespi,
10. Feb 2005
Berechtigte Frage, aber es geht ja beim Aufruf von IoResult nicht immer nur darum, ob ein file existiert, sondern um alle möglichen Dateifehler (read,write,eof......)
und wenn die funktion bei reset nicht korrekt läuft, wie soll ich mich dann in allen möglichen Situationen darauf verlassen können ?
Also das hilft auch nicht so recht weiter, trotzdem vielen Dank, dass Ihr Euch um meine...
Forum: Object-Pascal / Delphi-Language
Delphi
by wespi,
10. Feb 2005
hab's probiert -------------> funktioniert, ergibt Fehlerfenster mit Fehler 123
Nur nützt mir das recht wenig, weil Ziel meines Programms nicht das das Darstellen eines Fehlerfensterchens ist, sondern gefälligst 'n bischen mehr.
Auf jeden Fall zeigt es, dass Delphi auch ordentlich laufen kann, wenn nicht irgendwelche ???? Umstände eintreten.
Ich hab' unter BP7 schon alles mögliche...
Forum: Object-Pascal / Delphi-Language
Delphi
by wespi,
10. Feb 2005
Hab's gerade probiert :
system.assignFile(f,'fehler.rec');
system.reset(f);
Ioerror := system.ioresult;
showmessage(intToStr(ioerror));
----> das gleiche Ergebnis.
Forum: Object-Pascal / Delphi-Language
Delphi
by wespi,
10. Feb 2005
Hallo,
nachdem ich Delphi-Neuling bin, musste ich erst mal nachsehen, wie Showmessage funktioniert.
Habe Showmessage jetzt so aufgerufen, ist es das , was Du meinst? :
3 reset(f);
4 Ioerror := ioresult;
5 showmessage(intToStr(ioerror));
Forum: Object-Pascal / Delphi-Language
Delphi
by wespi,
10. Feb 2005
Hallo,
Entschuldigung, ich habe meinen Quelltext falsch wiedergegeben.
IoError ist ein Integer, der Compiler hätte das natürlich sofort angemeckert.
Zeile 4 heisst natürlich : IoError := IoResult;
Was jedoch nichts an der Tatsache ändert, dass nach Abarbeiten von Zeile 3 (reset) das Debugfenster zwar IoResult mit dem Wert 2 (fehlende Datei) meldet, dieser Wert jedoch nach Abarbeiten...