Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.01.21;
Скачать: CL | DM;

Вниз

печать с помощью chartFX (ActiveX)   Найти похожие ветки 

 
delphim   (2007-01-05 07:24) [0]

Здравствуйте !
Не выполняется печать графика в компоненте ActiveX chartFx.
Вот код:

 if not PrintDialog.Execute then exit;
 ChartFx.PrintIt;

И никакой ошибки, и никакой печати. Кто знает, что здесь не установлено ?


 
SergGG ©   (2007-01-05 09:06) [1]

Попробуй так:

//if not PrintDialog.Execute then exit;
Chartfx.PrintIt;


 
delphim   (2007-01-05 10:04) [2]

SergGG !
Строку
if not PrintDialog.Execute then exit;
я вставил для того, чтобы был выбран объект TPrinter.
Вначале я думал, что ChartFx имеет свой способ выбора принтера, - у него есть метод ChartFx.ShowDialog(nDialog,lExtra); но тип диалога nDialog = [выбор принтера] отсутствует. Есть, например, CDIALOG_EXPORTFILE, CDIALOG_IMPORFILE и т.д. Пробовал и так:
ChartFx.PaintTo(Printer.Handle, 3000, 3000);  // это пример из help
Но без результата.


 
SergGG ©   (2007-01-05 10:19) [3]

> if not PrintDialog.Execute then exit;
> я вставил для того, чтобы был выбран объект TPrinter.

Помоему можно TPrinter задать:
Uses Printers;

>ChartFx.PaintTo(Printer.Handle, 3000, 3000);  // это пример из help

а это у меня работает


 
delphim   (2007-01-06 07:10) [4]

Не хочет печатать.
Не выполняется родной метод Chartfx.PrintIt;
не выполняются и
ChartFx.PaintTo(Printer.Handle, 1200, 1200);  // я изменил 3000 -> 1200
СhartFx.Paint(Printer.Handle, 0, 0, 1200, 1200, 1, 0);
При этом, установлено
ChartFx.Style := ChartFx.Style + CST_PRINT;


 
delphim   (2007-01-06 07:26) [5]

В догонку:
Я установил в ОС используемый принтер по умолчанию (своего нет, принтер сетевой). И сработал метод Chartfx.PrintIt ! Нет слов. Неужели в delphi после PrintDialog.Execute
придётся устанавливать выбранный принтер по умолчанию ?



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

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

Наверх




Память: 0.47 MB
Время: 0.028 c
4-1157539348
Array
2006-09-06 14:42
2007.01.21
Функция принудительного выключения


2-1168017555
XfroSt
2007-01-05 20:19
2007.01.21
Tmemo и видимые строки


15-1167773487
Nic
2007-01-03 00:31
2007.01.21
Нейронные сети


15-1167080716
Смаг
2006-12-26 00:05
2007.01.21
Зацените прикольная фича


15-1167118831
BiN
2006-12-26 10:40
2007.01.21
The Guess Who, American Woman