Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Int64 in Integer (High / Low) wandeln? (https://www.delphipraxis.net/99057-int64-integer-high-low-wandeln.html)

Alois 6. Sep 2007 05:37


Int64 in Integer (High / Low) wandeln?
 
Hallo,

wie wandle ich einen Int64 Wert in zwei Integer?
Der eine Integer soll die oberen 32-Bit enthalten und der andere die unteren 32-Bit.

Irgenwie krieg ich es heute nicht gebacken. :wall: Ich wäre Euch echt dankbar wenn ihr mir auf die Sprünge helft.

Gruss Alois ;)[dp]

marabu 6. Sep 2007 06:45

Re: Int64 in Integer (High / Low) wandeln?
 
Moin Alois,

wenn deine Delphi-Version den Datentyp Int64 kennt, sollte sie auch Int64Rec kennen. Schau mal nach.

Grüße vom marabu

Alois 6. Sep 2007 10:51

Re: Int64 in Integer (High / Low) wandeln?
 
Zitat:

Zitat von marabu
Moin Alois,

wenn deine Delphi-Version den Datentyp Int64 kennt, sollte sie auch Int64Rec kennen. Schau mal nach.

Grüße vom marabu

Hi @Marabu,

Danke für den Tip. Du glaubst nicht wie ich das gesucht habe.

Delphi-Quellcode:
var
  Size: Int64;

begin
  intHi := Int64Rec(Size).Hi;
  intLo := Int64Rec(Size).Lo;
end;

SirThornberry 6. Sep 2007 10:54

Re: Int64 in Integer (High / Low) wandeln?
 
man kann sich in solchen Fällen auch einfach selbst das Rect definieren und so definieren das man eben an die gewünschten Bits einfach ran kommt.

himitsu 29. Okt 2007 20:34

Re: Int64 in Integer (High / Low) wandeln?
 
Zitat:

Zitat von SirThornberry
man kann sich in solchen Fällen auch einfach selbst das Rect definieren ...

wozu?

die Typen Int64Rec und auch LARGE_INTEGER sind doch schon definiert :zwinker:



mir gefällt auch sowas ... die Nutzungsweise sollte sich ja eigentlich selbst erklären :angel:
Delphi-Quellcode:
var Size: LARGE_INTEGER;


Alle Zeitangaben in WEZ +1. Es ist jetzt 10:32 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 by Thomas Breitkreuz