[[duilioisola]]

Si te refieres a hacer un Close..Open de las tablas, podrías recorrerlas todas, recorriendo los componetes del DataModule.

Código Delphi [-]
{DM es el DataModule}
for i := 0 to DM.ComponentCount -1 do
begin
   if (DM.Components[i] is TTable {o el componente Zeos equivalente}) do
   with (TTable(DM.Components[i])) do
   begin
      Close;
      Open;
   end;
end;