Delphi-Quellcode:
procedure Egal;
var
Buff1: Array[0..4] of Char;
Buff2: Array[0..8] of Char;
res: PInteger;
begin
res := PInteger(@Buff1[12]);
res^ := res^ + 10;
end;
So sähe die komplette Pascal-Übersetzung aus.
Allerdings muss das Ganze nicht klappen (sofern es überhaupt einen Sinn hat): denn wo @Buff1[12] landet wenn das Array selbst nur 5 Zeichen lang ist, ist reiner Zufall.
@sniper_w: nein