Форум: "Начинающим";
Текущий архив: 2013.03.22;
Скачать: [xml.tar.bz2];
Внизпроверить переменную типа Variant Найти похожие ветки
← →
ford © (2012-06-26 14:00) [0]Добрый день!
Объявил переменную W:Variant;
далее в методе onCreate главной формы устанавливаю её в VarNull
W:=VarNull;
Потом в программе проверяю
if W=VarNull Then
Begin
W:=GetOleObject("word.Application");
...
end;
но на if W=VarNull Then программа выдает ошибку Invalid Variant Operation
пробовал присваивать 0 и проверять на равенство 0 но вылетает та же ошибка :(
Подскажите, как проинициализировать переменную "пустым значением", чтобы потом корректно обработать это равенство ?
← →
AV © (2012-06-26 14:06) [1]ExcelApp := Unassigned;
if Pointer(IDispatch(ExcelApp)) <> nil then
ExcelApp.quit;
← →
Ega23 © (2012-06-26 14:07) [2]
uses Variants;
w := null;
if VarIsNull(w) then
← →
ford © (2012-06-26 14:22) [3]Спасибо :)
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2013.03.22;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.062 c