Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Создание графиков в Excel'e


stfu ©   (2006-09-18 14:40:00) 

Здравствуйте ! Не подскажите как можно создать график в excel'e из приложения в Делфи по нажатию button'a ?
Данные берутся из того же самого xls куда нужно вставить график.


pavel_guzhanov   (2006-09-20 11:43:00) [1]

Так же... только не создавай новый файл, а открывай уже существующий
m_XLApp:=CreateOleObject('Excel.Application');
m_XLApp.WorkBooks.Open(GetCurrentDir+'\Blank.xls');


stfu   (2006-09-20 10:44:00) [2]

Спасибо за ответ.. ))

Может кто знает как можно вставить график в уже созданный файл xls ?


pavel_guzhanov   (2006-09-18 16:38:00) [3]

Я делал вот так:

  // Запуск Excel
   m_XLApp:=CreateOleObject('Excel.Application');
   m_XLApp.Visible:=true;
   m_XLApp.Workbooks.Add(-4167);
   m_XLApp.Workbooks[1].Worksheets[1].Name:='Отчет';
   // добавляем в книгу диаграмму
   Chart:=m_XLApp.Workbooks[1].Charts.Add;
   // устанавливаем вид диаграмы
   Chart.ChartType:=xlLineMarkers;
   // данные для диаграммы берем из 1-й строки
   Chart.SetSourceData(Sheet.Range['A:A'], xlColumns);
   // по оси Х пишем данные из 2-й строки
   Chart.SeriesCollection(1).XValues := '=Отчет!C2';
   // разрешаем заголовок диаграммы
   Chart.HasTitle:=True;


Наверх

Титульная страница Поиск, карта сайта Написать письмо