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

Вниз

Предварительный просмотр   Найти похожие ветки 

 
Weare ©   (2002-10-02 20:22) [0]

Уважаемые мастеры, добрый вечер.

Я вывожу на печать некоторые данные (текст и рисунок) с помощью объекта Printer:

Printer.BeginDoc;
...
Printer.EndDoc;

Подскажите,пожалуйста, как мне сделать вывод на предварительный просмотр. Может компонента какая есть. А то я почти целый день долблюсь с этим.
Спасибо.


 
Cr@sh ©   (2002-10-02 20:30) [1]

QuickReport, PReport, etc.


 
TTCustomDelphiMaster ©   (2002-10-02 20:47) [2]

TForm - TScrollBox - TImage - TCanvas


 
Weare ©   (2002-10-03 12:57) [3]

Да немногословны Вы, :).
Canvas это конечно хорошо, и что мне с ним делать. А при чем тут QuickReport. Может мне еще и в DBGrid загнать данные, а там есть класная компонента для печати с предварительным просмотром TPrintDBGridEh.
Но ведь должно же быть какое-то простое средство. Например присвоил какому-то свойству некоторой компоненты сам объект и можно просмотреть все, что на нем изображено. Вот тут я TPreviewBox нашел, но что-то ничего с ним не могу поделать.


 
TTCustomDelphiMaster ©   (2002-10-03 17:06) [4]

Я думал Вы сами догадаетесь.

При выводе на печать Вы рисуете изображение на Printer.Canvas.
С таким же успехом можно вывести это изображение на Canvas любого визуального объекта. Одним из наиболее подходящих объектов является Image. Для того чтобы организовать прокрутку изображения при больших размерах рисунка можно поместить его в ScrollBox.

Желаю успехов.



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

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

Наверх




Память: 0.47 MB
Время: 0.012 c
14-45519
Malder
2002-09-15 17:09
2002.10.14
---|Ветка была без названия|---


1-45346
glina
2002-10-05 13:19
2002.10.14
Вопрос по FileListBox


1-45288
Keplin Sergey
2002-10-04 14:02
2002.10.14
Как в цикле прогнать все компоненты приложения?


14-45513
AL2002
2002-09-17 13:46
2002.10.14
Кто какое оружие с собой таскает?


1-45445
iNew
2002-10-03 16:57
2002.10.14
В событе формы OnMouseDown пишу Form1.Cursor:= crHandPoint;