<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META content="text/html; charset=utf-8" http-equiv=Content-Type>
<META name=GENERATOR content="MSHTML 8.00.6001.23588">
<STYLE></STYLE>
</HEAD>
<BODY bgColor=#ffffff>
<DIV><FONT size=2>
<P><FONT size=3>My results :</FONT></P>
<P><FONT size=3>_Ptr:=GetMem(100000000) 18
mus, 824 ns / GetMem<BR>_Ptr:=GetMem(100000000) + FillChar(_Ptr^,100000000,0));
81 ms / GetMem + FillChar</FONT></P>
<P><FONT size=3>var<BR> ArInt:array of int32;<BR>.<BR></FONT><FONT
size=3>SetLength(ArInt, 100000000 shr 2);
81 ms / SetLength</FONT></P>
<P><FONT size=3>All timings are variable within [time, time+8%] on repeated runs
as is generally the case for system timings.</FONT></P>
<P><FONT size=3>SetLength 0's (Internally calls FillChar) the array ArInt so to
do a identical comparison you need to add the FillChar to the GetMem if it is
your intention to 0 the array before using it.</FONT></P>
<P><FONT size=3>You have to compare things that do the same thing in the
end.</FONT></P>
<P><FONT size=3>Tested on XP Pro Win32 Sp3<BR>Intel Core 2CPU<BR>6400 #@
2.13GHz<BR>2.05 GHr., 1.00 Gb RAM</FONT></P></FONT></DIV></BODY></HTML>