Показать сообщение отдельно
  #3  
Старый 06.12.2007, 21:16
~ SaM ~ ~ SaM ~ вне форума
Начинающий
 
Регистрация: 05.01.2007
Адрес: Днепропетровск
Сообщения: 141
Репутация: 25
По умолчанию

В принципе есть еще очень интересные вещи:
наклон диаграммы:
Код:
ElevationChart(ChartName,SpinEdit1.Value);
поворот диаграммы:
Код:
RotationChart(ChartName,SpinEdit2.Value);
шрифт элемента:
Код:
if not FontDialog1.Execute then exit;
FontLegendEntries(ChartName,1,FontDialog1.Font);
Код:
AxisChart(ChartName,'Ось категорий','Ось значений','Ось ряда');

Стены:
Код:
//цвет и стиль рамки
BorderWalls(ChartName,rgb(100,200,250),xlDashDot,xlThin);

//цвет и стиль области
BrushWalls(ChartName,rgb(80,230,100),xlPatternCrissCross,rgb(210,80,150));

//рисунок области
GetDir(0,dir_);
if not OpenPictureDialog1.Execute then begin ChDir(dir_); exit; end;
ChDir(dir_);
BrushWallsFromFile(ChartName,OpenPictureDialog1.FileName);

Мдяяяя....че-т я написал больше, чем ты просил!

P.S. Эксперементируй, читай доки по работе с Office приложениями и будешь доволен своими результатами!!!
Ответить с цитированием