F
Fucool
Unregistered / Unconfirmed
GUEST, unregistred user!
procedure TForm1.Button1Click(Sender: TObject);
var
s: OleVariant;
i: Integer;
begin
s := CreateOleObject('pdfBMnew.pdfBM');
i := s.mnuPdf('sdfas', Handle, 'c: /ddd.bmp');
end;
以上，好象s没有被使放，应该如何使放。
var
s: OleVariant;
i: Integer;
begin
s := CreateOleObject('pdfBMnew.pdfBM');
i := s.mnuPdf('sdfas', Handle, 'c: /ddd.bmp');
end;
以上，好象s没有被使放，应该如何使放。