Поясните в чом проблема?

← →
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
ругается также

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

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

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

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

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

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

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