[TOJluK]

в uses укажи Variants.

Код:

var MSWord:Variant;
 begin
 try
  MsWord := CreateOleObject('Word.Application'); // попытка создать OLE
   except
   raise Exception.Create('Word не установлен!'); // в случае неудачной попытки
   end;
 end;