指针的指针

var
  pc: ^DWORD;
  c: DWORD;
  ppc: ^PDWORD;
begin
  c := 7833423;
  pc := @c;
  ppc := @pc;
  ShowMessage( IntToStr(PDWORD(ppc^)^) );