Лидеры рейтинга

ID: 226425

Konstantin Shvetski

Мастер-Эксперт

942

Россия, Северодвинск


ID: 259041

Алексеев Владимир Николаевич

Мастер-Эксперт

513

Россия, пос. Теплоозёрск, ЕАО


ID: 401284

Михаил Александров

Академик

354

Россия, Санкт-Петербург


ID: 137394

Megaloman

Мастер-Эксперт

312

Беларусь, Гомель


ID: 400669

epimkin

Профессионал

191


ID: 400484

solowey

Профессор

71


ID: 401888

puporev

Профессор

53

Россия, Пермский край


8.1.6

02.01.2021

JS: 2.2.2
CSS: 4.2.0
jQuery: 3.5.1


 
   
Просмотр сообщений мини-форумов - solovejkl2
• Pascal / Delphi / Lazarus
Вопрос № 189368 ушел в рассылку

Здравствуйте! Прошу помощи в следующем вопросе:

Подскажите что в коде не правильно.
По задумке должен грузить в цикле данные из XML файлов в Excel. Грузит только первую строчку, а дальше вываливает Access violation.

[code]
procedure TForm1.LoadXmlBtnClick(Sender: TObject);
var
searchresult : TSearchRec;
i : SmallInt;
text: string;
xml: TXMLDocument;
XL: Variant;
begin
XL := CreateOLEObject('Excel.Application');
XL.WorkBooks.Open(ExtractFilePath(Application.ExeName)+ 'book.xlsx');
XL.visible := true;
i := 0...


Автор вопроса: solovejkl2 (Посетитель)
Дата отправки вопроса: 14.05.2016, 22:36