Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум «Всё о Паскале» _ Делфи _ Печать с PaintBox

Автор: Moby 2.06.2007 13:50

Задача №1:
Как распечатать картинку с PaintBox?

Задача №2:
Дано: Форма1 и PaintBox1(большого размера). Форма2 и PaintBox2(маленького размера).Надача: Перенести рисунок с первого PaintBox на второй и уменьшить его до размеров второго PaintBox.

Автор: Артемий 2.06.2007 20:25

Печатать можно вот так:

var
Printer: TPrinter;
begin
Printer := TPrinter.Create;
Printer.BeginDoc;
Printer.Canvas.CopyRect(Bounds(0,0,PaintBox1.Width,PaintBox1.Height),PaintBox1.Canvas,Bounds
(0,0,PaintBox1.Width,PaintBox1.Height));
Printer.EndDoc;

Автор: volvo 2.06.2007 21:54

Задача №2:

http://forum.pascal.net.ru/index.php?showtopic=6361 -> Работа с графикой и мультимедиа -> Графические фильтры и эффекты -> Изменение размеров, Thumbnails, деформации, выделение части изображения -> Качественно уменьшить изображение...