Código Delphi [-] PChar(p):=PChar(p)+1;
PChar(p):=PChar(p)+1;
Código Delphi [-] PAnsiChar(p):=PAnsiChar(p)+1;
PAnsiChar(p):=PAnsiChar(p)+1;