是将表记录清空不是将数据库清空吧,若是话用下面语句
tablename.sql.add('delete from tablename');

解决方案 »

  1.   

    用 TQuery 控件按一下的事件中加以下代码:With Query1 do begin
         Close;
         SQL.Clear;
         SQL.Add('Delete From 表名');
         ExecSQL;
    end;
      

  2.   

    for i:=1 to adotable1.recordcount do
        begin
             adotable1.delete;
             next;
        end;
      

  3.   

    procedure TForm1.BitBtn1Click(Sender: TObject);
    begin
      table1.EmptyTable;
    end;
      

  4.   

    用 TQuery 控件按一下的事件中加以下代码:With Query1 do begin
         Close;
         SQL.Clear;
         SQL.Add('Delete From 表名');//写log文件,比较慢,
         SQL.Add('truncate tabel  表名');//不写log文件,速度很快。     你可以自己选择!!!!!!!!!!!!!!!!!!!     ExecSQL;
    end;
      

  5.   

    如果是Table的话,只有Table.EmptyTable了
      

  6.   

    while not table1.eof do
     table1.delete;