| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Excel'ей становится много однако... [Delphi, Windows]

Tormoz ©   (2004-06-09 11:11:00) 

Уважаемые!

По нажатию кнопки делаю следующее:

Var
...
Excel:Variant;
...
begin
...
Excel := CreateOleObject('Excel.Application');
...
Excel.Visible:=true;
...
End;

Если кнопку нажать более одного раза, то Excel'ей становится много однако...
А мне нужен только один. Подскажите, буду признателен.

---

Clickmaker   (2004-06-09 15:48:00) [1]

try
 Excel := GetActiveOleObject('Excel.Application');
except
 Excel := CreateOleObject('Excel.Application');
end;

---

Наверх