Hola Edgar.
El error fue mío por haber escrito el código en el aire...
Donde dice:
Código Delphi
[-]
with Form4.Table4 do
begin
CachedUpdates:= False;
Close;
end;
Tendría que decir:
Código Delphi
[-]
with Form4.Table4 do
begin
Close;
CachedUpdates:= False
end;
Saludos.