| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Excel и Delphi [D5, Win95/98, WinXP]

Евг ©   (2005-01-24 10:44:00) 

Здрасти!

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-закрывает книгу но не закрывает сам екскел, а мне надо закрыть екскел

---

Sash   (2005-01-24 13:23:00) [1]

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

---

Sash   (2005-01-24 12:57:00) [2]

XL.Quit;
XL.Unassigned;

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

---

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

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


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

:)))))

---

Ega23   (2005-01-24 11:24:00) [4]

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

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 10:56:00) [5]

ExcelApplication.Quit;
ExcelApplication := 0;

---

Наверх