Q&A

  • String Grid를 이용해서 quickReport를 출력
안녕하세요...



String Grid를 이용해서 quickReport를 출력하려고 합니다..



근데...위와 같은 에러가 발생하거든요...



.DLL에서도 String Grid를 이용해서 quickReport를 출력할 수 있는지 알고 싶습니다..



글구...제 소스가 잘못 됐는지 좀 봐주세요...





================================================================================



procedure Tqr_test.QuickRepNeedData(Sender: TObject;

var MoreData: Boolean);

begin



if count <= formam8471.sg_isu.RowCount - 1 then

MoreData := true

else

MoreData := false;



if Not MoreData Then

count := 1;

end;





procedure Tqr_test.QuickRepBeforePrint(Sender: TCustomQuickRep;

var PrintReport: Boolean);

begin

with formam8471.sg_isu do

begin

isu_no.Caption := Cells.[0, Count]

isu_nm.Caption := Cells.[1, Count]

aset_no.Caption := Cells.[2, Count]

from_ymd.Caption := Cells.[3, Count]

to_ymd.Caption := Cells.[4, Count]

agr_amd.Caption := Cells.[5, Count]

isu_am.Caption := Cells.[6, Count]

rmk.Caption := Cells.[7, Count]

end;

inc(count);

end;



글구.....DLL에서 위와 같은 방법을 사용할 수 없다면...



.txt 파일로 저장한후 그 파일을 읽어서 report로 출력할 수 있는지 좀 알려주세요...



있다면...좀 알려주세요....

0  COMMENTS