smileye wrote:

> 선선한 바람이 불어오는 가운데,

> 하나의 문제에 시달리는 ....

>

> 퀵리포트에서 폼의 양식이 다른 것들을

> 한번의 명령으로 출력(미리보기)를 할 수 있는 방법이

> 없는지요?

>

> 동일양식 (종횡이 같은) 문서는 지원하는 것 같은데...

> 다른 경우에는 미리보기후 close하고 계속 나오는 것을

> 바라봐야 하는 불편함이 있어서...

>

> 불가능한가요?

> 고수님들의 도움을 간절히 바라며...

>

> 좋은 하루 , 즐코하세요.





QRCompositeReport 컴포넌트를 사용하면 가능 합니다.

사용방법은 출력버튼을 누를때 다음과 같이 해주면 됩니다.



1) 먼저 QRCompositeReport 이벤트에 출력하고자 하는 폼을

추가 시켜주고



procedure TfrmVSALESDDREPORTQ.QRCompositeReport1AddReports(

Sender: TObject);

begin

with QRCompositeReport1.Reports do

begin

Add(form1.QuickRep1);

Add(form2.QuickRep1);

Add(form3.QuickRep1);

end;

end;



2) 출력 버튼을 누를때 각각 작성한 출력폼을 생성한후

미리보기하면 위에서 정의한 이벤트를 먼저 수행하므로

생성된 각폼들이 QRCompositeReport에 추가되어

한 출력물로 묶여져 출력됩니다.



procedure TFPrintForm.BitBtn1Click(Sender: TObject);

begin

Application.CreateForm(Tform1, form1); //출력폼을 각각 작성한후

Application.CreateForm(Tform2, form3); //

Application.CreateForm(Tform3, form3);



QRCompositeReport1.Preview;



form1.Free;

form2.Free;

form3.Free;

end;

답변고맙습니다.

그러나,

답변하신 방법으로는 동일한 인쇄용지형태인 경우에만

정상적인 출력이 가능합니다.

제가 바라는 것은 하나는 가로, 하나는 세로로 출력되는 양식을

처리하고자 함입니다.

+--------+

| |

| |

| |

+--------+

+-------------+

| |

| |

+-------------+

좋은 방법이 없을까요?