Faking a service call using Caliburn Micro Coroutines

SessionService.cs

using System;
using System.ComponentModel.Composition;
using System.Windows.Threading;
using Caliburn.Micro;

namespace CaliburnMicroSample.Services
{
    [Export(typeof(ISessionService))]
    public class SessionService : ISessionService
    {
        public IResult Save()
        {
            // TODO: set up result here
            return new ServiceCallResult();
        }
    }

    public class ServiceCallResult : IResult
    {
        private DispatcherTimer timer;

        public ServiceCallResult()
        {
            timer = new DispatcherTimer();
        }

        public void Execute(ActionExecutionContext context)
        {
            timer.Interval = TimeSpan.FromSeconds(5);
            timer.Tick += timer_Tick;
            timer.Start();
        }

        void timer_Tick(object sender, EventArgs e)
        {
            timer.Stop();

            if (Completed != null)
                Completed(this, new ResultCompletionEventArgs());
        }

        public event EventHandler<ResultCompletionEventArgs> Completed;
    }
}