Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   keine negativen Zahlen (https://www.delphipraxis.net/72928-keine-negativen-zahlen.html)

Soldier 9. Jul 2006 13:51


keine negativen Zahlen
 
Delphi-Quellcode:

setroundmode(rmup);
        nochkT:=round(ergkT-kT);
        nochgT:=round(erggT-gT);
kann mir einer sagen, was ich eingeben muss, damit er mir bei dieser rechnung keine negativen Zahlen anzeigt?

Wenn also z.B. 200-300 eingetippt wird, soll 0 rauskomm. nich -100 ^^


mfG

EDatabaseError 9. Jul 2006 13:54

Re: keine negativen Zahlen
 
Delphi-Quellcode:
if dasErgebnis < 0 then dasErgebnis := 0;
ganz einfach.

Soldier 9. Jul 2006 13:59

Re: keine negativen Zahlen
 
danke :)

hätt man irgendwie auch selber drauf komm könn :D

mfG


Alle Zeitangaben in WEZ +1. Es ist jetzt 05:35 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz