Форум: "Основная";
Текущий архив: 2003.09.08;
Скачать: [xml.tar.bz2];

Вниз

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 вся ветка

Форум: "Основная";
Текущий архив: 2003.09.08;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.45 MB
Время: 0.034 c