diff --git a/Source/GUIBase/uEditorGridBase.pas b/Source/GUIBase/uEditorGridBase.pas
index 89f07407..d2fcbeec 100644
--- a/Source/GUIBase/uEditorGridBase.pas
+++ b/Source/GUIBase/uEditorGridBase.pas
@@ -162,10 +162,11 @@ end;
 procedure TfEditorGridBase.actEliminarUpdate(Sender: TObject);
 begin
   inherited;
+
   if HayDatos and Assigned(ViewGrid) then
     (Sender as TAction).Enabled := not (dsDataTable.DataTable.State in dsEditModes)
-      and not ViewGrid.IsEmpty
       and ViewGrid.esSeleccionCeldaDatos
+      and (ViewGrid.NumSeleccionados > 0)
   else
     (Sender as TAction).Enabled := False;
 end;
diff --git a/Source/Modulos/Albaranes de cliente/Views/uEditorAlbaranDevCliente.pas b/Source/Modulos/Albaranes de cliente/Views/uEditorAlbaranDevCliente.pas
index 0178501b..d662a5da 100644
--- a/Source/Modulos/Albaranes de cliente/Views/uEditorAlbaranDevCliente.pas	
+++ b/Source/Modulos/Albaranes de cliente/Views/uEditorAlbaranDevCliente.pas	
@@ -34,7 +34,9 @@ uses
 
 procedure TfEditorAlbaranDevCliente.actEliminarUpdate(Sender: TObject);
 begin
-  (Sender as TAction).Enabled := HayDatos and (FAlbaran.REF_FACTURA = '');
+	inherited;
+	if (Sender as TAction).Enabled then
+		(Sender as TAction).Enabled := (FAlbaran.REF_FACTURA = '');
 end;
 
 procedure TfEditorAlbaranDevCliente.AsignarVista;
diff --git a/Source/Modulos/Albaranes de cliente/Views/uEditorAlbaranesDevCliente.pas b/Source/Modulos/Albaranes de cliente/Views/uEditorAlbaranesDevCliente.pas
index 8c5ded50..30db082c 100644
--- a/Source/Modulos/Albaranes de cliente/Views/uEditorAlbaranesDevCliente.pas	
+++ b/Source/Modulos/Albaranes de cliente/Views/uEditorAlbaranesDevCliente.pas	
@@ -31,7 +31,9 @@ uses
 
 procedure TfEditorAlbaranesDevCliente.actEliminarUpdate(Sender: TObject);
 begin
-  (Sender as TAction).Enabled := HayDatos and (FAlbaranes.REF_FACTURA = '');
+	inherited;
+	if (Sender as TAction).Enabled then
+		(Sender as TAction).Enabled := (FAlbaranes.REF_FACTURA = '');
 end;
 
 procedure TfEditorAlbaranesDevCliente.AsignarVista;