¿Cómo utilizar punteros en Delphi?

Definir variables

p: puntero;

s: cadena;

Inicio

s:= 'ABC';

p:= PChar(s); //Asigna un valor al puntero

p:=Pointer(integer(p) 1); //Mueve el puntero un bit hacia atrás.

Descripción: = string(char(p^)); //Lee el contenido del puntero en movimiento.

Fin;