Как определить запущен ли Excel?
Falk0ner, вс, 06/07/2008 - 15:35.
Данный пример ищет активный экземпляр Excel и делает его видимым
var
ExcelApp : Variant;
begin
try
// Ищем запущеный экземплят Excel, если он не найден, вызывается исключение
ExcelApp := GetActiveOleObject('Excel.Application');
// Делаем его видимым
ExcelApp.Visible := true;
except
end;
ExcelApp : Variant;
begin
try
// Ищем запущеный экземплят Excel, если он не найден, вызывается исключение
ExcelApp := GetActiveOleObject('Excel.Application');
// Делаем его видимым
ExcelApp.Visible := true;
except
end;
Автор Кулюкин Олег
Взято с сайта http://www.delphikingdom.ru/
Отправить комментарий