Форум: "WinAPI";
Текущий архив: 2003.11.24;
Скачать: [xml.tar.bz2];
ВнизExcel Найти похожие ветки
← →
Alibaba (2003-10-01 10:48) [0]Привет, мастера.
Как мне определить запущен ли Excel?
← →
DVM (2003-10-01 10:52) [1]FindWindow()
← →
Е-Моё имя (2003-10-01 11:07) [2]в списке процессов поискать
← →
Игорь Шевченко (2003-10-01 11:08) [3]GetActiveOleObject("Excel.Application") ?
← →
Alibaba (2003-10-01 11:22) [4]> Игорь Шевченко © (01.10.03 11:08) [3]
Функция возвращает результат типа IDispatch
Что мне с ним дальше делать?
Как мне узнать True или False?
← →
Игорь Шевченко (2003-10-01 11:26) [5]Alibaba © (01.10.03 11:22)
function IsExcelActive : Booelan;
var
W : Variant;
begin
W := GetActiveOleObject ("Excel.Application");
Result := not VarIsNull(W);
end;
← →
Alibaba (2003-10-01 11:43) [6]>Игорь Шевченко © (01.10.03 11:26) [5]
Если Excel есть - работает.
Если нет - выдает ошибку "Operation unavailable".
Я это обощел:
procedure TfrmMain.Button1Click(Sender: TObject);
var W : Variant;
begin
try
W := GetActiveOleObject ("Excel.Application");
if VarIsNull(W) then label1.Caption:="NO" else label1.Caption:="OK";
except
label1.Caption:="Error";
end
end;
Мне необходимо только знать есть он или нет.
Спасибо.
← →
Игорь Шевченко (2003-10-01 11:48) [7]try
W := Get...
except
W := NULL;
end;
← →
Alibaba (2003-10-01 12:00) [8]Да, так проще всего.
Я сначала думал что, изначально, если ничего не присваивать переменной W - она содержит NULL.
Попробовал:
try
W := GetActiveOleObject ("Excel.Application");
except
end
if VarIsNull(W) then label1.Caption:="NO" else label1.Caption:="OK";
Ничего подобного!
Необходимо именно присваивать
...
except
W := NULL;
...
← →
clickmaker (2003-10-01 12:10) [9]Если ничего не присваивать варианту, он содержит Unassigned
← →
Alibaba (2003-10-01 12:33) [10]Собственно, зачем мне это надо...
Использую TxlReport.
Как то он нестабильно работает... (или у меня руки кривые)
То выгружает в Excel, то не выгружает: ошибка "Floating point overflow"
Очень долго борюс с этой проблемой.
Стал замечать, что ошибка возникает, когда нет открытого Excel.
Посоветуйте, как правильно работать с TxlReport.
← →
Игорь Шевченко (2003-10-01 12:37) [11]Alibaba © (01.10.03 12:33)
1) Задай свой вопрос в отдельной ветке.
2) И не в этом форуме
← →
Alibaba (2003-10-01 13:13) [12]Да, задавал уже много раз... :((
Ни ответа ни привета.
Страницы: 1 вся ветка
Форум: "WinAPI";
Текущий архив: 2003.11.24;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.01 c