R
Robot5
Unregistered / Unconfirmed
GUEST, unregistred user!
用下面的程序打印第二个程序是反的不知道是什么?
纸张是A4的。谁能帮我解决呀????最好能给个源代码好吗??
procedure TfrmMain.butPrinterClick(Sender: TObject);
begin
Printer.begin
Doc;
Printer.Canvas.StretchDraw(Rect(20, 20,810,550), Image1.Picture.Graphic);
Printer.Canvas.StretchDraw(Rect(20, 600,810,550), Image1.Picture.Graphic);//这句不知道为什么打印出来是反的????
Printer.EndDoc;
end;
纸张是A4的。谁能帮我解决呀????最好能给个源代码好吗??
procedure TfrmMain.butPrinterClick(Sender: TObject);
begin
Printer.begin
Doc;
Printer.Canvas.StretchDraw(Rect(20, 20,810,550), Image1.Picture.Graphic);
Printer.Canvas.StretchDraw(Rect(20, 600,810,550), Image1.Picture.Graphic);//这句不知道为什么打印出来是反的????
Printer.EndDoc;
end;