Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.02.06;
Скачать: CL | DM;

Вниз

Excel и Delphi   Найти похожие ветки 

 
Евг   (2005-01-24 10:44) [0]

Здрасти!

GetDir(0,path);
XL:= GetActiveOleObject("Excel.Application");
XL.DisplayAlerts := false;
XL.Visible:=false;
XL.WorkBooks.Open(path + "\report\Форма2.xls");
XL.Worksheets[1].activate;

подобным образом цепляюсь к екскел из делфи.
вопрос: как мне разорвать соединение с екскел и закрыть екскел
XL.QUIT-закрывает книгу но не закрывает сам екскел, а мне надо закрыть екскелЗдрасти!

GetDir(0,path);
XL:= GetActiveOleObject("Excel.Application");
XL.DisplayAlerts := false;
XL.Visible:=false;
XL.WorkBooks.Open(path + "\report\Форма2.xls");
XL.Worksheets[1].activate;

подобным образом цепляюсь к екскел из делфи.
вопрос: как мне разорвать соединение с екскел и закрыть екскел
XL.QUIT-закрывает книгу но не закрывает сам екскел, а мне надо закрыть екскелЗдрасти!

GetDir(0,path);
XL:= GetActiveOleObject("Excel.Application");
XL.DisplayAlerts := false;
XL.Visible:=false;
XL.WorkBooks.Open(path + "\report\Форма2.xls");
XL.Worksheets[1].activate;

подобным образом цепляюсь к екскел из делфи.
вопрос: как мне разорвать соединение с екскел и закрыть екскел
XL.QUIT-закрывает книгу но не закрывает сам екскел, а мне надо закрыть екскел


 
Style ©   (2005-01-24 10:56) [1]

ExcelApplication.Quit;
ExcelApplication := 0;


 
Ega23 ©   (2005-01-24 11:24) [2]

твой вопрос я бы задал так:

for i:=1 to 3 do
begin
Здрасти!

GetDir(0,path);
XL:= GetActiveOleObject("Excel.Application");
XL.DisplayAlerts := false;
XL.Visible:=false;
XL.WorkBooks.Open(path + "\report\Форма2.xls");
XL.Worksheets[1].activate;

подобным образом цепляюсь к екскел из делфи.
вопрос: как мне разорвать соединение с екскел и закрыть екскел
XL.QUIT-закрывает книгу но не закрывает сам екскел, а мне надо закрыть екскел

end;


 
Style ©   (2005-01-24 11:27) [3]


> Ega23 ©   (24.01.05 11:24) [2]


for i:=1 to 3 do
begin
 ExcelApplication.Quit;
 ExcelApplication := 0;
end;


:)))))


 
Sash ©   (2005-01-24 12:57) [4]

XL.Quit;
XL.Unassigned;

обе строчки надо написать в таком же порядке


 
Sash ©   (2005-01-24 13:23) [5]

блин, XL:=Unassigned будет правильней



Страницы: 1 вся ветка

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

Наверх




Память: 0.47 MB
Время: 0.026 c
14-1106164650
тихий вовочка
2005-01-19 22:57
2005.02.06
лохотрон


1-1106574729
vladimir29
2005-01-24 16:52
2005.02.06
WEBBrowsere


14-1105823247
olookin
2005-01-16 00:07
2005.02.06
Неожиданное открытие?


14-1105658183
Чеширский_Кот
2005-01-14 02:16
2005.02.06
что такое Cameo?


1-1106565993
Vasya.ru
2005-01-24 14:26
2005.02.06
Как определить, запущено ли приложение впервые или нет?