一、

With Table1 do

Begin

  Active := False;

  DatabaseName := 'dbname';

  TableName := 'TableName';

  EmptyTable;

End;

二、

With Table1 do

Begin

  Active := False;

  DatabaseName := 'dbname';

  TableName := 'TableName';

  DeleteTable;

end;