function  CLSIDFileExists

function  CLSIDFileExists(CLSID : string) : boolean;

Возвращает true, если указанный CLSID есть в реестре, по его анализу удалось найти связанный с CLSID файл и этот файл

существует на диске. Возвращает false в любой другой ситуации (нет CLSID, запись CLSID в реестре.

Пример:

if CLSIDFileExists('B5F3970B-745E-46AC-B890-E08F69777D80') then 

 AddToLog(CLSIDFileName('B5F3970B-745E-46AC-B890-E08F69777D80')+

          ' >> '+ 

          'подозрение на AdvWare.ToolBar.SearchIt');