Ejemplo de la ayuda de delphi:
Código Delphi
[-]
with Table1 do
begin
Active := False;
** DatabaseName := 'Delphi_Demos';
** TableName := 'CustInfo';
** TableType := ttParadox;
EmptyTable;
end;
Las instrucciones con ** las tendrás especificadas en tiempo de diseño, por tanto, solo tienes que cerrar la tabla y vaciarla, pero con el TDatabase y Session abiertos.