<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=Content-Type content="text/html; charset=iso-8859-1">
<META content="MSHTML 6.00.2900.2769" name=GENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY bgColor=#ffffff>
<DIV><FONT face=Arial size=2><FONT face="Times New Roman" size=3>Somebody can
help me.<BR>I do not understand, that I am making bad. <BR>The program is:
<BR><BR>Program ProbandoMemoria;<BR>{$R+}<BR>Var <BR> PLPunteros:
^Pointer;<BR> NuevoTamanio : integer;<BR> elementos :
longint;<BR> x,b : ^integer;<BR>Begin <BR>
elementos := 3;<BR> NuevoTamanio:=Sizeof(Pointer)*elementos;<BR>
ReallocMem(PlPunteros,NuevoTamanio);<BR> Writeln('Direccion :
',longint(Plpunteros) );<BR> new(x);<BR> x^:=7;<BR>
Plpunteros^:=x;<BR> b:=Plpunteros^; <BR> Writeln('Direccion :
',longint(b),' valor : ',b^); <BR> new(x);<BR>
x^:=15;<BR> (Plpunteros+4)^:=x;<BR>
b:=(Plpunteros+4)^; <BR> Writeln('Direccion :
',longint(b),' valor : ',b^); <BR> new(x);<BR>
x^:=25;<BR> (Plpunteros+8)^:=x;<BR> b:=(Plpunteros+8)^;
<BR> Writeln('Direccion : ',longint(b),' valor : ',b^);
<BR><BR>//This I do not understand.<BR>//Why ' b^ ' does not have the
7?<BR><BR> b:=nil; <BR> b:=PlPunteros^;<BR> Writeln('Direccion
: ',longint(b),' valor : ',b^);<BR> Readln;<BR>End.<BR><BR>The result
is:<BR><BR>Direccion : 604444<BR>Direccion : 604460 valor : 7<BR>Direccion :
604476 valor : 15<BR>Direccion : 604492 valor : 25<BR>Direccion : 604460 valor :
604476<BR><BR>Thanks.</FONT><BR></FONT></DIV>
<DIV><FONT face=Arial size=2>Att.</FONT></DIV>
<DIV><FONT face=Arial size=2>Luis Del Aguila<BR><BR></DIV></FONT></BODY></HTML>