Probleme mit VAL Funktion

[AJ_Oldendorf]

Hallo zusammen,
habt ihr das Problem schonmal folgendes Problem gehabt:

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
var
  tmpDouble : Double;
  z : Integer;
begin
  Val('', tmpDouble, z);
  if z = 0 then
    ShowMessage('Mist');
end;

Bei einem Kollegen ist z=0 und bei mir ist z=1.
Habt ihr eine Idee, woran das liegen kann.
Beides Win7 32bit.
Viele Grüße
Alex