konverter real til integer

trunc funktionen

eller round hvis du vil det

i := trunc(x);

Du er nød til at afrunde først, prøv med det her:

var
  R: Real;
  I: Integer;
begin
  I := Round(R);
end;

Undskyld  Arne... havde ikke set du havde svaret  :)

No problemo

hvad med IntToFloat(variable);

Han vil konvertere fra float til int. IntToFloat lyder ikke som løsning på det.

Min Delphi 6 har iørvigt slet ikke en IntToFloat. Og hvorfor skulle den det
når := virker den vej ??

Ja så FloatToInt(variable); skrev det den forkerte vej.
I Delphi 7 der er den funktion der, den plejer jeg at bruge, den er tre gange så simpel.

Hvorfor er det 3 gange simplere at skrive 10 bogstaver end 5 bogstaver ?

trunc/round har derudover den fordel at det meget klart fremgår af navnet
hvad de gøre.

så dobbelt så simpelt...
Det er ikke så meget i små programmer, men i f.eks. en meget avanceret lommeregner, større end windows' egen, så bliver det irriterende i længden med en masse declerationer osv. når man kan nøjes med en linie.

Tak for de hurtige svar :o)

stefmeister>

Jeg forstår ikke hvad du snakker om.

i := trunc(x);

versus

i := floattoint(x);

??

læste den lige forkert...
Din er kortest. Kunne bare ikke lige overskue det før.

stefmeister>> Med FloatToInt vil jeg ummidelbart sige du er på tynd is !
Jeg har aldrig hørt om den før, ikke der med sagtden ikke eksisterer, men hvad værer er så har min delphi 7 heller ikke hørt om den.

Hvad skulle den gøre med din floatingpoint Value ? Truncere den eller Afrunde den ?

Jens B

nå ja... det er min der er galt på den...

Den hedder ikke FloatToInt - Men FloatToStr, som man selvfølgelig ikke kan bruge i denne her sammenhæng da det er integer han skal bruge.