Форум: "Базы";
Текущий архив: 2004.12.12;
Скачать: [xml.tar.bz2];
ВнизСжать DBF Найти похожие ветки
← →
lightix (2004-11-12 10:36) [0]Подскажите (желательно с примерами) как сжать DBF файл?
Нашел функцию DbiPackTable, но не пойму как с ней работать
← →
Соловьев © (2004-11-12 10:44) [1]Учимся работать с хелпом. F3 - bde32.hlp Там набираем данную функцию - и клацаем мышкой по Delphi examples
← →
Koala © (2004-11-12 11:16) [2]Вообще
> [1] Соловьев © (12.11.04 10:44)
прав!!!
а так:
в Uses добавить BDEprocedure 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>
← →
Anatoly Podgoretsky © (2004-11-12 11:48) [3]Так в справке поднобнейший пример для двух языков программирования.
Страницы: 1 вся ветка
Форум: "Базы";
Текущий архив: 2004.12.12;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.04 c