* 에러 메시지 : Exception EConvertError in module DLL_CALL_P.EXE at 0000D984
안녕하세요...
퀵리포트를 이용해서 리포트를 출력하려고 합니다..
dll을 사용하고 있고, print할때는 안 나는데...
이상하게 preview할때만 ... 위와 같은 에러가 나는데....왜 나는지 모르겠어요..
좀 봐주세요..
procedure Tformam8471.UP_Prt_test;
begin
qr_test := Tqr_test.Create(NIL);
Print_Report(qr_test, 'qr_test');
end;
procedure Tformam8471.Print_Report(Sender : TObject; Fname : string);
var
PrtForm : TForm;
begin
try
if wkTag = False then
begin
PrtForm := TForm.Create(nil);
TQuickRep(Sender).Parent := PrtForm;
TQuickRep(Sender).Print;
end;
if wkTag = True then
begin
PrtForm := TForm.Create(nil);
TQuickRep(Sender).Parent := PrtForm;
TQuickRep(Sender).Preview; <= 에러나는 위치
end;
finally
TQuickRep(Sender).Free;
PrtForm.Free;
end;