Creo que más bien le falta indicarle al TActionList que le notifique al componente TDecBrowser cuando se está destruyendo, esto se haría de la siguiente forma:
Código Delphi
[-]
procedure TDecBrowser.SetActionList(Value: TActionList);
begin
if FActionList <> Value then
begin
FActionList := Value;
if Assigned(Value) then
Value.FreeNotification(Self)
end
end;
Ya con eso desde el Notification puedes eliminar la referencia al TActionList cuando este se destruya:
Código Delphi
[-]
procedure TDecBrowser.Notification(AComponent: TComponent;
Operation: TOperation);
begin
if (Operation = opRemove) and (AComponent = FActionList) then
FActionList := nil
end;
Saludos...