Hallo,
Ich schätze mal einfach, dass die Funktion Val bei Misserfolg gar nichts in z reinschreibt.
Und in lokalen Variablen kann potentiell ALLES stehen wenn sie nicht initialisiert sind.
Steht denn bei euch beiden das Gleiche drin wenn du den Code so änderst?
Delphi-Quellcode:
var
tmpDouble : Double;
z : Integer;
begin
z := 0;
Val('', tmpDouble, z);
if z = 0 then
ShowMessage('Mist');
PS: Es gibt auch StrToIntDef!
Delphi-Quellcode:
var
z : Integer;
begin
z := StrToIntDef('',0);
if z = 0 then
ShowMessage('Mist');
Michael
"Programmers talk about software development on weekends, vacations, and over meals not because they lack imagination,
but because their imagination reveals worlds that others cannot see."