Se si scrivo in questo modo mi dà errore :
Ecco l'errore:codice:var CurrentPrinter: TPrinter; const Rect:Trect=(left:0;Top:0;Right:200;Botto m:200); begin CurrentPrinter := Printer; ImgFoglioRettangolo.Bitmap.BoundsRect:=Rect; if StampaSetup.Execute then CurrentPrinter.BeginDoc; Img.AutoSize:=true; Img.scalemode:=smstretch; Img.Bitmap.Drawto(Printer.Canvas.Handle, Printer.Canvas.ClipRect,Img.Bitmap.BoundsRect); CurrentPrinter.EndDoc; end;
Left side cannot be assigned to
Abbi pazienza...
![]()