Александр Шабля
дата публикации 16-01-2004 14:50 Пример построения графика в Excel
Excel имеет мощное средство для построения графиков, а
разобраться, как это сделать из Delphi порой довольно сложно. Хоть и
есть так называемая "запись макроса", но это не всегда помогает, т.к.
в библиотеке типов и в макросе VB есть существенные отличия. Если кто
не верит и думает, что стоит лишь "заменить кавычки и поставить точку
с запятой" пусть попробует и убедится в этом сам.
- График строится полностью через OLE. Данный вопрос уже обсуждался на КС.
- В примере представлены две "разновидности" графика: в отдельном листе и "внедренный" на лист с данными.
Внимание!
При "внедрении" обязательно нужно получить новый объект
AChart := AChart.Location(xlLocationAsObject, ASheet.Name)
иначе работать не будет, т.к. "внедренный" график - это уже новый объект.
Вторым параметром в функции Location необходимо указать имя листа, в
который этот график будет вставлен.
Источником данных для графика служит таблица, набранная в Access'е.
Данные из DataSet'а переносятся в новую книгу Excel'я и на их основе
строится график. Данный пример не претендует на универсальность, а
представлен для ознакомления с возможностями использования объекта
Chart в Excel'е. Все значения для примера взяты "с потолка".
Генератором случайных чисел был я сам :)
Тестировалось на Delphi 7, MS OfficeXP. Но, думаю, что на Delphi 6 и
Office2000 будет работать (не было возможности проверить). Для доступа
к Excel'ю использовалось "раннее" связывание и библиотека типов
Excel2000.pas из стандартной поставки Delphi ($(DELPHI)\Imports).
Александр Шабля (aka Shabal)
Специально для Королевства Delphi
Примечание:
Для работы в Delphi 5 в модуле Unit1.pas нужно убрать из секции uses объявление модуля Variants.
К материалу прилагаются файлы:
[Диаграммы]
 Обсуждение материала нет сообщений | 
