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

удалить записи в таблице DBF   Найти похожие ветки 

← →
pupspups ©   (2006-11-15 14:49) [0]

Подскажите пожалуйста,

есть таблица в DBF файле. Нужно её очистить от записей.
пишу

Table1.First;
while not Table1.Eof do
begin
Table1.Delete;
end;

Но после этого в DBF происходит не удаление записей а лишь пометка на удаление.
Подскажите как либо сжать, либо другой вариант очистки.

---

← →
clickmaker ©   (2006-11-15 14:51) [1]

EmptyTable?

---

← →
pupspups ©   (2006-11-15 14:56) [2]

при  написание EmptyTable выскакивает ошибка:

ProjectXXX.exe raised exception class EDBEngineError with messgae "Table is busy"

 Empty вызывал так:
    with Table1 do
    begin
       Active := False;
       TableName := "Name.dbf";
       TableType := ttDefault;
       EmptyTable;
    end;

---

← →
sniknik ©   (2006-11-15 14:58) [3]

закрой в дельфях (в режиме разработки)

---

← →
pupspups ©   (2006-11-15 15:03) [4]

т.е. в Object Ispectore? я правильно Вас понял.

---

← →
sniknik ©   (2006-11-15 15:22) [5]

а ты попробуй и узнаешь...
вообще ошибка ""Table is busy"" не конкретизирует где, просто говорит - открыта, гдето, а нужна закрытой... весьде.
иначе (если б зависело только от одного) то словил бы "Table is busy Object Ispector-ом"...

---

← →
pupspups ©   (2006-11-15 16:52) [6]

спасибо, разобрался

---

← →
Anatoly Podgoretsky ©   (2006-11-15 21:23) [7]

> pupspups  (15.11.2006 14:49:00)  [0]

Наоборот, происходит именно удаление, не происходит упаковка таблицы, так не одна база этого не делает.

---

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

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



Память: 0.46 MB
Время: 0.026 c