Главная страница
    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.033 c
2-1128960294
XCoder
2005-10-10 20:04
2005.11.06
Ошибка при работе с указательми


3-1127744907
Malamba
2005-09-26 18:28
2005.11.06
запрос с параметрами вымахивается


2-1129133467
Gero
2005-10-12 20:11
2005.11.06
Тест


2-1129434980
DimaDima
2005-10-16 07:56
2005.11.06
Можно ли обращаться к массивам по индексам в их имени?


6-1122493829
Михаил(Киров)
2005-07-27 23:50
2005.11.06
Sockets





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский