안녕하세요. 퀵리포트(2.0c)를 사용하는데 아래의 코드에서 문제가 있어 질문드립니다.
//frm_2010의 스트링그리드내용을 출력하려 합니다.
procedure TQuickReport1.QuickReport1NeedData(Sender: TObject;
var MoreData: Boolean);
begin
//아래 frm_2010.outgrid.RowCount에서 Access //Violation에러가 납니다.
//frm_2010도 use에 포함시켰는데 ....
if Cur begin
With frm_2010.outgrid do
begin
QRLabel11.Caption := Cells[ 0,Cur];
QRLabel12.Caption := cells[ 1,Cur];
QRLabel13.Caption := cells[ 2,Cur];
QRLabel14.Caption := cells[ 3,Cur];
QRLabel15.Caption := cells[ 4,Cur];
QRLabel16.Caption := cells[ 5,Cur];
QRLabel17.Caption := Cells[ 6,Cur];
QRLabel18.Caption := cells[ 7,Cur];
QRLabel19.Caption := cells[ 8,Cur];
QRLabel20.Caption := cells[ 9,Cur];
end;
end;
Inc(Cur);
MoreData:=Cur<=frm_2010.outgrid.RowCount;
end;
//frm_2010의 스트링그리드내용을 출력하려 합니다.
procedure TQuickReport1.QuickReport1NeedData(Sender: TObject;
var MoreData: Boolean);
begin
//아래 frm_2010.outgrid.RowCount에서 Access //Violation에러가 납니다.
//frm_2010도 use에 포함시켰는데 ....
if Cur
With frm_2010.outgrid do
begin
QRLabel11.Caption := Cells[ 0,Cur];
QRLabel12.Caption := cells[ 1,Cur];
QRLabel13.Caption := cells[ 2,Cur];
QRLabel14.Caption := cells[ 3,Cur];
QRLabel15.Caption := cells[ 4,Cur];
QRLabel16.Caption := cells[ 5,Cur];
QRLabel17.Caption := Cells[ 6,Cur];
QRLabel18.Caption := cells[ 7,Cur];
QRLabel19.Caption := cells[ 8,Cur];
QRLabel20.Caption := cells[ 9,Cur];
end;
end;
Inc(Cur);
MoreData:=Cur<=frm_2010.outgrid.RowCount;
end;
댓글 0
번호 | 제목 | 글쓴이 | 날짜 | 조회 수 |
---|---|---|---|---|
158 | [응답] RichEdit에서의 WordWrap기능... | 관리자 | 2000.10.11 | 6019 |
157 | [응답] 한자 키 처리하는 방법... | 관리자 | 2000.12.08 | 5995 |
156 | [질문] TMemo 깜박임. | 김영균 | 2000.06.15 | 5987 |
155 | [응답] 탭 컨트롤이여~ | 관리자 | 2001.01.09 | 5982 |
154 | [응답] [질문] 공백문자를 탭 문자로 변환에 대해서.. | 관리자 | 2001.03.30 | 5966 |
153 | [응답] 프로그램안에서 Ocx 나 DLL 설치 | 관리자 | 2000.08.04 | 5964 |
» | [질문]퀵리포트에서 Access Violation에러가 ... | 곽승주 | 1999.08.04 | 5960 |
151 | [답변] Udbg.dcu Not Found! | 운영자 | 1999.12.27 | 5957 |
150 | [답변] 델파이를 배우고 싶은데요.... | 운영자 | 1999.10.09 | 5952 |
149 | [답변] 일정관리 프로그램을 만들려고하는데.. | 운영자 | 1999.10.26 | 5950 |