텍스트 오브젝트를 사용하시는 것보다 익스프레션 컴포를 사용하셔서

익스프레션에 expression1.expression := '원하는 문자열';

이렇게 문자열값을 넣어주면 될것같은데...

물론 해당하는 익스프레션이 놓인 밴드의 befror print이벤트에 코딩을....



detail 번호나 라인 카운트를 해서 5의 배수또는 5로 나눈다든가 해서

5, 10, 15인가를 검사혀서 그때마다 디테일밴드의 프레임.bottom속성을 true로 바꾸어

주면 가로선이 그어질텐데.....



함 해보시구 안되면 멜주세요....

직접 테스트 해보지 않아서.... 해보았던 기억만을 더듬어 답변하는거라...

요즘 제갈 파빌을 하는데 델피 안 이자뿔라고 이렇게 q&a사이트에 들어와 여기저기

뒤지고 다닙니다요...



그럼...



김길남 wrote:

> 델파이에서 CrystalReport의 TextObject에서 제가 임의로 문자열을 출력하고자 하는데

> 초보라서 무지하게 해메네요.

> 방법을 알려주시와요.

> 추가질문 - 5row마다 Line을 그을려고합나다.

>

nilriri wrote:

> 텍스트 오브젝트를 사용하시는 것보다 익스프레션 컴포를 사용하셔서

> 익스프레션에 expression1.expression := '원하는 문자열';

> 이렇게 문자열값을 넣어주면 될것같은데...

> 물론 해당하는 익스프레션이 놓인 밴드의 befror print이벤트에 코딩을....

>

> detail 번호나 라인 카운트를 해서 5의 배수또는 5로 나눈다든가 해서

> 5, 10, 15인가를 검사혀서 그때마다 디테일밴드의 프레임.bottom속성을 true로 바꾸어

> 주면 가로선이 그어질텐데.....

>

> 함 해보시구 안되면 멜주세요....

> 직접 테스트 해보지 않아서.... 해보았던 기억만을 더듬어 답변하는거라...

> 요즘 제갈 파빌을 하는데 델피 안 이자뿔라고 이렇게 q&a사이트에 들어와 여기저기

> 뒤지고 다닙니다요...

>

> 그럼...

>

> 김길남 wrote:

> > 델파이에서 CrystalReport의 TextObject에서 제가 임의로 문자열을 출력하고자 하는데

> > 초보라서 무지하게 해메네요.

> > 방법을 알려주시와요.

> > 추가질문 - 5row마다 Line을 그을려고합나다.

> >



답변 고맙게 봤습니다.

그러나 Help를 보니 Expression라는 것은 Sql에속한 내용이더군요.

저의 의문을 정확히 말씀드리면.

Crystal Report로는 이미 디자인을 했고 PageHeader부분에 레포트를 출력하는 사람의

ID를 PageHeader에 출력할려고합니다.

말씀하신 Expression으로 어떻게 해볼려고 했지만 감이 안아는군요.

그리고 5라인마다 선을 긋느것은 원리는 잘 알겠습니다. 그러나 어떠한 detail부분을 출력할때의 event같은 것이 있으면 하겠는데 눈에 들어오는 것이 없네요.

답변주셔서 감사하고요. 다시한번 수고해 주시면 감사하겠습니다.

procedure TForm1.QRBand1BeforePrint(Sender: TQRCustomBand;

var PrintBand: Boolean);

begin

qrlabel1.Caption := '여기다가 아디뒤를 넣어주면 되겠군요...';

end;



procedure TForm1.Button1Click(Sender: TObject);

begin

quickrep1.PreviewModal;

end;



procedure TForm1.QRBand2BeforePrint(Sender: TQRCustomBand;

var PrintBand: Boolean);

begin

self.Tag := self.tag + 1;



if (self.tag mod 5) = 0 then

begin

qrband2.Frame.DrawBottom := true;

end;

end;



procedure TForm1.QRBand2AfterPrint(Sender: TQRCustomBand;

BandPrinted: Boolean);

begin

qrband2.Frame.DrawBottom := false;

end;



그럼....





김길남 wrote:

> nilriri wrote:

> > 텍스트 오브젝트를 사용하시는 것보다 익스프레션 컴포를 사용하셔서

> > 익스프레션에 expression1.expression := '원하는 문자열';

> > 이렇게 문자열값을 넣어주면 될것같은데...

> > 물론 해당하는 익스프레션이 놓인 밴드의 befror print이벤트에 코딩을....

> >

> > detail 번호나 라인 카운트를 해서 5의 배수또는 5로 나눈다든가 해서

> > 5, 10, 15인가를 검사혀서 그때마다 디테일밴드의 프레임.bottom속성을 true로 바꾸어

> > 주면 가로선이 그어질텐데.....

> >

