Large Integer? Welcher Typ in Delphi

[himitsu]

Short = 8 Bit
Small = 16 Bit
Long = 32 Bit
Large = 64 Bit

... is ja eigntlich recht einfach.

Aus solchen Gründen hatte ich mir mal diese Unit zusammengebastelt.
Wird bei anderen zwar nicht laufen (es sei den ihr löscht einiges daraus),
aber die Typendefinitionen (bis 64 Bit) sollten bei den meisten funktinieren.

[Muetze1]

Zitat von Popov:

Auf die Gefahr jetzt Unsinn zu schreiben, hier mal eine Info. Mit Integer (Typ) wirst du schon auf der richtigen Seite stehen, denn bei Delphi ändert sich der Typ Integer vom System zu System. Bei 8 Bit hat Integer eine andere Größe als bei 16 Bit (z.B. Windows 3.11). Bei 32 Bit (ab Windows 95) hat Integer auch 32 Bit. Bei 64 Bit Systemen (jetzt wette ich mal) hat Integer 64 Bit. Der Typ Integer paßt sich also an. Oft findet man noch in alten Quellcodes LongInt. Das ist wichtig bei Systemen < 32 Bit. Bei 32 Bit Systemen ist LongInt genauso groß wie bei Integer. Bei alten 16 Bit Systemen dagegen größer.

Das hängt nicht von dem System ab sondern von deinem Compiler. Es ist ja nun nicht so, dass dein Delphi Programm mit Integer auf einem XP64 oder Vista 64 Bit gestartet auf einmal 64 Bit grosse Integer hat...

[Popov]

Zitat von Muetze1:

Das hängt nicht von dem System ab sondern von deinem Compiler. Es ist ja nun nicht so, dass dein Delphi Programm mit Integer auf einem XP64 oder Vista 64 Bit gestartet auf einmal 64 Bit grosse Integer hat...

Jup, war auch so gemeint, hab mich nur allgemein ausgedrückt. Dachte, daß es logisch ist.

[himitsu]

@Popov: wir wissen es, aber am Ende spricht deinen Satz jeder Noob nach
... so entstehen viele falsche Überlieferung.

[Popov]

Zitat von himitsu:

@Popov: wir wissen es, aber am Ende spricht deinen Satz jeder Noob nach
... so entstehen viele falsche Überlieferung.

Du misst so einem Beitrag zu viel Bedeutung bei. Theoretisch besteht die Möglichkeit, daß das einer wirklich falsch versteht und versucht mit seinem Delphi 1 32 Bit Programme zu schrieben, aber irgendwann merkt er es. Und sollte er es falsch verstanden haben und es irgendwo wiedergeben, wird er drauf aufmerksam gemacht. Also glaube nicht, daß hier eine Katastrophe möglich wäre. Ich hab sogar einen gebeten bei Arbeiten mit Objekten diese mit try finally zu sichern. Er antwortete mir, daß er auf try finally scheißt und ich ihn nicht mit sowas belästigen, sondern nur seine Fragen beantworten soll. An einer anderen Stelle hatte ich einen Streit mit einigen Programmierern, daß die Ini, wenn sie schon genommen wird, nicht in das Programmverzeichnis gehört, sondern in den Anwendungsdatenordner. Ich wurde als Idiot beschimpft der sich nicht in fremde Angelegenheiten einmischen soll und jedem Programmierer überlassen soll wo er seine Ini speichert. Wobei von den Leuten der Programmordner favorisiert worden ist. Foren sind voll mit falschen Informationen, also keine Panik wegen einem Beitrag den ein Nob falsch verstehen könnte.

[richard_boderich]

In der MSDN habe ich jetzt noch dies gefunden.

Delphi-Quellcode:

typedef union _LARGE_INTEGER {  
struct {  
  DWORD LowPart; 
  LONG HighPart;  
}; 

struct { 
  DWORD LowPart;  
  LONG HighPart;  
} u;
  LONGLONG QuadPart;
} 

LARGE_INTEGER,  *PLARGE_INTEGER;

Das sieht mir aber so aus als wäre das in Delphi eher ein Record mit den einzelnen Typen als ein Int64???? Bitte schreibt mal eure
Meinung dazu.

mfG Richard

[mkinzler]

Sollte doch das Selbe sein.

[OregonGhost]

Das ist eine union. Du kannst wahlweise auf low- und high-Part einzeln zugreifen oder auf den LONGLONG, der auf x86 normalerweise ein Int64 ist. Die Struktur belegt praktischerweise genausoviel Platz wie ein Int64 und kann damit im weitesten Sinne gleichbehandelt werden. Du kannst also ruhig Int64 verwenden.

[Muetze1]

Equivalent zu der Union: Int64Rec aus der SysUtils.

[richard_boderich]

@All
Also ich komme hier einfach nicht weiter. Habe mal mein Demoproject angehängt. Ich möchte die Lastwritetime eines RegistryKeys ermitteln. Die Api
funktioniert auch, wie man an dem Keynamen und der Länge sehen kann. Die Keylänge ist ja immer doppelt so groß, wie die Stringlänge, da Unicode (2 Byte -> 1 Char)
Ich hoffe jemand kann mir hier helfen, da ich nun schon fast Zwei Tage an diesem Mist sitze. Die MSDN zitiere ich mittlerweile schon im Schlaf und meine Frau mault
mich auch schon voll, weil sie mich net mehr zu Gesicht bekommt.

Es geht übrigens um diese Strucktur

KEY_BASIC_INFORMATION
The KEY_BASIC_INFORMATION structure defines a subset of the full information that is available for a registry key.

typedef struct _KEY_BASIC_INFORMATION {
LARGE_INTEGER LastWriteTime;
ULONG TitleIndex;
ULONG NameLength;
WCHAR Name[1]; // Variable-length string
} KEY_BASIC_INFORMATION, *PKEY_BASIC_INFORMATION;

mfG Richard