![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
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 в Оффисе.