[noe]

Saludos a los compañeros del foro.

Tengo el siguiente problema:
Cuando quiero que se vacie la tabla se salta a la excepción de que la tabla esta ocupada, y que no puede
ser vaciada. Pero cuando pongo en comentario lo que esta encerrado con las llaves si vacia la tabla. cual
será el problema, les muestro el código que utilizo:

Código Delphi [-]
    procedure TFrm_ImprimirCorte.QuickRep1AfterPrint(Sender: TObject);
    var
     resp:Integer;
    begin
       Resp:=Application.MessageBox('¿Se imprimio el corte?','Impresión de Corte de Caja',
 mb_yesno);
       if resp=IDYES then
        begin
             {Abrimos la tabla en modo exclusivo (si se puede)}
          Try
           {DM_SICEC.Tbl_Provisionales.Insert;
           DM_SICEC.Tbl_ProvisionalesTotal.Value:=strtofloat(Frm_Corte.Edit1.Text);
           DM_SICEC.Tbl_ProvisionalesRealizo.Value:=DM_SICEC.Tbl_UsuariosUsuario.Value;
           DM_SICEC.Tbl_ProvisionalesHora.Value:=Time;
           DM_SICEC.Tbl_ProvisionalesFecha.Value:=Date;
           DM_SICEC.Tbl_Provisionales.Post;
            }
    
    
            with DM_SICEC.Tbl_Cortes do
            begin
              Active:=False;
              Exclusive:=True;
              Active:=True;
              try
                EmptyTable;
              except
                ShowMessage( 'No puedo vaciar la database'+
                             #13+
                             'Cannot empty database');
              end;
            end;
          Except
            ShowMessage('cannot open table in exclusive mode');
          end;
        end
       else
         Showmessage('Vuelva a imprimirlo por favor');
    end;

Gracias por la ayuda

Atte Noe