Задача №1:
Как распечатать картинку с PaintBox?
Задача №2:
Дано: Форма1 и PaintBox1(большого размера). Форма2 и PaintBox2(маленького размера).Надача: Перенести рисунок с первого PaintBox на второй и уменьшить его до размеров второго PaintBox.
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;