Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Базы";
Текущий архив: 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 добавить 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>


 
Anatoly Podgoretsky ©   (2004-11-12 11:48) [3]

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



Страницы: 1 вся ветка

Форум: "Базы";
Текущий архив: 2004.12.12;
Скачать: [xml.tar.bz2];

Наверх









Память: 0.55 MB
Время: 0.072 c
14-1101223336
ОлегЪ
2004-11-23 18:22
2004.12.12
Дизайн


1-1101533719
Baks
2004-11-27 08:35
2004.12.12
XPManifest


3-1100087235
MORA
2004-11-10 14:47
2004.12.12
переход на другой сервер БД


14-1101105848
ИМХО
2004-11-22 09:44
2004.12.12
Слово об эмиграции


1-1101885164
opoloXAI
2004-12-01 10:12
2004.12.12
Как распечатать TStrings в три столбика?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский