Q&A

  • Form을 프린터에 인쇄할려고 합니다. 부탁합니다.
다음과 같이 코딩했습니다.

procedure TfrmOA.OAFormPrintClick(Sender: TObject);

var Soo: TBitmap;

begin

Printer.BeginDoc;

Soo := TBitmap.Create;

Soo := ActiveMDIChild.GetFormImage;

Printer.Canvas.Draw(10, 10, Soo);

Printer.EndDoc;

Soo.Free;

end;



실행하면 작업표시줄에 프린터아이콘이 잠깐 나오고는 없어집니다.

물론 프린터에는 출력할려고 하지도 않습니다.

꼭!꼭!꼬옥! 조언을 바랍니다.



0  COMMENTS