부탁드립니다......
한 PC에서 2가지의 출력을 해야 합니다...
프린터 하나는 LPT1에 연결되어 A4로 퀵레포트를 이용해서 인쇄를 합니다....
다른 한대는 네트워크로 연결된 프린터는 Dot로 거래명세서 발행용입니다......
거래명세서는 용지설정을 사용자정의로 설정을 해서 시범인쇄를 하면 정상적으로
인쇄가 됩니다...
하지만 프로그램에서 TPrinter를 이용해서 출력을 하면 기본프린터로 설정을하면
정상적으로 인쇄가 되는데 Printer.PrinterIndex로 검색해서 인쇄를 하면
설정한 용지설정이 변경되어 NewPage명령에서 스킵을 많이합니다...
많은 Tip을 읽으며 보니 해결이 되는것 같은데........도움이 필요합니다....
프로그램내에서 기본프린터로 잠시 변경하는 편법도 써보았으나 Ap Loding시
설정된 기본프린터의 길이와 넓이를 가지는 듯 합니다.....
많은 Delphi님들 도와 주시기 바랍니다....
// Printer.PrinterIndex 를 바꾸거나 PrinterSetupDialog 를 이용하여
// 프린터를 바꾸어도 QuickReport는 항상 기본 프린터로만 출력합니다
// 아래는 QuickReport에서 사용자가 프린터를 바꾸어서 출력하는 루틴입니다
// 아래 예제를 사용하시려면 uses 절에 printers 를 포함해야 합니다
// [1]. 프린터 설정 dialog 로 선택한 프린터로 출력하기
if PrinterSetupDialog.Execute then // dialog 띄우기
MyQReport.PrinterSettings.PrinterIndex := Printer.PrinterIndex;
// [2]. PrinterSetupDialog 를 띄우지 않고 직접 프린터 바꾸어서 출력하기
MyQReport.PrinterSettings.PrinterIndex :=
Printer.Printers.IndexOf('프린터 또는 드라이브 명');