Deutsches Lazarusforum

Danke! Habe alles verstanden!

var
i, j: Integer;
p1: ^Integer;
p2: Pointer;
begin
i := 1;

{ typisiert }

p1 := @i; // dem Zeiger wird die Adresse der Integer-Variable übergeben
p1^ := p1^ + 1; // hier wird der Wert um eins erhöht
j := p1^; // typisiert: der Variable j wird 2 übergeben

{ untypisiert }

p2 := @i ...