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

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

Удаление всех записей [D6, D7, Paradox, Access]


OxyGen ©   (2003-06-14 16:06:00) 

Здравствуйте!
Подскажите пожалуйста как удалить все записи из таблицы в базе *.mdb при помощи ADOTable. Спасибо.


Um   (2003-06-16 12:36:00) [1]

ADOTable.Connection.Execute("Delete from "+ADOTable.TableName);
ADOTable.Requery;


DrPass   (2003-06-15 15:06:00) [2]

>Barman
Да, а количество записей считается так:
i:=0;
ADOTable.First;
while not ADOTable.Eof do inc(i)
:)))


Barman   (2003-06-15 11:24:00) [3]

ADOTable.First;
while not ADOTable.Eof do
ADOTable.Delete;


Pat   (2003-06-15 01:18:00) [4]

>OxyGen © (14.06.03 21:30)
А если Query:TADOQuery?
Только еще надо Query.Connection установить


MsGuns   (2003-06-14 21:39:00) [5]

А почему так боимся квери ? После ее использования ADOTable надо переоткрыть и будет счастье.


OxyGen   (2003-06-14 21:30:00) [6]

А без Query не обойтись? у меня к таблице подключено ADOTable


MsGuns   (2003-06-14 21:03:00) [7]

with Query1 do
begin
SQL.Clear;
SQL.Add("DELETE FROM <Имя таблицы>");
try
ExecSQL;
except
ShowMessage("Удаление невозможно");
end;
end;


OxyGen   (2003-06-14 20:43:00) [8]

Я так пробовал, вылезает ошибка:
raized exception class EOleException with message "Операция не допускается в данном контексте"
Что бы это значило?


Kirill   (2003-06-14 16:16:00) [9]

ADOTable1.DeleteRecords(arAll);


Наверх

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