Código Delphi [-] begin privfotos.Close; privfotos.Exclussive:=True; try privfotos.Open; privfotos.EmptyTable; except Showmessage('La tabla está bloqueada por otro puesto.'); end; end;
begin privfotos.Close; privfotos.Exclussive:=True; try privfotos.Open; privfotos.EmptyTable; except Showmessage('La tabla está bloqueada por otro puesto.'); end; end;