Лидеры рейтинга
Мастер-Эксперт
942
Мастер-Эксперт
513
Академик
354
Мастер-Эксперт
312
Профессионал
191
Профессор
71
Профессор
53
8.1.6
02.01.2021
JS: 2.2.2
CSS: 4.2.0
jQuery: 3.5.1
Здравствуйте! Прошу помощи в следующем вопросе:
Подскажите что в коде не правильно.
По задумке должен грузить в цикле данные из 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...