AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Programmieren allgemein Delphi Auslesen ob Integer Positiv oder Negativ ist

Auslesen ob Integer Positiv oder Negativ ist

Ein Thema von nwnssolutionssoftware · begonnen am 9. Apr 2019 · letzter Beitrag vom 15. Apr 2019
Antwort Antwort
Seite 1 von 3  1 23   
nwnssolutionssoftware

Registriert seit: 6. Aug 2018
45 Beiträge
 
#1

Auslesen ob Integer Positiv oder Negativ ist

  Alt 9. Apr 2019, 15:30
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.
Holger
  Mit Zitat antworten Zitat
Benutzerbild von Neutral General
Neutral General

Registriert seit: 16. Jan 2004
Ort: Bendorf
5.219 Beiträge
 
Delphi 10.2 Tokyo Professional
 
#2

AW: Auslesen ob Integer Positiv oder Negativ ist

  Alt 9. Apr 2019, 15:33
Negative Zahlen sind kleiner als 0.
Michael
"Programmers talk about software development on weekends, vacations, and over meals not because they lack imagination,
but because their imagination reveals worlds that others cannot see."
  Mit Zitat antworten Zitat
mkinzler
(Moderator)

Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.851 Beiträge
 
Delphi 11 Alexandria
 
#3

AW: Auslesen ob Integer Positiv oder Negativ ist

  Alt 9. Apr 2019, 15:33
System.Math.Sign() oder halt if <Wert> < 0
Markus Kinzler
  Mit Zitat antworten Zitat
hoika

Registriert seit: 5. Jul 2006
Ort: Magdeburg
8.269 Beiträge
 
Delphi 10.4 Sydney
 
#4

AW: Auslesen ob Integer Positiv oder Negativ ist

  Alt 9. Apr 2019, 15:34
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
Heiko
  Mit Zitat antworten Zitat
nwnssolutionssoftware

Registriert seit: 6. Aug 2018
45 Beiträge
 
#5

AW: Auslesen ob Integer Positiv oder Negativ ist

  Alt 9. Apr 2019, 15:39
Wunderbar letzteres hat funktioniert und natürlich
Zitat:
MinuteNegative Zahlen sind kleiner als 0.
Holger
  Mit Zitat antworten Zitat
Dennis07

Registriert seit: 19. Sep 2011
Ort: Deutschland
479 Beiträge
 
Delphi 11 Alexandria
 
#6

AW: Auslesen ob Integer Positiv oder Negativ ist

  Alt 11. Apr 2019, 19:32
Delphi-Quellcode:
function IsNegative(const X: Integer): Boolean;
asm
  SHR EAX, 31
end;
Dennis

Geändert von Dennis07 (11. Apr 2019 um 19:36 Uhr)
  Mit Zitat antworten Zitat
TurboMagic

Registriert seit: 28. Feb 2016
Ort: Nordost Baden-Württemberg
2.772 Beiträge
 
Delphi 12 Athens
 
#7

AW: Auslesen ob Integer Positiv oder Negativ ist

  Alt 11. Apr 2019, 20:43
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...
  Mit Zitat antworten Zitat
alex517

Registriert seit: 23. Nov 2004
Ort: Bernau b. Berlin
273 Beiträge
 
Delphi XE5 Enterprise
 
#8

AW: Auslesen ob Integer Positiv oder Negativ ist

  Alt 12. Apr 2019, 09:01
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...
Alexander
  Mit Zitat antworten Zitat
TiGü

Registriert seit: 6. Apr 2011
Ort: Berlin
3.058 Beiträge
 
Delphi 10.4 Sydney
 
#9

AW: Auslesen ob Integer Positiv oder Negativ ist

  Alt 12. Apr 2019, 09:05
Ich erinnere an den grandiosen Thread:
https://www.delphipraxis.net/123215-...umwandeln.html
  Mit Zitat antworten Zitat
Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.534 Beiträge
 
Delphi 11 Alexandria
 
#10

AW: Auslesen ob Integer Positiv oder Negativ ist

  Alt 12. Apr 2019, 09:40
Ich wusste, dass das irgendwann kommt
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
  Mit Zitat antworten Zitat
Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

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 20:23 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