wenn keine zahl, dann...?

[Ultimator]

Kalr kommt die immer:

Delphi-Quellcode:

if (code = 0) then 
  begin 
   ShowMessage('   Sie müssen noch Werte eingeben!   ');                                                                  
  end 

  else 
   begin 
    ShowMessage('   Sie müssen noch Werte eingeben!   ');      
    exit                                                                      
   end;

Wenn der code 0 ist(if code = 0), dann kommt die Nachricht(then Showmessage(...)), andernfalls (else)kommt die Nachricht auch (Showmessage(...)).
Soweit klar geworden?

Und BITTE! Nehmt doch kein real mehr, sondern single, double, extended usw...