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

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

Помогите програмно очистить Table [D6, Paradox]


Toshanius ©   (2002-10-20 14:10:00) 

Мне надо програмно очистить Table без удаления *.db файлов, помогите please.. Очень срочно!!!


Mixvictor   (2002-10-21 18:36:00) [1]

Поправьте если я ошибаюсь, но EmptyTable только помечает записи на удаление. В RXLIB была функция непосредственного удаления записей из таблицы.


Moro   (2002-10-21 12:52:00) [2]

Вот процедурка которая очищает всю таблицу. У меня работала.

procedure EmTable(Table : TTable);
Begin
Table.DisableControls;
try
if Table.Active = True then Table.Close;
Table.EmptyTable;
Table.Open;
finally
Table.EnableControls;
end;
End;


Shatun   (2002-10-21 12:30:00) [3]

Ну если проблема с экслюзивным доступом, удаляй построчно проверяя запись на предмет захвата.
While Not(Table.eof) do
begin
{проверка и удаление}
end;
Долгий процес, да и результат необязательно 100%, ведь если запись захвачена, то ее неудалить.


Geka   (2002-10-21 08:53:00) [4]

Query:
Delete * from Table


MsGuns   (2002-10-20 16:47:00) [5]

>LordOfSilence © (20.10.02 14:35)

>Если не ошибаюсь, в момент вызова EmptyTable
>необходимы будут Exclusive-права на таблицу.


Совершенно справедливо !


LordOfSilence   (2002-10-20 14:35:00) [6]

Вдогонку:
Если не ошибаюсь, в момент вызова EmptyTable
необходимы будут Exclusive-права на таблицу.


Anatoly Podgorestky   (2002-10-20 14:19:00) [7]

Расшифруй, но наверно тебе нужен EmptyTable


Наверх

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