Array[0..0] Speicherreservieren

[Alter Mann]

Hallo,

die Idee mit GetMem ist nicht schlecht, nur, ich kann den Record nicht ändern!
"Fehlermeldung: Inkompatible Typen"

[Neutral General]

Also wenn du das Rekord nicht ändern kannst und ich nicht gerade aufm Schlauch stehe, dann glaube ich nicht, dass du da irgendwas machen kannst...

PS: Ein GetMem mit einem Nicht-Pointer-Typ funktioniert natürlich nicht (Inkompatible Typen)

[Alter Mann]

Zitat:

ich nicht gerade aufm Schlauch stehe

Das wollen wir doch mal nicht hoffen

Hintergrund ist IOCTL_DISK_GET_DRIVE_LAYOUT vielleicht fällt da der Groschen?

Das, das ein Thema für sich ist, ist mir klar aber es muss doch eine Alternative zu diesem
C-Code geben:

Code:

DWORD junk;
BOOL bResult;

DWORD nPartitions = 16;
DWORD nBufferSize = sizeof(DRIVE_LAYOUT_INFORMATION) + nPartitions * sizeof(PARTITION_INFORMATION);

DRIVE_LAYOUT_INFORMATION* pDLI =
(DRIVE_LAYOUT_INFORMATION*)malloc(sizeof(DRIVE_LAYOUT_INFORMATION) + nPartitions * sizeof(PARTITION_INFORMATION));  // <- wie in Delphi?

bResult = DeviceIoControl(hDevice,
IOCTL_DISK_GET_DRIVE_LAYOUT,
NULL,
0,
pDLI,
nBufferSize,
&junk,
NULL);

Wie geschrieben es geht hier nicht um IOCTL_DISK_GET_DRIVE_LAYOUT sondern um die Speicherreservierung.

[Neutral General]

So:

Delphi-Quellcode:

var D: ^DLI;
begin
  GetMem(D,SizeOf(DLI) + 15*SizeOf(PI));
end;

@himitsu (über mir): GetMem ist eine Procedure mit 2 Parametern. Du meinst wahrscheinlich GetMemory

[SirThornberry]

Warum kannst du den RecordTyp nicht ändern? Wer zwingt dich beim Aufruf die nicht funktionierende Variante zu verwenden? Wer hindert dich daran das Array einfach groß genug zu definieren?

[mkinzler]

Oder halt einen dynamischen Array zu verwenden

[Neutral General]

Zitat von mkinzler:

Oder halt einen dynamischen Array zu verwenden

Damit wird die API nicht klarkommen, weil dynamische Arrays anders aufgebaut sind.
(Sind ja nur Pointer und hier werden ja direkt im Record mehrere hintereinanderliegende Strukturen erwartet)

[himitsu]

Diese nichtfunktionierende Variante ist ein Versuch einer direkten Übersetzung der C-Header von Microsoft.

Dort kann man statische Arrays mit [0]-Länge deklarieren.
(leider kennt Delphi sowas nicht, so daß man sich über den Sonderfall von [0..0] das Array mit einem Feld und ohne Bereichsprüfung zu nutzen)
In den C-Vorlangen wird dann ebenfalls so gearbeitet, wie in meinem Beispiel.

Aber wie gesagt, ich mochte diese Arrays auch nicht und hab das mit selbstdeklariert, womit ich mir dan die Resourcenschutzblöcke und einen Großteil der Speicherverwaltung erspart hab.
(man darf auch mal Faul sein )

[edit]
OK, hier gibt es sogar mal ein [1]-Array im Original-Header
http://msdn.microsoft.com/en-us/library/aa364001.aspx
(es ist also eine fast 1:1-Übersetzung)

[Alter Mann]

Hallo

und danke an alle, damit geht es:

Delphi-Quellcode:

var D: ^DLI;
begin
  GetMem(D,SizeOf(DLI) + 15*SizeOf(PI));
end;

Die Thematik IOCTL_DISK_GET_DRIVE_LAYOUT kommt gesondert.

Danke bis zum 17.

[Alter Mann]

@himitsu

genau, nur das ich DRIVE_LAYOUT_INFORMATION_EX nicht verwenden darf; W2K lässt grüßen.