Записать в Excel XML из Delphi / Lazarus

Когда задача стоит “Сохранить из Delphi или Lazarus в Excel” у разработчика просто огромный выбор — частично он описан в статье “Как записать в XLS Biff8 из Delphi”, там же я вкратце расписал, почему это плохой выбор. А что же тогда хорошо? А хорошо — сохранять в новый (ну, относительно новый) XML XLSX.

Но Microsoft не был бы собой, если бы, традиционно не попытался сделать “свой собственный XML — c блэкджеком и ячейками!”. А потому у Excel на самом деле есть не один а целых два(!) XML-стандарта для хранения Excel-файлов: более ранний и более правильный.

Видим окно предварительного просмотра и кнопку “сохранить”
“Эй, уважаемый, а мне, простому программисту чем пользоваться?!” — спросите вы и будете совершенно правы. Короткий ответ — 2007 XML, более поздний. А ниже я расскажу, почему.

Углубиться в тему XML используемого с 2007 и далее можно тут — там целый мир!
А мы просто сравним два варианта сохранения в XML и XLSX XML и решим, какой использовать рациональнее и в каких случаях.

Экспорт в XML — более простой. Экспортируются только текстовые объекты. Изображения, графики, карты, штрихкоды, форматирование TfrxRichView, HTML-тэги и фоновое изображение в результирующий Excel XML не попадут.

Ниже традиционно распишу, как реализовать сохранение в Excel XML полностью из кода, если не хочется или не требуется показывать предпросмотр и давать возможность отправить на печать. Окошко настроек экспорта в XML . Специально размещаю рядом для сравнения настройки. Всё не просто, а очень просто!

Средства FastReport помогают выбрать, какие страницы нашего документа отправить в Excel, диапазон или только определённые страницы.

Настройки экспорта – большее визуальное соответствие с начальным вариантом (WYSIWYG), разрыв страницы, и continuous — непрерывный документ с пропуском промежуточных заголовков и подвалов страниц.

Открыть после экспорта – результирующий файл будет открыт сразу же после экспорта программой Microsoft Excel (Ну или что у пользователя в системе ассоциировано с файлами расширения XLSX для их открытия).

[expert_bq id=»1570″]Когда нам необходимо работать с Excel, то обычно мы открываем ExcelApplication, затем открываем WorkBook и в конце используем WorkSheet. Если же вы хотите что-то уточнить, обращайтесь ко мне![/expert_bq] Знающие люди говорят, что это свойство отвечает за перерисовку окон Excel. Это все равно, что DisableControls у TDataSet. Добавляет скорости, если в нем false. И это правда что, если выключить его во время длительных пересчетов, то быстрее пересчитается. Но мы, ведь, не выключали его. Зачем тогда эта строка?

Delphi импорт из excel

Разберёмся подробнее почему XLSX весит больше XML. За основу взяли вот этих прекрасных рыбок. Данный документ содержит много текста, табличные данные и 30 фотографий. Для большей наглядности сравним ещё и нестареющий Excel 97, о котором мы говорили в другой статье.

Записываем XLS из Delphi c помощью FastReport

Итак, ваш документ содержит большие таблицы, многоуровневые списки, иллюстрации, карты, штрих-коды и вы думаете, как бы это перенести в Excel?
Не буду тут повторно останавливаться на создании отчёта — бросили на форму проекта TfrxReport, TfrxBIFFExport и TButton, прописали на кнопку вызов

— строим отчёт и запускаем окно предпросмотра того, что получилось.
Видим окно предварительного просмотра и кнопку “сохранить”

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

Можно указать, куда отправить Excel-файл (локально в память компьютера, на электронную почту или поместить в облако).

Открыть после экспорта – результирующий файл будет открыт сразу же после экспорта программой Microsoft Excel.

Служебная информация, которая также пойдёт в Excel-файл: название, автор, ключевые слова, версия документа, приложения, категория, менеджер и комментарий к файлу.

Безопасность — защита паролем документа (дополнительно можно указать подтверждение).

Если задать непустую строку пароля, то сгенерированный файл будет защищён паролем. Пароль пишется только символами Юникода и должен быть короче 256 символов.

Опции – настройка документа на большее визуальное соответствие с первоначальном вариантом (WYSIWYG), экспорт в таблицу картинок-изображений, отображения границ ячеек, выставлять размер страницы, удаление пустых строк (для экономии места в этом конкретном формате очень важная опция), экспорт формул.

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

[expert_bq id=»1570″]Кстати, в импортированной Excel Type Library независимо от версии Delphi — 4 или 5 некоторые свойства, имеющие dispid 0, почему-то все-таки объявлены как default. Если же вы хотите что-то уточнить, обращайтесь ко мне![/expert_bq] После такого действия у меня возникает ощущение, что я переплатил за свою видеокарту. Фокус в Excel-е, но я по-прежнему наблюдаю форму демо-проекта. Видимо, программисты из MS не рассчитывали на то, что кто-то закроет Excel, вызванный через создание Excel.Application, а потом захочет увидеть его снова. Но я-то захотел?!

Как создать файл в Excel 97(2000, XP file) — XLS из Delphi / C Builder / Lazarus? Fast Reports

​ в студию ))​ где стоит Delphi​ её насильно втюхивать​другим именем.​ невозможен. Проверьте следующее:​ программе путь к​ которую я написала​ программы на другой​выберите пункт​ действий:​ ссылку.​Более новые версии​ начинается веселье, а​: Если честно, идей​
​ ведения журнала.​ помочь какие-то сервис-паки.​ ошибка — после​ Так сложно что-то​ все нормально работает​ пока бабло с​

Запись данных в Excel

Здесь мы вначале создаем двумерный вариантный массив, используя метод VarArrayCreate, после чего заполняем массив данным и передаем этот массив в Excel. Обратите внимание, что при записи в Excel не используются никакие циклы — запись происходит в 2 простых действия:

Для полноты картины ниже на рисунке представлено значение счётчика, который отсчитал время от момента создания массива до активации приложения Excel включительно:

Про эту библиотеку мне поведал один из читателей блога в комментарии как раз-таки к посту «»Работа с Excel в Delphi. Основы основ«. Чтобы лишний раз Вас не переправлять на комментарий с примером использования этой библиотеки, я с разрешения GS (ник автора кода) просто опубликую здесь уже готовые примеры использования библиотеки XLSReadWrite:

[expert_bq id=»1570″]В delphi работа с файлами несколько различается в зависимости от того, надо ли записывать в файл произвольный текст, или это будет последовательность однотипных данных. Если же вы хотите что-то уточнить, обращайтесь ко мне![/expert_bq] Вот мы лет эдак 6+ назад делали систему, которая закачивала данные из филиалов в консолидированную бд. ДАнные шли разного формата, и эксель и пдф и csv и . так вот всем были спущены указания как формировать эти самые данные, по вашей логике, всяк мог накосячить чего угодно, а мы должны угадать чего накосячили?

Delphi работа с файлами

1. Каким образом можно импортировать данные из таблицы Excel в таблицу БД?
2. Можно ли использовать функции Drag&Drop? Скопировать диапазон в Excel и вставить в таблицу (для отображения данных использую компонент DBGrid)?

Завершение работы с файлом закрывает файл. С практической точки зрения это означает, что к файлу больше нельзя обратиться процедурами записи или чтения. С другой стороны, теперь файл доступен для удаления и редактирования средствами файловой системы, например, с помощью «блокнота».