Вниз
Скачать: CL | DM;

Паковка-сжатие файла db   Найти похожие ветки 

 
sapsi   (2003-09-30 08:54) [0]

Добрый день.
Как после удаления записей из БД сжать эту базу, очистить от временных записей.
Необходимо, чтоб не вышел за допустимые размеры.
Спасибо.


 
ЮЮ ©   (2003-09-30 09:02) [1]

В Парадоксе нет особой необходимости это делать, т.к. место удаленных записей затем используется при добавлении новых. А за допустимые пределы выйдет в случае, если там так много действительно нужных записей :-)


 
JK   (2003-09-30 09:22) [2]

Извини, что на Си. Просто я на нем пишу. Надеюсь, поможет:

void __fastcall TArch::fDbiDoRestructure2(char *TblName)
{
CRTblDesc TblDesc;
memset((void *) &TblDesc, 0, sizeof(CRTblDesc));
lstrcpy(TblDesc.szTblName, TblName);
lstrcpy(TblDesc.szTblType, szPARADOX);
TblDesc.bPack = TRUE;
DbiDoRestructure(DataModule3->Database1->Handle, 1, &TblDesc, NULL, NULL,NULL, FALSE);//);
}

Во главе всего стоит функция из API BDE DbiDoRestructure.
Ей передается хэндл на базу данных и адрес структуры, в которую записывается тип и имя таблицы. Собственно, все. Для того, чтобы при реструктуризации база упаковалась, добавлена строчка

TblDesc.bPack = TRUE;

Вообще, поищи на DelphiKingdom.ru строчку DbiDoRestructure.
Помнится, были там примеры на эту тему...


 
Andriano   (2003-09-30 09:24) [3]

Странно...когда же умрет файл-серверная технология?



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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.01 c
1-65540
Yanis
2003-10-08 09:10
2003.10.20
Podsvetka sintaksisa


1-65468
SoftAl
2003-10-09 10:14
2003.10.20
Картинка в Memo


6-65572
hlor
2003-07-10 23:38
2003.10.20
Indy


1-65433
Андрей Л.
2003-10-07 15:11
2003.10.20
Очистка всех Edit ов на форме


3-65353
free4all
2003-09-29 15:51
2003.10.20
error creating cursor handle ?




   Наверх