Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Сжать DBF


lightix ©   (2004-11-12 10:36:00) 

Подскажите (желательно с примерами) как сжать DBF файл?
Нашел функцию DbiPackTable, но не пойму как с ней работать


Anatoly Podgoretsky   (2004-11-12 11:48:00) [1]

Так в справке поднобнейший пример для двух языков программирования.


Koala   (2004-11-12 11:16:00) [2]

Вообще
> [1] Соловьев ©   (12.11.04 10:44)
прав!!!
а так:

в Uses добавить BDE

procedure TdbaseTable.Pack(RegenIndexes: Boolean);
{ Упаковка таблицы для удаления записей из файла. }
const
SPackError = 'Таблица должна быть активная и открыта эксклюзивно.';
begin
{Таблица должна быть активная и открыта эксклюзивно}
if not (Active and Exclusive) then
 raise EDatabaseError.Create(SPackError);
try
{Упаковка таблицы}
 Check(DbiPackTable(DBHandle, Handle, Nil, Nil, RegenIndexes));
finally
 { Обновление Delphi из BDE}
  CursorPosChanged;
  Refresh;
end;
end;

CODE>


Соловьев   (2004-11-12 10:44:00) [3]

Учимся работать с хелпом. F3 - bde32.hlp Там набираем данную функцию - и клацаем мышкой по Delphi examples


Наверх

Титульная страница Поиск, карта сайта Написать письмо