Вниз
Скачать: CL | DM;

Экспорт TChart в Word   Найти похожие ветки 

← →
DelphiLexx ©   (2005-10-12 19:15) [0]

Как экспортировать график TChart"a в Word любой версии


← →
YurikGL ©   (2005-10-12 19:20) [1]

Рисунком.


← →
DelphiLexx ©   (2005-10-13 12:56) [2]


> Рисунком.

Пример кода можно...


← →
Kolan ©   (2005-10-13 14:18) [3]

FChart.SaveToBitmapFile(FileName);
А потм загружай в Word.


← →
DelphiLexx ©   (2005-10-13 14:58) [4]


> FChart.SaveToBitmapFile(FileName);
> А потм загружай в Word.

нет мне нужно, чтобы мой код делал готовый doc-файл.


← →
Kolan ©   (2005-10-13 15:05) [5]

Ну это работа с вордом. Посмотри в любои факе как работать с офисом. В качестве помощь используй запись макросов. Те записал что надо переделал на делфи.
Вот для примера:
Ниже представлен пример создания новой таблице в Excel 2000:

uses
 ComObj, ActiveX;

var
 Row, Col: integer;
 DestRange: OleVariant;
 Excel: Variant;

begin
 Excel := CreateOleObject("Excel.Application.9");
 Excel.Visible := True;
 Excel.WorkBooks.Add; //Создать новую таблицу

 //Можно помещать текст и значения в диапазон ячеек
 //Поместить     слово тест в диапазон ячеек
 Excel.ActiveSheet.Range["A2", "B3"].Value := "Тест";
 //Или число
 Excel.ActiveSheet.Range["A4", "B5"].Value := 42;

 //А вот так задаётся формула
 Excel.ActiveSheet.Range["A10", "A11"].Formula := "=RAND()";

 //Можно задавать номера ячеек и столбцов
 Excel.ActiveSheet.Cells.Item[1, 1].Value := "Первая ячейка";

 Row:=1;
 Col:=3;
 Excel.ActiveSheet.Cells.Item[Row, Col].Value := "Другая ячейка";

 //Можно скопировать данный из одного диапазона ячеек в другой
 DestRange := Excel.Range["D6", "F10"];
 Excel.Range["A1", "C5"].Copy(DestRange);

 //Можно задавать параметры шрифта в определённой ячейке
 Excel.Range["A2", "A2"].Font.Size := 20;
 Excel.Range["A2", "A2"].Font.FontStyle := "Bold";
 Excel.Range["A2", "A2"].Font.Color := clFuchsia;
 Excel.Range["A2", "A2"].Font.Name := "Arial";

 //Можно ещё и так изменить цвет диапазона ячеек
 Excel.Range["B2", "C6"].Interior.Color := RGB(223, 123, 123);

end;


← →
DelphiLexx ©   (2005-10-13 15:23) [6]


> Ну это работа с вордом. Посмотри в любои факе как работать
> с офисом. В качестве помощь используй запись макросов. Те
> записал что надо переделал на делфи.
> Вот для примера:

Это под Exel, а под word как будет?


← →
КиТаЯц ©   (2005-10-13 15:29) [7]

Под вордом также ;)

Исчо в тему как раз по вставке tChart:
http://delphimaster.net/view/10-1116670692/

Правда тоже для Excel...



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.023 c
6-1122019736
Senti
2005-07-22 12:08
2005.11.06
Помогите разобраться с вот этим кодом...


14-1129701752
Rentgen
2005-10-19 10:02
2005.11.06
удаленно(COM1-RS232) запустить программу


8-1115301949
Дельфин
2005-05-05 18:05
2005.11.06
Ошибка проигрывания avi файлов


4-1125749990
NikNet
2005-09-03 16:19
2005.11.06
Предворительная проверка процесса!


1-1129200448
BFG9k
2005-10-13 14:47
2005.11.06
Dephi стирает {$IFDEF}




   Наверх