code: Printer.PrinterIndex := pin; printer.title := ''; Printer.BeginDoc; try RR := Rect(.....); Printer.Canvas.StretchDraw(RR, TA.Picture.Graphic); finally Printer.EndDoc; end;
http://www.delphikingdom.com/asp/answer.asp?IDAnswer=83738