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

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

Excel и графики [D7, WinXP]


twin ©   (2005-05-28 19:04:00) 

Уважаемые кодеры. Мой вам вопрос: Как программно начертить в Excel график?

Я делал так как указано ниже... но это все не то... Excel чертит две прямые...
Как можно указать в каком месте у меня X, а в каком Y?
Компонент, код? Может быть литература на которую есть ссылка?
Заранее спасибо...

Function  AddChart(var name:variant;ChartType:integer):boolean;
const xl3DArea=-4098;
begin
AddChart:=true;
try
name:=E.Charts.Add.Name;
E.Charts.Item[name].ChartType:=ChartType;
except
AddChart:=false;
end;
End;

// Координаты области данных диаграммы
Function  SetSourceData(Name,Sheet:variant;Range:string;XlRowCol:integer):boolean;
begin
SetSourceData:=true;
try
E.ActiveWorkbook.Charts.Item[name].SetSourceData(Source:=E.ActiveWorkbook.Sheets.Item[Sheet].Range[Range],PlotBy:=XlRowC ol);
except
SetSourceData:=false;
end;
End;

AddChart(ChartName,xl3DColumn);
SetSourceData(1,2,'A1:B1' + inttostr(SG.RowCount),xlColumns);
SetChartType(ChartName,15+51);


френк   (2005-05-29 17:48:00) [1]

Вроде бы так:

Это свойства любого чарта:

NewSeries (новыя ряд)
Series(index).Value  (работа с рядом, указание range для У)
Series(index).XValue (работа с рядом, указание range для Х)

остальное в справке...


twin   (2005-05-29 16:59:00) [2]

Мне никто не помог - значит не знаете как... )


twin   (2005-05-28 23:30:00) [3]

Посмотрел... Как указывать оси не нашел... Точнее нашел как задать sourcedata, но это задаёт лишь Y. Требуется отдельно задать столбец с X.


Cobalt   (2005-05-28 19:13:00) [4]

попробуй обратиться к справке по VisualBasic в Оффисе.


Наверх

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