Ergebnis der Suchanfrage

• Forum: Sonstige Fragen zu Delphi

  Re: negative zahlen ausschliessen

    Delphi
    by werso01, 6. Jun 2004
  danke fuer die hilfe, aber irgendwie funktionieren beide nicht:
  
  procedure TFormKreis.ButtonRechneClick(Sender: TObject);
  VAR Radius : REAL;
  begin
  TRY
  Radius := StrToFloat(EditRadius.Text);
  EXCEPT
  Radius := 0;
  EditRadius.Text := '0';
• Forum: Sonstige Fragen zu Delphi

  negative zahlen ausschliessen

    Delphi
    by werso01, 6. Jun 2004
  hi.
  
  um vorzuwarnen: ich bin ein anfaenger punkto delphi-programmierung.
  also ...
  ich muss ein programm schreiben, das kreisumfang und kreisfläche berechnet (durch eingabe des radius).
  eigentlich ganz einfach.
  ich habe alle fehlerquellen ausgeschlossen, bis auf jene, dass man keine negative zahl eingeben kann.
  wahrscheinlich funktioniert das mit einer if-funktion aba ich hab leider keine...