Delphi-PRAXiS
Seite 1 von 3  1 23   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Programmieren allgemein (https://www.delphipraxis.net/40-programmieren-allgemein/)
-   -   Delphi Auslesen ob Integer Positiv oder Negativ ist (https://www.delphipraxis.net/200322-auslesen-ob-integer-positiv-oder-negativ-ist.html)

nwnssolutionssoftware 9. Apr 2019 15:30

Auslesen ob Integer Positiv oder Negativ ist
 
Der Title sgat eigentlich schon alles, ich suche eine möglichkeit um herauszufinden ob der Integer positiv oder negativ ist für ein Kontenanalyse Programm. Wenn das Konto im Minus ist soll die Zahl Rot sein wenn nicht Grün. VIeleicht habt ihr ja eine Idee.
Danke im Vorraus.

Neutral General 9. Apr 2019 15:33

AW: Auslesen ob Integer Positiv oder Negativ ist
 
Negative Zahlen sind kleiner als 0.

mkinzler 9. Apr 2019 15:33

AW: Auslesen ob Integer Positiv oder Negativ ist
 
System.Math.Sign() oder halt
Delphi-Quellcode:
if <Wert> < 0

hoika 9. Apr 2019 15:34

AW: Auslesen ob Integer Positiv oder Negativ ist
 
Hallo,

Delphi-Quellcode:
var
  i: Integer;
begin
  i:= -1;

  if<0 then
  begin
    ; kleiner -> rot
  end
  else
  begin
    ; >=0  -> grün
  end;
oder denke ich jetzt zu einfach ?

Wobei 0 nicht grün ist ;)

nwnssolutionssoftware 9. Apr 2019 15:39

AW: Auslesen ob Integer Positiv oder Negativ ist
 
Wunderbar letzteres hat funktioniert und natürlich
Zitat:

MinuteNegative Zahlen sind kleiner als 0.

Dennis07 11. Apr 2019 19:32

AW: Auslesen ob Integer Positiv oder Negativ ist
 
Delphi-Quellcode:
function IsNegative(const X: Integer): Boolean;
asm
  SHR EAX, 31
end;

TurboMagic 11. Apr 2019 20:43

AW: Auslesen ob Integer Positiv oder Negativ ist
 
Zitat:

Zitat von Dennis07 (Beitrag 1430120)
Delphi-Quellcode:
function IsNegative(const X: Integer): Boolean;
asm
  SHR EAX, 31
end;

Jaja, warum einfach, wenn's auch umständlich geht.
Nur Achtung: das funktioniert so nur unter Win32, unter Win64 gibt's nur ganze
asm Funktionen und kein Inline asm...

alex517 12. Apr 2019 09:01

AW: Auslesen ob Integer Positiv oder Negativ ist
 
Zitat:

Zitat von TurboMagic (Beitrag 1430125)
Jaja, warum einfach, wenn's auch umständlich geht.

Da fehlen nur die Ironie-Tags.
Beim gestrigen Stammtisch wurden wurden noch mehr Lösungen dieser Art vorgeschlagen...:-D

TiGü 12. Apr 2019 09:05

AW: Auslesen ob Integer Positiv oder Negativ ist
 
Ich erinnere an den grandiosen Thread:
https://www.delphipraxis.net/123215-...umwandeln.html

DeddyH 12. Apr 2019 09:40

AW: Auslesen ob Integer Positiv oder Negativ ist
 
Ich wusste, dass das irgendwann kommt :lol:


Alle Zeitangaben in WEZ +1. Es ist jetzt 19:48 Uhr.
Seite 1 von 3  1 23   

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