NaN unter Windows XP mit XE4 compiliert

[stalkingwolf]

Ich habe etwas kurioses.

folgendes :
b ist Numeric(10,5)

Code:

select b from tabelle

In b steht NULL.

Code:

var b:real;
begin
.
.
b := myquery.fieldbyname('b').asfloat;
.
.

Verhalten von einem XE4 übersetzen Programm

Windows 7 und höher - b = 0
Windows XP - b = NaN

Das könnte man zwar abfangen mit

Code:

select coalesce(b,0) from tabelle

aber ich portiere gerade mehrere hunderttausend Zeilen Code.
Und wenn das select lautet

Code:

select * from tabelle

, dann habe ich ein Problem.
Mal abgesehen davon das dies ein Tretminenfeld wird.

Interessant ist auch das dies nur beim ersten Abruf des SQL Befehls passiert.
Wiederhole ich diesen Befehl sind die Zahlen korrekt. d.h b = 0

Jemand darüber schon einmal gestolpert und/oder hat eine Lösung dafür?

[Der schöne Günther]

Teste doch zur Sicherheit mal in einer XP-VM um auszuschließen dass es an der Windows-Version selbst liegt.

Gab es früher nicht gerne HP-Druckertreiber (oder sowas) die jeder Anwendung die FPU-Flags modifizierten? Delphi-Anwendungen mit ihren eher unkonventionellen FPU-Flags bekamen dadurch Probleme...

[Frickler]

Vielleicht erst mal feststellen, wo genau der Korken sitzt: im Datenbankclient, der Zugriffskomponente, oder in der Delphi-Runtime.

[stalkingwolf]

Problem gefunden.

Die Variable wurde per VAR einer Funktion übergeben und dort nie initialisiert.
Kollege wurde gerade auf dem Hof gesteinigt ;-)

[Uwe Raabe]

Nur so nebenbei: Wieso real?

Delphi-Quellcode:

var b:real;

[Bernhard Geyer]

Eigentlich verhält sich dein Programm unter XP jetzt korrekt.

NULL != 0

Hintergrund wird sein das ab Vista der Desktop von Windows in einem beschleunigten Modus (DirectDraw) läuft und hierfür die Exception-Mask der FPU standardmäßig anders eingestellt sind
das sollte NAN-Exception einfach als O-Werte zurückgeliefert werden.

[stalkingwolf]

Zitat:

Zitat von Uwe Raabe (Beitrag 1355098)

Nur so nebenbei: Wieso real?

Delphi-Quellcode:

var b:real;

war auch mit double so.

[Uwe Raabe]

Zitat:

Zitat von stalkingwolf (Beitrag 1355103)

Zitat:

Zitat von Uwe Raabe (Beitrag 1355098)

Nur so nebenbei: Wieso real?

Delphi-Quellcode:

var b:real;

war auch mit double so.

Die Frage hat auch nichts mit dem Fehler zu tun, sondern zielt eher darauf ab, warum überhaupt Real verwendet wird. Faktisch ist das unter aktuellen Delphi Versionen ein Double (deswegen auch dasselbe Verhalten), aber eben nicht in den älteren.

[stalkingwolf]

der Code ist paar Jahr alt und kommt noch aus Delphi 4 teilweise. Wurde damals alles mit real gemacht.

[Der schöne Günther]

Zitat:

Zitat von Bernhard Geyer (Beitrag 1355100)

Hintergrund wird sein das ab Vista der Desktop von Windows in einem beschleunigten Modus (DirectDraw) läuft und hierfür die Exception-Mask der FPU standardmäßig anders eingestellt sind
das sollte NAN-Exception einfach als O-Werte zurückgeliefert werden.

Verstehe ich nicht. Der Desktop (explorer.exe) ist ein eigener Prozess, ich dachte der hätte seine FPU-Flags wie er mag? Außerdem stellt doch jede Delphi-Anwendung zu Beginn für ihren Prozess die Flags auf Standard. Da wir ja schon feststellen konnten das es generell auf XP anders ist glaube ich nicht mehr dass es zwingend mit der FPU-Maske zusammenhängt.

Können wir das irgendwie nachstellen? Welche Drittanbieter-Abhängigkeiten haben wir hier durch den Datenbank-Zugriff?

[stalkingwolf]

Wie oben geschrieben.
Der Zugriff auf die Datenbank war wohl gar nicht das Problem, sondern das die Variable nur deklariert, aber nicht initialisiert war.

Ich hatte den Quellcode etwas simplifiziert.
Es war eigentlich eine Schleife in der Stand noch

Code:

b := b + q.fieldbyname('b').asfloat;

Der Code ist alt und ich portiere momentan von Delphi6 auf XE4 die Programme. Da stolpere ich über Haufenweise solche Dinge.
Die Programm sind mehre Tausend Zeilen und davon fast 100 Programme. Jede Zeile im Detail kann ich nicht prüfen.
Vor allem wenn durch 3 proceduren eine Variable mit var weitergegeben wird :-)