Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.09.08;
Скачать: 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 вся ветка

Текущий архив: 2003.09.08;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.016 c
3-24327
Xmen
2003-08-18 14:58
2003.09.08
Paradox -> MySQL


3-24378
ASt
2003-08-15 20:41
2003.09.08
Чтение данных из таблицы


1-24516
Yanis
2003-08-28 11:53
2003.09.08
Что за функция?


3-24328
Dush
2003-08-18 16:17
2003.09.08
Помогите со структурой таблицы


1-24443
BVP
2003-08-25 16:51
2003.09.08
вызов произвольной функции из dll