La Web del Programador: Comunidad de Programadores
 
https://www.lawebdelprogramador.com/preguntas/

    Pregunta:  1014 - PASAR VALORES DE UNA TABLA A MICROSOFT GRAPH
Autor:  Enrique
Lo que deseo es pasar los valores de mi tabla a Microsoft Graph por medio de programación sin usar el asistente y poder mostrarlos en un formulario espero su ayuda me es muy urgente gracias si me pueden mandar un ejemplo se los agradecere más.

Esto es en Visual Foxpro 6.0

  Respuesta:  Coco
Te paso un ejemplo:
Debes crear un Objeto OleBoundControl, como ejemplo esto va en el Init
#DEFINE CRLF CHR(13)+CHR(10)
#DEFINE TAB CHR(9)
SET SAFETY OFF
create table foo (gen1 g)
SET SAFETY ON
append blank
cGData = ""+TAB+"Gatos"+TAB+"Perros"+CRLF+;
"1994"+TAB+"11"+TAB+"22"+CRLF+;
"1995"+TAB+"33"+TAB+"44"+CRLF+;
"1996"+TAB+"55"+TAB+"55"+CRLF
THIS.LockScreen = .T.
append general gen1 class "msgraph.chart" DATA m.cGData
THIS.OleBoundControl1.ControlSource = "Gen1"
THIS.OleBoundControl1.HasLegend = .F.
THIS.OleBoundControl1.autoformat(11,1)
THIS.LockScreen = .F.
luego puedes poner botones que te activen la leyenda, por ejemplo:
THIS.OleBoundControl1.HasLegend = !THIS.OleBoundControl1.HasLegend
etc, en el caso del ejemplo, puedes reemplazar los valores por los campos de tu archivo, con esto puedes practicar.

Saludos