Это мне и надо !!!!
------------------
Вчера я нарыл это :
var
XL, XArr: Variant;
-----------
XL:=CreateOLEObject('Excel.Application'); // Создание OLE объекта
XL.WorkBooks.add; // создает книгу
XArr:=XL.Charts.add; // создает в книге пустую диаграму и берет на ее ссылку
// XArr.SetSourceData(Source:=Form1.Chart1. ???????, PlotBy:=xlColumns); // Здесь не проходит