var
XL, XArr: Variant;
begin
// Идет процес создания графика на форме програмы
Form1.Chart1.Series[0].Clear;
Form1.Chart1.Series[0].AddXY(10, 100, '1', 1500);
Form1.Chart1.Series[0].AddXY(20, 1420, '2', 1500);
// ........................................
// XArr:=VarArrayCreate();
XL:=CreateOLEObject('Excel.Application'); // Создание OLE объекта
XL.WorkBooks.Add; // Создание книги
// ..............................................
// Далее нужно свой Chart с формы вставить в нужную область докумета
XL.Range['A1']:=(Вставить Chart ?); // Здесь должен быть метод вставки Charta в документ. Он может отличатся от Range['A1'] ?
XL.visible:=true;
end;