AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren

Integer/Extended inkompatible

Ein Thema von Nikodel · begonnen am 15. Dez 2020 · letzter Beitrag vom 15. Dez 2020
Antwort Antwort
TomyN

Registriert seit: 8. Nov 2006
Ort: Bayreuth
270 Beiträge
 
Delphi 10.3 Rio
 
#1

AW: Integer/Extended inkompatible

  Alt 15. Dez 2020, 11:02
By the way, Int / Int ergibt zwar in Delphi (noch?) Extended, aber in (fast) allen anderen Sprachen wieder einen Int. Daher habe ich mir in so einer Situation angewöhnt, den Divisor als rationale Zahl ( d.h. 2.0 statt 2 ) zu schreiben, damit es mir (und evtl. auch dem Compiler) klar ist.
Thomas Neumann
Meine Projekte
www.satlive.audio
www.levelcheck.de
  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: Integer/Extended inkompatible

  Alt 15. Dez 2020, 11:23
Ich bin erstaunt, dass das noch niemand erwähnt hat aber es gibt auch eine reine Integer-Division in Delphi:
nBl := StrToInt(BreiteNamen.Text) div 2 - 2;
Allerdings kommt da dann logischerweise immer eine Ganzzahl raus (Integer). d.h. 5 div 2 = 2
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
Delphi.Narium

Registriert seit: 27. Nov 2017
2.558 Beiträge
 
Delphi 7 Professional
 
#3

AW: Integer/Extended inkompatible

  Alt 15. Dez 2020, 11:33
Das Ergebnis von DIV dürfte Trunc entsprechen, kann aber um 1 von Round abweichen.

Man muss also schon wissen, was man bei der Division von Integerwerten als Ergebnis erwartet.

DIV und Trunc ergeben immer das "abgerundete" Ergebnis, also den ganzszahligen Vorkommaanteil. Round rundet ggfls. auf die nächsthöhere Ganzzahl auf.
Delphi-Quellcode:
i := 42 div 9; // -> i = 4
i := Trunc(42 / 9); // -> i = 4
i := Round(42 / 9); // -> i = 5
  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
 
#4

AW: Integer/Extended inkompatible

  Alt 15. Dez 2020, 11:44
Kurzer Ergänzung: Wenn man eh Integer hat und als Ergebnis auch nur einen Integer benötigt also quasi das abgerundete Ergebnis was man auch durch Trunc erhalten würde, dann sollte man besser direkt div nutzen. Es macht keinen Sinn den PC mit einer Gleitkommaoperation zu belasten wenn man am Ende doch wieder nur den Integer haben will.
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
Benutzerbild von Moombas
Moombas

Registriert seit: 22. Mär 2017
Ort: bei Flensburg
525 Beiträge
 
FreePascal / Lazarus
 
#5

AW: Integer/Extended inkompatible

  Alt 15. Dez 2020, 11:46
Wieso ggf.? Round richtet sich doch meines Wissens nach der mathematischen Vorgabe, also das ab 0,5 aufgerundet wird.
Oder habe ich das falsch im Gedächtnis?
Der Weg ist das Ziel aber man sollte auf dem Weg niemals das Ziel aus den Augen verlieren.
  Mit Zitat antworten Zitat
Delphi.Narium

Registriert seit: 27. Nov 2017
2.558 Beiträge
 
Delphi 7 Professional
 
#6

AW: Integer/Extended inkompatible

  Alt 15. Dez 2020, 11:57
Wieso ggf.? Round richtet sich doch meines Wissens nach der mathematischen Vorgabe, also das ab 0,5 aufgerundet wird.
Oder habe ich das falsch im Gedächtnis?
ggfls. -> es kommt auf's Ergebnis an.
ggfls. -> ab 0,5 aufrunden, sonst abrunden.
ggfls. -> es kommt drauf an oder eventuell oder unter gewissen Umständen oder so 'ne Art "entschiedenes Sowohlalsauch"

DIV und Trunc: immer abrunden.
Round: ergebnisentsprechend auf- oder abrunden.
  Mit Zitat antworten Zitat
Benutzerbild von Moombas
Moombas

Registriert seit: 22. Mär 2017
Ort: bei Flensburg
525 Beiträge
 
FreePascal / Lazarus
 
#7

AW: Integer/Extended inkompatible

  Alt 15. Dez 2020, 12:12
Wieso ggf.? Round richtet sich doch meines Wissens nach der mathematischen Vorgabe, also das ab 0,5 aufgerundet wird.
Oder habe ich das falsch im Gedächtnis?
ggfls. -> es kommt auf's Ergebnis an.
ggfls. -> ab 0,5 aufrunden, sonst abrunden.
ggfls. -> es kommt drauf an oder eventuell oder unter gewissen Umständen oder so 'ne Art "entschiedenes Sowohlalsauch"

DIV und Trunc: immer abrunden.
Round: ergebnisentsprechend auf- oder abrunden.
Also war ich richtig mit dem was ich noch im Gedächtnis hatte
Der Weg ist das Ziel aber man sollte auf dem Weg niemals das Ziel aus den Augen verlieren.
  Mit Zitat antworten Zitat
Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.388 Beiträge
 
Delphi 12 Athens
 
#8

AW: Integer/Extended inkompatible

  Alt 15. Dez 2020, 12:39
Round richtet sich doch meines Wissens nach der mathematischen Vorgabe, also das ab 0,5 aufgerundet wird.
Oder habe ich das falsch im Gedächtnis?
Nein.
Ja.

Round nutzt standardmäßig Bankers-Round,
also "gerecht" verteilt quasi abwechselnd bei 0,5 auf- und/oder abrunden. (gerade buw. ungerade Zahlen)

Und man kann mit Delphi-Referenz durchsuchenSetRoundMode sogar verändern, wie sich Delphi-Referenz durchsuchenRound verhält.
Ein Therapeut entspricht 1024 Gigapeut.
  Mit Zitat antworten Zitat
mkinzler
(Moderator)

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

AW: Integer/Extended inkompatible

  Alt 15. Dez 2020, 15:19
Um nun alle Möglichkeiten genannt zu haben und damit das Thema nicht ewig auszuweiten, sei noch RoundTo, Floor und (bedingt) Ceil genannt. Aber wirklich weiter bringt das den Nikodel auch nicht. Nur wir konnten wieder einmal zeigen, was wir alles Wissen.
Markus Kinzler
  Mit Zitat antworten Zitat
Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.660 Beiträge
 
Delphi 12 Athens
 
#10

AW: Integer/Extended inkompatible

  Alt 15. Dez 2020, 11:47
Für eine Halbierung könnte man auch einfach um eins nach rechts shiften
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
Antwort Antwort

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 04:28 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-2025 by Thomas Breitkreuz