델파이에서 TAcroPDF 사용후 종료시 프로세서가 종료되지 않을 때
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
var
Ref : Integer;
begin
Ref := AcroPdf1.ControlInterface._AddRef;
AcroPdf1.Src := '';
AcroPdf1.Free;
AcroPdf1 := Nil;
end;
하거나
AcroPDFLib_Tlb.pas 에서 Type TAcroPDF = class(TOleControl) ... public destructor Destroy; override; // <- New Line ... end; Implementation ..... destructor TAcroPDF.Destroy; begin FIntf := NIL; inherited; end;
하면 정상 종료된다.
댓글 없음:
댓글 쓰기