Главная страница
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.021 c
14-24657
Vlad Oshin
2003-08-20 14:10
2003.09.08
Целоваться на прощание бум?


4-24751
Nikkk
2003-07-07 12:22
2003.09.08
IsWindowVisible


1-24545
Jineura
2003-08-26 16:44
2003.09.08
tSendMail в Delphi7


7-24725
Сергей Енин
2003-06-21 15:04
2003.09.08
Состояние файла...


1-24507
Zheks
2003-08-27 10:25
2003.09.08
Рисование на Image