AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Zahlen von Anfang an ausschließen

Ein Thema von Mulgatree · begonnen am 9. Okt 2011 · letzter Beitrag vom 10. Okt 2011
 
Mulgatree

Registriert seit: 9. Okt 2011
10 Beiträge
 
#1

Zahlen von Anfang an ausschließen

  Alt 9. Okt 2011, 19:38
Delphi-Version: 6
Hi!
Ich bin zum ersten mal hier auf Delp-PRAXis, also erspart mir bitte die kommentare das diese frage in der falschen Sparte ist.

Nun zu meinem Problem:
Ich muss für informatik einen Taschenrechner programmieren, an für sich kein Problem, er soll nur '+' '-' 'div' und 'mod'
können. Allerdings kann man ja nicht durch 0 teilen, deswegen hat uns unser lehrer gesagt, das wir verhindern sollen, dass der DAUS (Dümmster Anzunehmender USer) das programm crasht.
Ich hab also versucht die null auszuschließen, und zwar wiefolgt:
Delphi-Quellcode:
If (spe_2.value=0) or (spe_1.value=0)
  then
    begin
    b_div_kom.enabled:=false;
    b_div_rest.enabled:=false;
    lbl_div_0.Visible:=true;

If spe_2.value > 0 then begin
b_div_kom.enabled:=true;
b_div_rest.enabled:=true;
lbl_div_0.Visible:=false;
end;
end;
Also werden die Button bei dem erfüllen dieser Vorraussetzung ungebrauchbar. Allerdings krieg ich dann immer die Fehlermeldung: Meldun "" ist kein gültiger integerwert wenn ich die null aus spinbox löschen will.
und außerdem werden die Button erst disabled, wenn ich noch einmal die null eingebe... hoffe es ist nicht zu kompliziert formuliert.
  Mit Zitat antworten Zitat
 

 

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 10:06 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz