Использование компонентов Microsoft Office в приложениях. Часть 1
Листинг 2
Series := Chart.SeriesCollection.Add(0); With Series do Begin Caption := ‘1998’; SetData(chDimCategories,chDataLiteral, XValues); // Данные для оси Y - динамические SetData(chDimValues, chDataLiteral, VarArrayOf( [104737, 50952, 78128, 117797,52902, 80160, 47491, 62435] )); Type_ := chChartTypeColumnClustered; End;