Speicher reallokieren

[Phoenix]

Hi,

ich steh grad auf dem Schlauch was das neuallokieren von Speicher angeht:

Beispiel:

Delphi-Quellcode:

procedure Test;
var
   myTest: PByteArray;
begin
   GetMem(myTest,15);
   
   // was muss ich machen, um noch 10 Bytes mehr zu dem bereits allokierten
   // Speicher dazu zu bekommen?
   
   FreeMem(myTest,25);
end;

[Delphianer]

Versuchs mal mit ReallocMem.

Grüße

[Phoenix]

Hab grad festgestellt, das das so gar nicht klappen kann

Weil:
Die Deklaration von PByteArray:

Delphi-Quellcode:

  PByteArray = ^TByteArray;
  TByteArray = array[0..32767] of Byte;

Demnach hat ein PByteArray^ immer eine Länge von 32768 byte, dann kann man reallokieren wollen wie man möchte.

Lösung:

Delphi-Quellcode:

  MyByteArray = array of byte;
  PMyByteArray = ^MyByteArray;

Vorteil bei PMyByteArray: Ich allokiere ihn mit GetMem, kann dann aber mit Length und SetLength wie mit einem regulären Array arbeiten und auch eine neue Größe zuordnen, was bei PByteArray dank der konstanten Länge nicht funzt.

[Motzi]

Zitat von Phoenix:

Hab grad festgestellt, das das so gar nicht klappen kann

Weil:
Die Deklaration von PByteArray:

Delphi-Quellcode:

  PByteArray = ^TByteArray;
  TByteArray = array[0..32767] of Byte;

Demnach hat ein PByteArray^ immer eine Länge von 32768 byte, dann kann man reallokieren wollen wie man möchte.

Nein... wenn du nur 15 Bytes reservierst, dann hat dein Array auch nur 15 Bytes auf die du zugreifen kannst, egal wie TByteArray jetzt deklariert ist! Durch das dereferenzieren des Pointers simulierst du zwar praktisch einen Zugriff auf ein Array mit konstanter Länge von 32767 Bytes, aber wie lang das Array jetzt wirklich ist (also wieviel reservierter Speicherplatz dahinter steckt), das kommt nur darauf an wieviel zu alloziert hast!

BTW: ein dyn. Array ist bereits nur ein Pointer der implizit dereferenziert wird, einen Pointer auf ein dyn. Array zu deklarieren ist also irgendwie "doppeltgemoppelt"!