Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.11.06;
Скачать: 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 вся ветка

Текущий архив: 2005.11.06;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.054 c
3-1127737516
erika
2005-09-26 16:25
2005.11.06
запрос не понимает команды sql


2-1128965564
partizan
2005-10-10 21:32
2005.11.06
Чем отличаются object и class?


1-1128930294
SnakeAK
2005-10-10 11:44
2005.11.06
Прозрачность TImage.


2-1129369490
RzCoDer
2005-10-15 13:44
2005.11.06
Дин массивы


2-1129103955
Zhekson
2005-10-12 11:59
2005.11.06
Контурная карта