Jolubaro

Hi!! I'm trying to print an image from my cell with this code, but it is imposible. 'Access Violation'. procedure TFPrincipal.BImprimirClick(Sender: TObject); var SrcRect, DestRect: TRectF; begin with Printer do begin ActivePrinter.SelectDPI(1200,1200); Canvas.Fill.Color:= TAlphaColorRec.Black; Canvas.Fill.Kind := TBrushKind.Solid; BeginDoc; SrcRect := Image.LocalRect; DestRect := TRectF.Create(0, 0, PageWidth, PageHeight); Canvas.DrawBitmap(Image.Bitmap, SrcRect, DestRect, 1); EndDoc end end;

Thanks to both of you. I will take your suggestions into account. I have to think about what I'm going to do finally.

Thank you. So, with FMX there is not solution for my problem. What about other platforms of programming