Código Delphi [-] if assigned(p[i]) then // accedo con total alegria a p[i]
if assigned(p[i]) then // accedo con total alegria a p[i]