Deutsches Lazarusforum

Super, Danke vielmals!

Das wars! Da hat die IDE offenbar den bug.
Wenn ich die Werte vom Code augeben lasse stimmen sie alle.

mfg
Q

Ich hoffe du hast recht =)
Hier ist der Code:

-ich hab nen record
-eine Imagebox
-einen Pointer auf die Bild-Rohdaten der Imagebox im RAM
-der Pointer soll 100 bzw 50 mal in das Array im record kopiert werden

type
TIMGSet = packed record
Width, Height, SliceCount: integer;
PIMG_Array: Array ...

Hallo!

Ich versuche in ein Array of PWord 100 mal die gleiche Adresse zu schreiben.
Auf diese Adresse zeigt bereits der Pointer LPtt.

Problem:
Es wird nichts kopiert, das Array bekommt keine neuen Werte, aber warum?

var
LPtArray: Array of PWord;
LPtt: PWord;
i: integer;
begin
SetLength(LPtArray ...