[Doctor_Che]

Необзодимо удалить все записи из таблицы.
Делаю так

Код:

procedure TForm1.DelAllClick(Sender: TObject);
begin
  Form1.tbStd.Active := False;
  Form1.tbStd.EmptyTable;
end;

Выдаёт ошибку
"Table is busy"
Как побороть?