On 03 Dec 2012, at 11:13, Michael Van Canneyt wrote:

On Mon, 3 Dec 2012, ik wrote:

var
s : AnsiString;
l : word;

begin
SetLength(s, 1024);
FillChar(s, 1024, '*');

You are overwriting the pointer. S is (behind the scenes) a pointer to a memory area. You should do FillChar(s[1], 1024, '*');

Or use http://www.freepascal.org/docs-html/rtl/system/stringofchar.html


Jonas
_______________________________________________
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal

Reply via email to