> > 함 해보시구 안되면 멜주세요....

> > 직접 테스트 해보지 않아서.... 해보았던 기억만을 더듬어 답변하는거라...

> > 요즘 제갈 파빌을 하는데 델피 안 이자뿔라고 이렇게 q&a사이트에 들어와 여기저기

> > 뒤지고 다닙니다요...

> >

> > 그럼...

> >

> > 김길남 wrote:

> > > 델파이에서 CrystalReport의 TextObject에서 제가 임의로 문자열을 출력하고자 하는데

> > > 초보라서 무지하게 해메네요.

> > > 방법을 알려주시와요.

> > > 추가질문 - 5row마다 Line을 그을려고합나다.

> > >

>

> 답변 고맙게 봤습니다.

> 그러나 Help를 보니 Expression라는 것은 Sql에속한 내용이더군요.

> 저의 의문을 정확히 말씀드리면.

> Crystal Report로는 이미 디자인을 했고 PageHeader부분에 레포트를 출력하는 사람의

> ID를 PageHeader에 출력할려고합니다.

> 말씀하신 Expression으로 어떻게 해볼려고 했지만 감이 안아는군요.

> 그리고 5라인마다 선을 긋느것은 원리는 잘 알겠습니다. 그러나 어떠한 detail부분을 출력할때의 event같은 것이 있으면 하겠는데 눈에 들어오는 것이 없네요.

> 답변주셔서 감사하고요. 다시한번 수고해 주시면 감사하겠습니다.

>

말씀하신건 QuickReport입니다.

저는 CrystalReport에서 질문한겁니다...

쩝..





nilriri wrote:

> procedure TForm1.QRBand1BeforePrint(Sender: TQRCustomBand;

> var PrintBand: Boolean);

> begin

> qrlabel1.Caption := '여기다가 아디뒤를 넣어주면 되겠군요...';

> end;

>

> procedure TForm1.Button1Click(Sender: TObject);

> begin

> quickrep1.PreviewModal;

> end;

>

> procedure TForm1.QRBand2BeforePrint(Sender: TQRCustomBand;

> var PrintBand: Boolean);

> begin

> self.Tag := self.tag + 1;

>

> if (self.tag mod 5) = 0 then

> begin

> qrband2.Frame.DrawBottom := true;

> end;

> end;

>

> procedure TForm1.QRBand2AfterPrint(Sender: TQRCustomBand;

> BandPrinted: Boolean);

> begin

> qrband2.Frame.DrawBottom := false;

> end;

>

> 그럼....

>

>

> 김길남 wrote:

> > nilriri wrote:

> > > 텍스트 오브젝트를 사용하시는 것보다 익스프레션 컴포를 사용하셔서

> > > 익스프레션에 expression1.expression := '원하는 문자열';

> > > 이렇게 문자열값을 넣어주면 될것같은데...

> > > 물론 해당하는 익스프레션이 놓인 밴드의 befror print이벤트에 코딩을....

> > >

> > > detail 번호나 라인 카운트를 해서 5의 배수또는 5로 나눈다든가 해서

> > > 5, 10, 15인가를 검사혀서 그때마다 디테일밴드의 프레임.bottom속성을 true로 바꾸어

> > > 주면 가로선이 그어질텐데.....

> > >

> > > 함 해보시구 안되면 멜주세요....

> > > 직접 테스트 해보지 않아서.... 해보았던 기억만을 더듬어 답변하는거라...

> > > 요즘 제갈 파빌을 하는데 델피 안 이자뿔라고 이렇게 q&a사이트에 들어와 여기저기

> > > 뒤지고 다닙니다요...

> > >

> > > 그럼...

> > >

> > > 김길남 wrote:

> > > > 델파이에서 CrystalReport의 TextObject에서 제가 임의로 문자열을 출력하고자 하는데

> > > > 초보라서 무지하게 해메네요.

> > > > 방법을 알려주시와요.

> > > > 추가질문 - 5row마다 Line을 그을려고합나다.

> > > >

> >

> > 답변 고맙게 봤습니다.

> > 그러나 Help를 보니 Expression라는 것은 Sql에속한 내용이더군요.

> > 저의 의문을 정확히 말씀드리면.

> > Crystal Report로는 이미 디자인을 했고 PageHeader부분에 레포트를 출력하는 사람의

> > ID를 PageHeader에 출력할려고합니다.

> > 말씀하신 Expression으로 어떻게 해볼려고 했지만 감이 안아는군요.

> > 그리고 5라인마다 선을 긋느것은 원리는 잘 알겠습니다. 그러나 어떠한 detail부분을 출력할때의 event같은 것이 있으면 하겠는데 눈에 들어오는 것이 없네요.

> > 답변주셔서 감사하고요. 다시한번 수고해 주시면 감사하겠습니다.

> >

>

>

>