*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 ?