Delphi Excel Количество Строк

Delphi является мощной платформой для работы с Excel-файлами. Для подсчета количества строк в Excel-файле можно использовать объект Excel.Application и методы его объекта Workbooks. Пример кода на Delphi:

uses  Excel2000, Variants;var  xls: _ExcelApplication;  wb: _Workbook;  ws: _Worksheet;  rowCount: OleVariant;begin  xls := CoExcelApplication.Create; // Создание объекта Excel.Application  wb := xls.Workbooks.Open('C:\example.xlsx'); // Открытие файла Excel  ws := wb.Sheets[1]; // Выбор листа  rowCount := ws.UsedRange.Rows.Count; // Получение количества строк  ShowMessage('Количество строк: ' + IntToStr(rowCount)); // Вывод результата на экран  wb.Close(False); // Закрытие файла Excel  xls.Quit; // Закрытие приложения Excelend;

Описание кода: создаем объект Excel.Application, открываем книгу Excel и выбираем первый лист, получаем количество строк в используемом диапазоне листа и выводим результат на экран. Объекты Excel.Application, Workbook и Worksheet объявлены в библиотеке Excel2000, которая должна быть подключена в проекте.