Скачать: CL | DM;

Excell, OleVariant   Найти похожие ветки 

← →
NewN ©   (2003-08-27 09:38) [0]

Здравствуйте, мастера!
Необходимо проверить, ссылается ли переменная типа Variant на экземпляр приложения Excel, и если ссылается, то закрыть сопоставленное ей приложение. Как это сделать правильно?

var
xl: Variant;

Procedure FormCreate;
begin
xl:= Null;
end;

procedure ButtonClick;
begin
xl:= CreateOleObject(Excel.Application);
end;

procedure FormDestroy;
begin
if xl <> Null then
xl.Quit;
end;

если экземпляр Excel.Application создан, то на проверке if xl <> Null выдается ошибка "Invalid variant operation".

---

← →
Е-Моё имя ©   (2003-08-27 09:40) [1]

c unassigned сравнивай?

---

← →
NewN ©   (2003-08-27 10:13) [2]

с unassigned тоже самое, неужели никто не знает?

---

← →
Романов Р.В. ©   (2003-08-27 10:21) [3]

Empty

---

← →
Е-Моё имя ©   (2003-08-27 10:22) [4]

vaisempty()?

---

← →
Е-Моё имя ©   (2003-08-27 10:22) [5]

r третья

---

← →
NewN ©   (2003-08-27 10:24) [6]

Разобрался сам, если кому интересно - удалось решить проблему, заменив "if xl <> null" на "if VarType(xl) <> VarNull". Всем спасибо.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.012 c