Hallo Tommy,
ein pointer p braucht einen Basistyp, damit er mit Inc(p, 1) um die Größe seines Basistyps erhöht werden kann:
Delphi-Quellcode:
var
p: pointer;
begin
p := Pointer($12345678);
Inc(PInteger(p), 1);
ShowMessage(IntToHex(Integer(p), 8));
Inc(PByte(p), 1);
ShowMessage(IntToHex(Integer(p), 8));
end;
Guten Rutsch vom marabu