Delphi-PRAXiS
Seite 1 von 2  1 2      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Warum keine Exception bei Division durch 0 (https://www.delphipraxis.net/34212-warum-keine-exception-bei-division-durch-0-a.html)

Jelly 19. Nov 2004 11:10


Warum keine Exception bei Division durch 0
 
Hallo,

ich bastle an einem größeren Projekt, und hab irgendwie einen Fehler im Code, was höchstwahrscheinlich durch eine Division durch 0 zurückzuführen ist. Deshalb hab ich jetzt einmal testweise folgenden Code probiert:

Delphi-Quellcode:
procedure TForm1.cmdNullClick(Sender: TObject);
var
 mu : double ;
begin
     mu := 5/0 ;
end;
rsp.
Delphi-Quellcode:
procedure TForm1.cmdNullClick(Sender: TObject);
var
 mu : double ;
begin
     mu := 0/0 ;
end;
Jetzt wundere ich mich aber, warums nicht knallt, wenn der Code ausgeführt. es passiert rein garnichts, und eventuell folgender Code wird normal weiter ausgeführt. Wieso gibts da keine Exception? Stattdessen zeigt ein
Delphi-Quellcode:
showmessage (FloatToStr(5/0)) ;
mir ein INF an, ein
Delphi-Quellcode:
showmessage (FloatToStr(0/0)) ;
ein NAN. Mathematisch ist wohl klar, aber mein gutes alte Turbo Pascal hat da immer eine Laufzeitfehlermeldung ausgegeben. Ich hab in den Delphi Einstellung bischen gekuckt, aber nirgends einen Schalter gefunden, der dieses Verhalten erklärt.

Gruß,
Tom

SubData 19. Nov 2004 11:36

Re: Warum keine Exception bei Division durch 0
 
Ich glaub Delphi knallt nur raus, wenn du das mit nem Interger versuchst... Float / Double müsste gehen... Oder täusch ich mich da jetzt?

Chewie 19. Nov 2004 11:39

Re: Warum keine Exception bei Division durch 0
 
Ist bei Fließkommazahlen schon richtig so. Such mal hier nach Hier im Forum suchenNaN (Not A Number), da solltest du die Erklärung kriegen.

Jelly 19. Nov 2004 13:01

Re: Warum keine Exception bei Division durch 0
 
Hmm. Gibts denn ne Möglichkeit, via Compilerschalter o.ä. trotzdem ne Exception herbeizurufen. Hintergrund des Ganzen ist eine Monte Carlo Simulation, welche (wie es mir scheint), zu 99,999% und mehr funktionniert, nur ab und zu mir mit dieser Division durch 0 Probleme machen könnt. Bin halt noch auf der Fehlersuche... Ich halt vermeiden, bei jeder Division ein if...then...else zu schreiben, weil mir das definitiv zu aufwendig wird. Die ganze Simulation hat mittlerweilen paar tausend Zeilen Code, wo solche Division theoretisch relativ oft auftreten können... Zeile für Zeile das Ganze zu debuggen macht keinen Sinn, weil die ganze Rechnung ja zu 99,999% funktioniert.

jim_raynor 19. Nov 2004 13:04

Re: Warum keine Exception bei Division durch 0
 
Achja. Mit diesem Problem kämpfe ich auch schon längere Zeit und habe noch keine Lösung gefunden. Man kann mal probieren das ControlWord der FPU zu ändern. Geht relativ einfach mit der JCL. Weiss jetzt nicht, wie die Unit/Funktion genau heisst aber glaube irgendwas mit 8087.

Jelly 19. Nov 2004 13:08

Re: Warum keine Exception bei Division durch 0
 
Zitat:

Zitat von jim_raynor
ControlWord der FPU zu ändern

In dem Satz versteh ich nur "der", "zu" und "ändern" :stupid:

Was bitte schön ist ein Controlword und eine FPU?

Hansa 19. Nov 2004 13:09

Re: Warum keine Exception bei Division durch 0
 
Damit das Programm nur noch auf einer CPU läuft ? Ich würde einen anderen Zahlentyp testen: BCD oder so ähnlich. Mußt halt suchen. :mrgreen:

jim_raynor 19. Nov 2004 13:13

Re: Warum keine Exception bei Division durch 0
 
Okay. FPU bedeutet Floating Point Unit und ist quasi die CPU für alle Gleitkommaberechnungen (ist natürlich in der CPU integriert). Durch das ControlWord kann die FPU gesteuert werden, was denn bei Fehlern wie Division durch 0 passieren soll.

Luckie 19. Nov 2004 13:14

Re: Warum keine Exception bei Division durch 0
 
Dein Beispiel-Code wird gar nicht ausgeführt. Der Compiler ist ja nicht blöd, er sieht, dass du die Varaible nie benutzt und optimiert sie weg.

SubData 19. Nov 2004 13:19

Re: Warum keine Exception bei Division durch 0
 
Prüf doch einfach ob die Zahl <> 0 ist, dann brauchste auch keine Exception mehr :)


Alle Zeitangaben in WEZ +1. Es ist jetzt 14:48 Uhr.
Seite 1 von 2  1 2      

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz