Pointer vergleichen

[Flips]

Hi.

Habe folgendes Problem. Hier erst mal ein Codeschnipsel zur Übersicht:

Delphi-Quellcode:

type
  PRGBTripleArray = ^TRGBTripleArray;
  TRGBTripleArray = array [0..50000000] of TRGBTriple;

[...]

var x:integer;
    P1,P2:PRGBTripleArray;

for x := 0 to Image1.Height -1 do
  begin
    P1 := Image1.ScanLine[x];
    P2 := Image2.ScanLine[x];
   [...]
  end;

Also, ich möchte zwei Pointer vergleichen. Habe gedacht ich mache es über

Delphi-Quellcode:

if P1 <> P2 then
  [...]

aber das klappt nicht (selbst wenn sie nicht unterschiedlich sind ist es true. Vielleicht liegt das ja auch an meiner Art und Weise, wenn ja dann bitte ich um Hilfe

Als zweite Möglichkeit dachte ich mir die CompareMem Funktion, aber hier weiß ich nicht genau was ich als 3. Parameter angeben muss. Dachte eigentlich sowas wie
sizeOf(P1); Aber dem war nicht so...Denn wenn man sich die Größe ausgeben lässt dann kommt 4 heraus. Und das Array ist wohl deutlich größer als 4...

Also, wie vergleiche ich die Pointer richtig?

Enjoy, Flips

[Thorben77]

'Ne Verständnisfrage:
Wilst Du vergleichen, ob die Zeiger auf das selbe Array zeigen, oder ob die Arrays auf die sie zeigen die gleichen Werte enthalten?

[Flips]

Hi.
Ob die Arrays die gleichen Werte enthalten.
Bin heute nicht mehr da, aber bitte trotzdem um Antwort(en)

[brechi]

Musst du eine weitere schleife nehmen oder

CompareMem(p1,p2,Image1.Canvas.Width*SizeOf(TRGBTr iple))

[Flips]

Genial. wäre ich nie drauf gekommen. DANKE
(Hast gerade eine Jufo-Arbeit unterstützt )