Q&A

  • 퀵 출력입니다


퀵레포트 출력시 디테일 5개출력후 공백을 한칸줄수 있는방법은 없나여



1  COMMENTS
  • Profile
    돌머리 2000.09.19 02:30
    hnc wrote:

    >

    > 퀵레포트 출력시 디테일 5개출력후 공백을 한칸줄수 있는방법은 없나여

    >

    몇가지 방법이 있습니다.

    가장 쉬운걸로 말씀드리면...



    우선

    디테일밴드의 프로퍼티에 보시면 HasChild를 true로 바꿔보세요..

    그러면 Child밴드가 생길것입니다.

    이 Child밴드를 띄우고 싶은 넓이 만큼 조정해 놓으시고..



    아래의 소스를 참조해서 코딩하시면 간단합니다.



    unit PrtUnit1;



    interface



    uses

    Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,

    QuickRpt, Qrctrls, ExtCtrls, Db, DBTables;



    type

    TForm1 = class(TForm)

    .

    .

    .

    procedure FormCreate(Sender: TObject);

    procedure ChildBand1BeforePrint(Sender: TQRCustomBand;

    var PrintBand: Boolean);



    private

    { Private declarations }

    tempcount : integer;

    public

    { Public declarations }

    end;



    var

    Form1: TForm1;



    implementation



    {$R *.DFM}

    procedure TForm1.FormCreate(Sender: TObject);

    begin

    tempcount := 0;

    end;



    procedure TForm1.ChildBand1BeforePrint(Sender: TQRCustomBand;

    var PrintBand: Boolean);

    begin

    inc(tempcount);

    if( tempcount < 5 )then//표시하고 싶은 줄 수를 넣으면 됩니다.

    begin

    PrintBand := false;

    end else begin

    tempcount := 0;

    PrintBand := true;

    end;

    end;



    이렇게 하면 간단하게 됩니다...

    그럼 이만 ....