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

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

Как упаковать таблицу [D6, dBase, FoxPro]


Руст ©   (2002-02-08 08:16:00) 

Работаю с таблицами с помощью ADO. Весь help излазил, а как упаковывать таблицы не нашел, если база большая и удалять много приходится, то размер махом разрастается. Как же все таки упаковывать?


Mirovodin (A)   (2002-02-15 15:49:00) [1]

Я пользовался таким набором :
драйверы : Microsoft jet 4.0 service pack 3
Компоненты KADAO (delphi.pari.bg их юзаю по тому, что не нужен сервис пак для Delphi 5 и ADO EXpress, free).
БД- MS Accsess 97-2000
так вот у этих компонентов есть проц-ра Compress. Работает на 100%


erik   (2002-02-15 15:20:00) [2]

Можно упаковать всю базу данных! Посмотри в MSDN Compact. Я в DAO упаковывал, а в ADO надо использовать другую DLL называется ADO M... тачно непомню. На королевстве есть статья.


NDim   (2002-02-15 13:45:00) [3]

Есть способ через ODBC надо ?
ICQ 71327171


Руст   (2002-02-11 08:13:00) [4]

Пришлось вот как выкручиваться: Нужно упаковать таблицу tab1. Создал шаблон-таблицу, аналог той которую нужно упаковать. Копирую её. Кидаю туда все данные оператором "INSERT INTO tab2 SELECT * FROM tab1" из Quare.sql. А затем переименовываю tab2 в tab1. А как реально упаковывать фиг его знает.


Kuusiniemi   (2002-02-08 18:48:00) [5]

>disprosis
Вы вопрос-то прочитали?? Вопрос был как упаковать таблицу, используя ADO! А Вы пример на что?? На BDE!

Тому кто скажет как это сделать через ADO надо памятник поставить!


disprosis   (2002-02-08 16:46:00) [6]

uses
dbiProcs

procedure TForm1.PackTable(Value: TTable);
begin
Value.Close;
Value.Exclusive := True;
try
Value.Open;
Check(DbiPackTable (Value.DBHandle,Value.Handle,PChar(Value.TableName),PChar(szDBASE),True));
except end;
Value.Close;
Value.Exclusive := False;
end;


Руст   (2002-02-08 15:24:00) [7]

В том то и дело что с BDE не хотелось бы работать...


Стас   (2002-02-08 11:38:00) [8]

В BDE есть такая функция - dbiPackTable. А найти ее ты можешь в справке Вorland Database Engine. В предметном указателе печатай pack - и выйдет справка по упаковке таблицы. Даже пример есть...


Гоша   (2002-02-08 10:58:00) [9]

Боюсь, что и не найдешь...
Или ADO или dbf с pack"ом - выбирай :)


Наверх

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