Скачать: CL | DM;

Variant does not reference an automation object   Найти похожие ветки 

← →
Chainik   (2003-01-08 13:07) [0]

Помогите, плиз, чайнику. Уже переискался. Выдает эту ошибку, когда я пытаюсь достать данные из Excel"я. Хочу просто из экселевского файла (уже существующего) извлечь хоть какие-нибудь данные, т.е. разобраться с этим начальным этапом, а потом уж и дальше разбираться (чтобы извлекать из определенного столбца по какому-то условию). Делаю:

procedure TForm1.Button1Click(Sender: TObject);
var vExcel, vWorkSheet: OLEVariant;
begin
vExcel := CreateOLEObject("Excel.Application");
VExcel.AssignTofile("my.xls");
Edit1.Text:=vExcel.WorkBooks.WorkSheet.Cells[1,1];
Edit1.Text:=vWorkSheet.Cells[1,1];
Edit2.Text:=vWorkSheet.Cells[2,1];
end;
но выдает выше приведенную ошибку. Может я вообще не тем путем иду и это как-то по другому делается.

---

← →
asmith   (2003-01-08 13:15) [1]

А в каком месте ругается? На AssignTofile? Если да, то СОМ объект просто не создан - какие-то проблемы с Excel.

---

← →
Наталия ©   (2003-01-08 13:23) [2]

Попробуй так:
vExcel.WorkBooks.open("\rep.xls",true);
Edit1.Text:=vExcel.WorkBooks[1].WorkSheets[1].Cells[1,1];
Здесь
Edit1.Text:=vWorkSheet.Cells[1,1];
Edit2.Text:=vWorkSheet.Cells[2,1];
vWorkSheet разве создан?

---

← →
Chainik   (2003-01-08 13:32) [3]

>to asmith

да, а как это исправить?

---

← →
Chainik   (2003-01-08 13:33) [4]

>to Наталия ©

пробую, пишет что не может найти мой файл - my.xls

---

← →
Chainik   (2003-01-08 13:55) [5]

Ура, все получилось. Наталии огромное спасибо.
Только у меня возник очередной вопрос, вы уж извините.
У меня (Win2000)потом в диспетчере задач зависают в процессах все эти запуски Excel"я. Как тут можно освобождать память?

---

← →
Наталия ©   (2003-01-08 13:55) [6]

Задай полный путь

---

← →
Наталия ©   (2003-01-08 13:58) [7]

E.Quit;
E:=unassigned;

---

← →
Chainik   (2003-01-08 13:59) [8]

> Наталия © (08.01.03 13:55)

Спасибо, я это и сделал, но вот тут у меня выше вопрос возник.

---

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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.012 c