<HTML><HEAD></HEAD>
<BODY dir=ltr>
<DIV dir=ltr>
<DIV style="FONT-FAMILY: 'Arial'; COLOR: #000000; FONT-SIZE: 10pt">
<DIV>Hi, I have two questions about PChar.</DIV>
<DIV> </DIV>
<DIV>Why Reallocmem function does not work with PChar?</DIV>
<DIV>How to increase the size of PChar without using Strings unit?</DIV>
<DIV> </DIV>
<DIV>Thanks.</DIV>
<DIV> </DIV>
<DIV>{$codepage utf8}</DIV>
<DIV>Var a:Pchar;</DIV>
<DIV> i:byte;</DIV>
<DIV>Begin</DIV>
<DIV>ReturnNilIfGrowHeapFails:=true;</DIV>
<DIV>a:='xxxxxxxxx';</DIV>
<DIV>for i:=0 to 9 do Writeln('[',i,']',a[i]);</DIV>
<DIV>Writeln('-------');</DIV>
<DIV>Reallocmem(a,20); //ko </DIV>
<DIV>End.</DIV></DIV></DIV></BODY></HTML>