Delphi Компоненты - работаем с Excel

Опубиковано: 03.12.2008 г., автор: , просмотров: 72084

Delphi Компоненты TXLSFile: Работаем с Excel

Хочу представить вашему вниманию отличную на мой взгляд библиотеку компонентов, основной задачей которой является работа с XLS файлами, или с Excel файлами.

Итак, TXLSFile - библиотека Borland Delphi для чтения и записи файлов Microsoft Excel.
Библиотека обращается к файлам напрямую, не используя OLE Automation с Microsoft Excel.

Средняя скорость записи - 75 000 ячеек в секунду.

Возможности

Работа с файлами MS Excel
TXLSFile не требует для работы установленного Microsoft Excel.
TXLSFile подерживает формат MS Excel версий 97, 2000, XP, 2003 (во всех этих версиях используется формат файла BIFF8).
Файлы XLS, созданные с помощью TXLSFile, могут быть открыты в Excel 2007.
Файлы XLS, созданные с помощью TXLSFile, могут быть открыты в OpenOffice.

Пример работы библиотеки:

Delphi Excel компоненты

Все бы было очень круто если бы не одно НО библиотека платная ! и её стоимость, для жителей бывшего СССР составляет 1000 руб.

Но не спешите отчаиваться ведь вы можете спокойно установить себе Demo версию, тем более Все возможности зарегистрированной версии доступны и в демо-версии, Единственное ограничение: демо-версия работает только в Borland Delphi IDE

Скачать и более подробно ознакомиться с библиотекой вы сможете на официальном сайте

Пару слов о установке компонента:
Лично я устанавливал на Delphi 7 поэтому буду рассказывать ход установки для него.

1. Скачать с официального сайта компонент для вашей версии Delphi
2. Запускаем скаченный exe'шник и устанавливаем его в удобную для вас папку.
3. Заходим в папку куда был установлен компонент, внутри, из папки Bpl и Dcu копируем все, в директорию "куда у вас установлен Delphi \Projects\Bpl\ " ( у меня получилось вот так: C:\Program Files\Borland\Delphi7\Projects\Bpl\)
4. Теперь открываем Delphi, жмем в меню File -> Close All , затем Component -> Install Packages , в открывшимся окне жмем на кнопочку Add и выбираем файл xf40_unr_d7.bpl (находиться он в папке bpl) Всё жмем ОК

Компонент установлен, можно Экспериментировать !

На этом у меня все, удачного вам дня !

До встречи DelphiExpert.ru !!!



Похожие материалы

Последние из рубрики

Александр 02 Jun 2011 в 00:00 #
Создаешь unit сохраняешь его под именем AntiTrial

всатвляешь туда код сергея. вопросики (у меня вставились они вместа ковычек) меняешь на одинарные ковычки.
привязываешь в стартовой форме (alt+f11) созданный антитриал юнит. и все
anonymous 27 Apr 2011 в 00:00 #
2Настя
на сайт впадлу зайти? sm-software.com
Настя 12 Apr 2011 в 00:00 #
как купить? 404-not found!!!
Рамон 29 Jan 2011 в 00:00 #
У TSheet нет метода UsedRange. Ничего не получится таким образом.
Рамон 29 Jan 2011 в 00:00 #
Решение нашлось. Не очень красивое, но работающее :)

uses ..., XLSRects;
var
...
CellRect:TRangeRect;
...
{собственно, код для получения количества колонок}
xf.Workbook.Sheets.Item[iSheet].GetUsedRect(CellRect);
ColCount:=CellRect.ColumnTo;

Строго говоря, CellRect содержит не только количество колонок.
Вот так он объявлен:

TRangeRect = packed record
RowFrom, RowTo: Word;
ColumnFrom, ColumnTo: Byte;
RelativeFlags: Byte;

ОтменитьДобавить комментарий