Форум: "Основная";
Текущий архив: 2005.02.06;
Скачать: [xml.tar.bz2];

Вниз

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;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.45 MB
Время: 0.064 c