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

Поясните в чом проблема?   Найти похожие ветки 

← →
Term   (2003-09-18 11:31) [0]

var
xlap,xl:OLEVariant;
begin
XLap:= CreateOLEObject("Excel.Application");
XLap.Workbooks.Open("C:\WINDOWS\Рабочий стол\Помощник.xls");
XLap.visible := false;
xl:=xlap.Workbooks[1].Sheets[1];
...
XLap:=Unassigned;

вроде всё как хелпе, однако на последнюю строку ругается
"Invalid variant operation", подскажите что не так

---

← →
Term   (2003-09-18 11:50) [1]

ну ктонить.....

---

← →
Term   (2003-09-18 11:52) [2]

......

---

← →
clickmaker ©   (2003-09-18 11:54) [3]

xlap := Null

---

← →
Murad ©   (2003-09-18 11:55) [4]

Твой код правильный, единственное что могу предположить, что ты портишь память в тех строчках которые не указал(...) или систему глючит

---

← →
Term   (2003-09-18 11:58) [5]

в тех строках я просто обращаюсь к ячейкам вот:
while xl.Cells[stroka,1].Value<>"" do
begin
append_sotr;
inc(stroka);
end;

---

← →
Murad ©   (2003-09-18 12:01) [6]

А ты закоментируй этот блок и глянь, что будет происходить, да и вообще комментируя поочередно блоки можно быстро понять, в этом коде ошибка или где-то еще...

---

← →
Term   (2003-09-18 12:03) [7]

делал так, тот же результат.... обращается к экселю и потом ошибка этаже вываливается, и на xlap := Null
ругается также

---

← →
Murad ©   (2003-09-18 12:13) [8]

Ну не знаю... у меня твой код отрабатывает нормально, может ты еще где-то память портишь... Попробуй заменить OLEVariant на
Variant (хотя это фигня)

---

← →
Term   (2003-09-18 12:17) [9]

> Попробуй заменить OLEVariant на
> Variant (хотя это фигня)

точно так и есть, всё тоже...
я пока оставлю, потом на другой тачке попробую,
спасибо.

---

← →
Term   (2003-09-18 12:19) [10]

да нет, в других местах я с БД работаю, а в этом месте, нужно было данные из экселевскокго файла брать, может действительно система глючит

---

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

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



Память: 0.47 MB
Время: 0.02 c