thisform.lockscreen = .t.	    && this one does not (noticeably) save time, but the view is better
>
>lnN = 0
>
>with thisform.oCntPZChart
>	for each loO in .objects
>		wait window m.lcC + padl( m.lnN, 4, '0' ) nowait
>		lnN = m.lnN + 1
>		.removeobject( m.loO.name )
>	next
>endwith
>with thisform.oCntPage1
>	for each loO in .objects
>		wait window m.lcC + padl( m.lnN, 4, '0' ) nowait
>		lnN = m.lnN + 1
>		.removeobject( m.loO.name )
>	next
>endwith