Also mein Problem liegt im Moment hauptsächlich bei GetMem^^
procedure GetMem(var P: Pointer; Size: Integer);
So ist das bei mir definiert. Und
Delphi-Quellcode:
DLI := GetMem(SizeOf(_DRIVE_LAYOUT_INFORMATION_EX)
+ SizeOf(_PARTITION_INFORMATION_EX) * 31);
funktioniert daher auch nicht so toll....
EDIT: Ja ok.. man muss es ander schreiben...
Delphi-Quellcode:
Size := SizeOf(_DRIVE_LAYOUT_INFORMATION_EX) + SizeOf(_PARTITION_INFORMATION_EX)*31;
GetMem(P,Size);
DeviceIoControl(H,IOCTL_DISK_GET_DRIVE_LAYOUT_EX,nil,0,P,Size,OutBytes,nil)
FreeMem(P);
Aber auf jeden Fall herzlichen Dank für die gute Hilfe
Gruß
Neutral General
EDIT: Oh man... Ich bekomme jetzt als P.PartitionCount 32 zurück..... Damit kann ich ja gar nix anfangen und P.ParitionEntry[0].PartitionNumber ist 288.. Kann das sein?
Michael
"Programmers talk about software development on weekends, vacations, and over meals not because they lack imagination,
but because their imagination reveals worlds that others cannot see."