[Elenita]

He probado el código que me pasaste y efectivamente me sale el mensaje de "Falló la creación del objeto". He metido la creación del objeto en un try-except y he capturado la excepción.

Código Delphi [-]
 procedure VerWPD(Archivo: string);
 var
   objWordPerfect : Variant;
 begin
   objWordPerfect := Null;
   try
     try
       objWordPerfect:= CreateOleObject('WordPerfect.PerfectScript');
       objWordPerfect.AppMaximize;
       objWordPerfect.FileOpen(Archivo);
     except
       on E: Exception do ShowMessage(E.Message);
     end
   finally
     if not VarIsNull(objWordPerfect) then
     begin
       objWordPerfect.Quit;
       objWordPerfect.free;
     end
     else ShowMessage('Falló la creación del objeto');
   end;
 end;

El error que me aparece ahora es "Espacio de almacenamiento insuficiente para completar esta operación". Por lo que he leído en internet es un error del sistema operativo, pero sigo igual que antes.
He tratado de buscar en la ayuda de WordPerfect algo sobre la automatización OLE, pero no he tenido demasiada suerte. ¿Sabes donde podría documentarme?
Muchas gracias por todo. Un saludo.