On 10/05/2011 18:03, Felipe Monteiro de Carvalho wrote:
>
> Even commercial companies have difficulty following this model,
True. In general, commercial software have a much slower release cycle
compared to open-source software. There are many reasons for that, one
being that the open-source mode
On 07 May 2011, at 09:22, Jonas Maebe wrote:
> That's why that sort of stuff belongs on fpc-other rather than fpc-pascal.
> Everyone: please follow up there.
As you wish -
http://lists.freepascal.org/lists/fpc-other/2011-May/000597.html
___
fpc-pasc
Hi, I have two questions about PChar.
Why Reallocmem function does not work with PChar?
How to increase the size of PChar without using Strings unit?
Thanks.
{$codepage utf8}
Var a:Pchar;
i:byte;
Begin
ReturnNilIfGrowHeapFails:=true;
a:='x';
for i:=0 to 9 do Writeln('[',i,']',a[i]);
On Wed, 11 May 2011 08:31:02 -0500
Luis Fernando Del Aguila Mejía wrote:
> Hi, I have two questions about PChar.
>
> Why Reallocmem function does not work with PChar?
> How to increase the size of PChar without using Strings unit?
>
> Thanks.
>
> {$codepage utf8}
> Var a:Pchar;
> i:byte;
>
In addition to what Mattias has said,
the following works pretty well:
Program StrTest;
Var a:Pchar;
Begin
a:=PChar(nil);
Reallocmem(a,20); //ko
a[0] := 'A';
a[1] := 'n';
a[2] := 't';
a[3] := Chr(0);
WriteLn('Done: ', a);
End.
Anton
___
fpc-pascal mail
