SET LIBRARY TO HOME()+'foxtools.fll' ADDITIVE
lnBPP = 24 
loBmp = NEWOBJECT("BMPMaker","Obj2bmp.vcx")
loBmp.cFileName = 'MyChart.bmp' 
WITH ThisForm.oChart
 loBmp.MakeBitmap( _WhToHwnd( _WonTop() ), lnBPP, ;
  .top + sysmetric( 9 ) + sysmetric( 4 ), .left + sysmetric( 3 ), .height, .width )
ENDWITH