퀵레포트로 견적서 양식을 만들고 있습니다.
품명과 크기의 세로 구분선을 QRShape 로 했습니다.
문제는 품명과 크기의 내용이 일정하지 않아 QRShape
의 높이를 지정 할 수 없습니다.
품명과 크기는 QRLabel를 사용 하였으며 AutoStretch 를 True 로 하여
자동으로 늘어 나게 하였습니다.
품명이나 크기의 글자 수가 늘어 나면 QRShape 의 높이도
같이 늘어 나야 되는데 잘 안되네요..
고수님들 한 수 알려 주십시오.
행복한 하루 되세요.
문제는 인쇄할 줄 수를 미리 알아서 Shape의 크기를 조절하는 것인데,
QRBand의 BeforePrint 이벤트에서 사이즈를 조절하시면 됩니다.
ex)
QRMemo1.Text := Query1.FieldByName('str').AsString;
WHeight := QRMemo1.Lines.Count *20; <= 요긴 몇번 테스트해서 적당한 숫자를...
QRBand1.Height := WHeight +1;
QRShape1.Height := WHeight;
QRShape2.Height := WHeight;
QRShape3.Height := WHeight;
다만, QRMemo를 사용하면 줄 간격이 거의 없어서 보기 싫다면 약간의 트릭과 노가다가 필요합니다.
도움되셨기를...