bezugnehmend auf Kinimod8: man kann mit varIsEmpty() arbeiten.
der erste fall würde dann also so aussehen:
Delphi-Quellcode:
function IsAdobeReaderInstalled(): Boolean;
var
AdobeReader: OLEVariant;
begin
AdobeReader := CreateOLEObject('AcroPDF.PDF');
Result := not VarIsEmpty(AdobeReader);
if Result then
AdobeReader := UnAssigned;
end;