как я понял из DRKB для печати из Paintbox используется следующий подход:
procedure TMainWindow.Button5Click(Sender: TObject);
var
printer:tprinter;
begin
if not PrintDialog1.Execute then exit;
Printer := TPrinter.Create;
Printer.BeginDoc;
printer.Canvas.CopyRect(Bounds(0,0,PaintBox2.Width,PaintBox2.Height),PaintBox2.Canvas,Bounds
(0,0,PaintBox2.Width,PaintBox2.Height));
Printer.EndDoc;
end;
принтер должен печатать содержимое paintbox, однако не печатает НИЧЕГО!!
в чем проблема, объясните...