Verständnisfrage zu Pascal und Pointer im dynamischen Array

[Namenloser]

Zitat von ATS3788:

Hallo
jetzt mache ich schon viele Jahre mit Delphi rum und immer wieder habe
das gleiche Problem.
Könnt mir jemand erklären warum *1 geht und wo die anderen Zeiger hinzeigen

Das einzig verwirrende daran ist, dass Write einen var -Parameter verwendet. Intern ist ein var-Parameter aber nichts anderes als ein Pointer (das ist auch der Grund, weshalb man bei var-Parametern den Typ weglassen kann). Für const gilt übrigens das gleiche, bloß dass der Compiler hier einen Schreibschutz enforciert.

Delphi-Quellcode:

procedure Write(var Buffer; Size: Cardinal);

...

procedure AndereFunktion;
var Buffer: array[255] of Byte;
begin
  Write(Buffer[0], SizeOf(Buffer));

Übersetzt der Compiler sozusagen in:

Delphi-Quellcode:

procedure Write(Buffer: Pointer; Size: Cardinal);

...

procedure AndereFunction;
var Buffer: array[255] of Byte;
begin
  Write(@Buffer[0], SizeOf(Buffer));

Man beachte das @.

Das zweite Ding ist jetzt, dass ein dynamisches Array intern auch ein Pointer ist, und zwar ein Pointer auf den Speicherbereich, wo die eigentlichen Daten des Arrays liegen. Deshalb klappt der Typecast auf Pointer.

Da der Compiler bei var-Parametern aber automatisch das @ ergänzt, muss vorher noch einmal mit ^ dereferenziert werden, weil es sonst „doppelt gemoppelt“ wäre. Das @ und das ^ kürzen sich quasi weg, und man hat wieder den rohen Pointer, den man haben will.

Also, um deine Eingangsfragen noch mal komplett zu beantworten:

Delphi-Quellcode:

/// Wo zeigt der Zeiger hierhin
Stream.Write(aResInfo , SizeOf(TIconResInfo) * count );

Wie gesagt, var-Parameter werden vom Compiler den Parameter automatisch in einen Pointer übersetzt, und bei allen Aufrufen wird automatisch ein @ ergänzt. @aResInfo ist der Pointer auf die lokale Variable aResInfo (die selber wiederum ein Pointer ist). Das heißt, er zeigt irgendwo auf den Stack.

Delphi-Quellcode:

//// oder hierhin
Stream.Write(Pointer(aResInfo) , SizeOf(TIconResInfo) * count );

Das ist wieder das gleiche. Der Typecast verändert die Adresse der Variablen ja nicht.