dynamisches Array, wo wird die Länge gespeichert ?

**hoika**

Hallo #,

wo speiuchert Delphi intern die Länge eines dyn. Arrays ?

Bsp.

Delphi-Quellcode:

			var

  a: array of Byte;

bgin

  SetLength(a,100);

Ich möchte nicht wissen, dass ch mit Length(a) die Länge ermitteln kann,
sondern wie Delphi das intern macht.

Ich habe hier ein Problem mit einem DLL-Aufruf,
wie ein Speicherbereich benötigt wird.
Das kann ist mit einem dyn. Array (array of Byte) gemacht worden.

Am Ende der Prozedur meckert FastMM4, dass der Speicherblock korrupt ist.

Vor dem Umbau auf PChar würde ich schon gern wissen,
wie weit die DLL hier Mist macht.

PS:
Dass es die DLL ist ist eine Vermutung (ct_api),
bei allen anderen ctapi-DLL's klappt alles.

Danke

Heiko

**Medium**

Die steht in den 4 Bytes (als Integer) vor der Adresse vom ersten Arrayelement. Length := PInteger(Integer(@MyArray[0])-4)^; (ungetestet)

**himitsu**

siehe Unit System:

markieren

Delphi-Quellcode:

			{ Dynamic array helper functions }

procedure _DynArrayHigh;

procedure _DynArrayClear(var a: Pointer; typeInfo: Pointer);

procedure _DynArrayLength;

procedure _DynArraySetLength;

procedure _DynArrayCopy(a: Pointer; typeInfo: Pointer; var Result: Pointer);

procedure _DynArrayCopyRange(a: Pointer; typeInfo: Pointer; index, count : Integer; var Result: Pointer);

procedure _DynArrayAsg;

procedure _DynArrayAddRef;

Die dyn. Array-Variable ist ein Zeiger auf den Anfang der enthaltenen Daten

markieren

Delphi-Quellcode:

			record

  refCount: Integer

  length: Integer

  data: array[0..x] of ...;

end;

P := @data[0];

Wobei es egal ist, wie ein dyn. Array verwaltet wird.
- dynamische Arrays, Strings und Objekte sollten nicht über DLL-Grenzen hinweg verwaltet werden. (abgesehn BPLs sind im Spiel)
- SetLength macht selber nichts kaputt

Wenn, dann hat du wo Anders ein Problem.

dynamisches Array, wo wird die Länge gespeichert ?

dynamisches Array, wo wird die Länge gespeichert ?

AW: dynamisches Array, wo wird die Länge gespeichert ?

AW: dynamisches Array, wo wird die Länge gespeichert ?

Forumregeln

Medium Registriert seit: 23. Jan 2008 3.679 Beiträge Delphi 2007 Enterprise	#2 AW: dynamisches Array, wo wird die Länge gespeichert ? 17. Feb 2012, 11:51 Die steht in den 4 Bytes (als Integer) vor der Adresse vom ersten Arrayelement. Length := PInteger(Integer(@MyArray[0])-4)^; (ungetestet) "When one person suffers from a delusion, it is called insanity. When a million people suffer from a delusion, it is called religion." (Richard Dawkins)
	Zitat