Hi stephane,

I got the same results. I'm also wondering where the performance difference is. For this case VFP7 SP1 is the clear winner.

Walter,



>I heard the VFP 8 object creation was much faster then VFP7, which objects ? i run this in VFP7(SP1) and then in VFP8(RTM) and VFP7 is a bit faster. Can anyone confirm?
>
>

>Local x,i,a
>Local array laClasses(1)
>If File("VFPTest.dbf")
>	USE VFPTest
>Else
>	Create Table VFPTest(ClassName C(20), Time7 N(12,4), Time8 N(12,4) )
>EndIf
>Local ox as
>x="Session,line,container,commandbutton,custom,textBox,Spinner,Shape"
>x=Strtran(x, ",", chr(13) )
>ALines(laClasses, x)
>
>For i = 1 to Alen(laClasses,1)
>
>	n=Seconds()
>	For a = 1 to 10000
>		ox = CreateObject(laClasses(i))
>		ox = NULL
>	EndFor
>	? laClasses(i) + " Class: " + Transform(Seconds() -n)
>	Locate For ClassName = laClasses(i)
>	If Found()
>		If Val(_Vfp.Version) = 8
>			Update VFPTest Set Time8 = Evaluate("Seconds() -n") Where ClassName = laClasses(i)
>		Else
>			Update VFPTest Set Time7 = Evaluate("Seconds() -n") Where ClassName = laClasses(i)
>		EndIf
>	Else
>		If Val(_Vfp.Version) = 8
>			Insert Into VFPTest (ClassName, Time7, Time8 ) Values ;
>				( LaClasses(i), 0, Seconds() - n)
>		Else
>			Insert Into VFPTest (ClassName, Time7, Time8 ) Values ;
>				( LaClasses(i), Seconds() - n, 0)
>		Endif		
>	Endif		
>
>
>EndFor
>
>Browse
>