Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi *integer := int(*extended) (https://www.delphipraxis.net/127869-%2Ainteger-%3D-int-%2Aextended.html)

Schilly 20. Jan 2009 14:15


*integer := int(*extended)
 
hm... ich hab ne exponentialfunktion, deren ergebnis ein integer sein soll.
Delphi-Quellcode:
var x,i: integer;
...
x := int(10 * power(1.3,i));
jetzt kommt der fehler : "Inkompatible Typen: 'Integer' und 'Extended'".
bei power() kommt ein Extended raus. laut delphi-hilfe soll int() ein Real zum Integer machen. Ich dachte bisher, Extended sei auch eine Form von Real (zumindest ein "Reeller Typ")?

Naja jedenfalls, was kann ich jetzt machen um das zu umgehen? oder was hab ich vergessen?

Stutz 20. Jan 2009 14:19

Re: *integer := int(*extended)
 
versuchs doch mal mit round() anstatt int()

Schilly 20. Jan 2009 14:24

Re: *integer := int(*extended)
 
stimmt danke das ginge natürlich

auch wenn ich folgendes nicht mag:
Zitat:

Liegt X genau in der Mitte zwischen zwei ganzen Zahlen, wird immer die gerade Zahl zurückgeliefert.
aber das ist wahrscheinlich anders nicht so einfach machbar (außer eventuell mit stringbeschneidung) oder?

Stutz 20. Jan 2009 14:30

Re: *integer := int(*extended)
 
es gibt auch noch trunc() und noch ein paar andere, die das erledigen können, ich weiß aber net welcher das wie macht

Schilly 20. Jan 2009 14:34

Re: *integer := int(*extended)
 
ah ja ok danke, das ist das was ich suchte. scheint das gleiche zu sein wie int() nur mit extended.

dankeschön :)

HenKst 20. Jan 2009 14:36

Re: *integer := int(*extended)
 
Nur um nochmal zu klären warum dein code nicht funktioniert:

Int nimmt einen Extended und schreibt dessen Integerteil(also alles was vor dem Komma steht) in einem Extended zurück.

Macht also das selbe wie trunc, aber trunc gibt einen Integer zurück.

GreeZ HenKst


yey 100 posts^^


Alle Zeitangaben in WEZ +1. Es ist jetzt 06:45 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