Форум: "Corba";
Текущий архив: 2006.08.27;
Скачать: [xml.tar.bz2];
ВнизDelphi 5 и Excel 2002. Кто знает, как программно закрыть Найти похожие ветки
← →
Дима Н. (2005-08-03 16:08) [0]Работаю в Delphi 5 и Excel 2002 под WinXP. Обратился к Excel для чтения данных, при этом Excel не появляется. Появляется только тогда, когда открываю какой нибудь другой файл. Подскажите пожалуйста, как мне программно выгрузить Excel? Тот код, что у меня есть, не позволяет этого сделать.
Благодарю за помощь.
Дмитрий.
← →
GanibalLector © (2005-08-04 01:52) [1]>Тот код, что у меня есть, не позволяет этого сделать
Ну дык... приведи код.
P.S. А вообще-то поиск тут есть;)
← →
Дима Н. (2005-08-04 12:00) [2]Поиск у меня почему-то не работает. Вот код
procedure TForm1.ReleaseExcel;
begin
if Assigned(IXLSApp) then begin
if (IXLSApp.Workbooks.Count > 0) and (not IXLSApp.Visible[0]) then begin
IXLSApp.WindowState[0] := TOLEEnum(xlMinimized);
IXLSApp.Visible[0] := true;
if not(csDestroying in ComponentState) then Self.SetFocus;
Application.BringToFront;
end;
end;
FreeAndNil(FIXLSApp);
end;
← →
Damager (2005-08-04 14:40) [3]Где-то я видел, что Excel закрывается так:
var e: variant;
// создание
e := createoleobject("Excel.Application");
// уничтожение(закрытие)
e := unassigned;
← →
k2 © (2005-08-05 04:19) [4]IXLSApp.Visible[0] := true; а зачем?
IXLSApp.Quit перед freeandnil
← →
Дима Н. (2005-08-05 09:36) [5]Получилось!!!
Большое спасибо!!!
Страницы: 1 вся ветка
Форум: "Corba";
Текущий архив: 2006.08.27;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.075 c