>*Form.init >THIS.LockScreen = .T. >#DEFINE TAB CHR(9) >#DEFINE CRLF CHR(13)+CHR(10) >THIS.LockScreen = .T. >M.CGDATA = "" >for ix=1 to 100 > m.cgdata = m.cgdata+TAB+"val"+str(ix) >endfor >m.cgdata = m.cgdata +crlf+"Value" >for ix=1 to 100 > m.cgdata = m.cgdata+TAB+str(ix) >endfor >m.cgdata = m.cgdata +crlf+"Value1" >for ix=1 to 100 > m.cgdata = m.cgdata+TAB+str(ix*1.5) >endfor >create cursor foo1 (gen1 g) >append blank >append general gen1 class "msgraph.chart" DATA M.CGData >this.addobject("OleBoundControl1","OleBoundControl") >THIS.OleBoundControl1.height = this.height - 2 >THIS.OleBoundControl1.width = this.width - 2 >THIS.OleBoundControl1.top = 1 >THIS.OleBoundControl1.left= 1 >THIS.OleBoundControl1.ControlSource = "Gen1" >THIS.OleBoundControl1.HasLegend = .t. >THIS.OleBoundControl1.autoformat(1, 1) >THIS.LockScreen = .F. >>If Olegraph has an option to print then you could call it too :
>thisform.Olegraph.fileprint()
>
>What is the OLE source ?