Как определить запущен ли Excel?

Previous  Top  Next

    
 

 

 

Данный пример ищет активный экземпляр Excel и делает его видимым

 

Code:

var

   ExcelApp : Variant;

begin

try

   // Ищем запущеный экземплят Excel, если он не найден, вызывается исключение

   ExcelApp := GetActiveOleObject('Excel.Application');

 

   // Делаем его видимым

   ExcelApp.Visible := true;

except

end;

 

 

Автор Кулюкин Олег

Взято с сайта http://www.delphikingdom.ru/

©Drkb::04380