Witam!
Mam taki problem - drukuję bitmapę wyświetloną w TImage :
procedure TForm1.Button1Click(Sender: TObject);
var
R:TRect;
begin
R:=Image1.ClientRect;
Printer.BeginDoc;
Printer.Canvas.CopyRect(Rect(200,200,1900,1400),Form1.Canvas,R);
Printer.EndDoc;}
end;
Ta procedura drukuje bitmapę w prostokącie o zadanych rozmiarach. Pytanie: Czy jest jakiś prosty sposób, żeby wydruk był obrócony o 90 stopni. (w orientacji poziomej)?