Q&A

  • 분류먼저 해주시길 부탁드립니다.
안녕하세요

다름이 아니라 회원에게 보내는 봉투를 인쇄할려고 하는데요

조건에 따른 검색은 되거든요 그 회원들의 봉투만 인쇄할려면 어떻게 코딩을 해야 하는지요

qreport에서 detail 부분에 받는사람의 주소와 우편번호를 출력을 하려고요

그 회원의 우편물 수신지가 직장이면 직장주소 , 집이면 집주소가 나오도록요

저는 이런식으로 코딩을 해봤는데 안되더라고요

아직 초보라서 이해도 잘 못하고 있는 것 같습니다. 제가



procedure TForm2.QRBand1BeforePrint(Sender: TQRCustomBand;

var PrintBand: Boolean);

begin

{ if form7.Query1.FieldByName('CUDMGU').Value = '1' then //'CUDMGU' field가 집과 직장을구분하는 필드

begin

QRLabel1.Caption := form7.Query1.FieldByName('CUHPST').Value; //집이라면 집주소가

QRLabel2.Caption := form7.Query1.FieldByName('ZIPJUSO1').Value;

QRLabel3.Caption := form7.Query1.FieldByName('CUHADR').Value;

end

else

QRLabel1.Caption := form7.Query1.FieldByName('CUOPST').Value; //직장이면 직장주소가

QRLabel2.Caption := form7.Query1.FieldByName('ZIPJUSO2').Value;

QRLabel3.Caption := form7.Query1.FieldByName('CUOADR').Value;



아무래도 코딩이 이상한 듯 한데 잘 모르겠어요 저는......도와주십시요..그럼 제가 많이 발전할 수 있을 것 같습니다.

그럼.....안녕히 계세요



1  COMMENTS
  • Profile
    HART 2000.05.26 00:31
    퀵리포트를 한번도 사용하지 안는 것 같은데.. 델파이 데모에 보면 퀴리포트 예제가 있는데. 먼저 보시고 처리하시게 좋은 것 같은데.. 위치는 delphin/demos/quickrpt에 있음..



    그리고 우편 봉부면 .. 연속 용지를 말하는 것죠... (혹시 스티커는 아니지...)



    그럼 수고하세요.. 좋은 대답를 했드니지 못해서 죄송...



    델초 wrote:

    > 안녕하세요

    > 다름이 아니라 회원에게 보내는 봉투를 인쇄할려고 하는데요

    > 조건에 따른 검색은 되거든요 그 회원들의 봉투만 인쇄할려면 어떻게 코딩을 해야 하는지요

    > qreport에서 detail 부분에 받는사람의 주소와 우편번호를 출력을 하려고요

    > 그 회원의 우편물 수신지가 직장이면 직장주소 , 집이면 집주소가 나오도록요

    > 저는 이런식으로 코딩을 해봤는데 안되더라고요

    > 아직 초보라서 이해도 잘 못하고 있는 것 같습니다. 제가

    >

    > procedure TForm2.QRBand1BeforePrint(Sender: TQRCustomBand;

    > var PrintBand: Boolean);

    > begin

    > { if form7.Query1.FieldByName('CUDMGU').Value = '1' then //'CUDMGU' field가 집과 직장을구분하는 필드

    > begin

    > QRLabel1.Caption := form7.Query1.FieldByName('CUHPST').Value; //집이라면 집주소가

    > QRLabel2.Caption := form7.Query1.FieldByName('ZIPJUSO1').Value;

    > QRLabel3.Caption := form7.Query1.FieldByName('CUHADR').Value;

    > end

    > else

    > QRLabel1.Caption := form7.Query1.FieldByName('CUOPST').Value; //직장이면 직장주소가

    > QRLabel2.Caption := form7.Query1.FieldByName('ZIPJUSO2').Value;

    > QRLabel3.Caption := form7.Query1.FieldByName('CUOADR').Value;

    >

    > 아무래도 코딩이 이상한 듯 한데 잘 모르겠어요 저는......도와주십시요..그럼 제가 많이 발전할 수 있을 것 같습니다.

    > 그럼.....안녕히 계세요

    >