Forum: Neuen Beitrag zur Code-Library hinzufügen
Delphi
by Zacherl,
26. Apr 2012
Ich verweise hier nochmal auf das Alignment bzw. die Enum Typ Größe. Mit den entsprechenden Compiler Switches funktionieren bei mir folgende Varianten problemlos:
var
ReturnLength: ULONG;
begin
// Deklaration als PULONG
NtQueryObject(x, x, x, x, @ReturnLength);
// Deklaration als var ULONG
NtQueryObject(x, x, x, x, ReturnLength);
Ich kann mich irren, aber soweit ich weiß,...
Forum: Neuen Beitrag zur Code-Library hinzufügen
Delphi
by Zacherl,
26. Apr 2012
Selbstverständlich funktioniert er mit validen File Handles unter XE2 wunderbar, sonst hätte ich den Code kaum gepostet.
Es grenzt schon stark an Unverschämtheit mit sowas (noch dazu ohne Beweise) zu unterstellen. :roll: Lediglich die Funktion zum Ermitteln der korrekten Partitionsbuchstaben habe ich aus einer vorhandenen C-Source portiert. Ich bin so freundlich und teile bestimmte...
Forum: Neuen Beitrag zur Code-Library hinzufügen
Delphi
by Zacherl,
24. Apr 2012
Hallo zusammen,
folgende Funktion liefert den vollständigen Namen einer Datei oder eines Verzeichnisses anhand eines Handles.
const
STATUS_SUCCESS = NTSTATUS($00000000);
STATUS_INVALID_PARAMETER = NTSTATUS($C000000D);
STATUS_INFO_LENGTH_MISMATCH = NTSTATUS($C0000004);
type
NTSTATUS = ULONG;