I am maintaining an old Delphi app that works fine with oo3.2.1 and earlier.  Its interface with OpenOffice uses Bernard Marcelly's "OOo Tool".

Since oo3.3, getPrinter causes an exception as follows:

EVariantBadVarTypeError 
Description: "Invalid Variant Type...raised when a variant operation fails because of a value that isn't a valid variant type."

It looks like the getPrinter method behaves differently since oo3.3.  Is this by design?  Perhaps there is a bug?

I would be very happy to look at the source code, but do not know how to obtain it.  I would want to compare the source of getPrinter between v3.2.1 and v3.3.

Regards
Julian Brewer

P.S. The code that throws the exception is marked (***) below.  I stress that this all worked fine until v3.3:

docs[di].v := StarDesktop.LoadComponentFromURL(URL, '_blank', 0, fileProp);

[...]

function ToOoDoc.docPrinterBusy( docIndex : integer) : boolean;
var
   queryPrinter : variant;
   i : integer;
begin
     result := false;
     if not docs[docIndex].isOpen then exit;
(***)queryPrinter := docs[docIndex].v.getPrinter;
     [...]
end;