Integer/Extended inkompatible

[Nikodel]

hallo,

folgende Zeile ergibt den Compilierfehler "inkompatible Typen 'Integer' und 'Extended'":

Code:

var
  Beschr: String;
  nBl, I: Integer; // Anzahl Blanks
begin
  ...
  nBl := StrToInt(BreiteNamen.Text)/2-2;

Welche '2' ist denn hier Extended?

Nikodel

[mkinzler]

Eine halbe Ganzzahl ist ein Extendend

Delphi-Quellcode:

nBl := Trunc(StrToInt(BreiteNamen.Text)/2)-2;

oder Round

[haentschman]

Hallöle...:wink:

das / ergibt immer Nachkommastellen. Und dann ist es ein Extended. :zwinker:

[Nikodel]

danke, ist ja eigentlich klar. Dann stand ich wohl auf der Leitung :wink:

Nikodel

[TomyN]

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.

[Neutral General]

Ich bin erstaunt, dass das noch niemand erwähnt hat aber es gibt auch eine reine Integer-Division in Delphi:

Delphi-Quellcode:

nBl := StrToInt(BreiteNamen.Text) div 2 - 2;

Allerdings kommt da dann logischerweise immer eine Ganzzahl raus (Integer). d.h.

Delphi-Quellcode:

5 div 2 = 2

[Delphi.Narium]

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

[Neutral General]

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.

[Moombas]

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?

[DeddyH]

Für eine Halbierung könnte man auch einfach um eins nach rechts shiften :wink: