如何解决如何从C＃调用和处理异步F＃工作流
|| 我读过一些F＃教程，并且注意到与C＃相比，用F＃执行异步和并行编程是多么容易。因此，我试图编写一个将从C＃调用的F＃库，并以C＃函数（委托）作为参数并异步运行它。 到目前为止，我已经设法传递了该函数（我什至可以取消），但是我想念的是如何实现回传给C＃的回调，该回调将在异步操作完成后立即执行。 （例如，函数AsynchronousTaskCompleted？）。我也想知道我是否可以从函数AsynchronousTask发布（例如Progress％）回到F＃。 有人可以帮帮我吗？ 这是我到目前为止编写的代码（我对F＃不熟悉，因此以下代码可能是错误的或实现不正确的代码）。//C# Code Implementation (How I make the calls/handling)
//Action definition is: public delegate void Action();
Action action = new Action(AsynchronousTask);
Action cancelAction = new Action(AsynchronousTaskCancelled);
myAsyncUtility.StartTask2(action,cancelAction);
Debug.WriteLine(\"0. The task is in progress and current thread is not blocked\");
......
private void AsynchronousTask()
{
//Perform a time-consuming task
Debug.WriteLine(\"1. Asynchronous task has started.\");
System.Threading.Thread.Sleep(7000);
//Post progress back to F# progress window?
System.Threading.Thread.Sleep(2000);
}
private void AsynchronousTaskCompleted(IAsyncResult asyncResult)
{
Debug.WriteLine(\"2. The Asynchronous task has been completed - Event Raised\");
}
private void AsynchronousTaskCancelled()
{
Debug.WriteLine(\"3. The Asynchronous task has been cancelled - Event Raised\");
}
//F# Code Implementation
member x.StartTask2(action:Action,cancelAction:Action) =
async {
do! Async.FromBeginEnd(action.BeginInvoke,action.EndInvoke,cancelAction.Invoke)
}|> Async.StartImmediate
do printfn \"This code should run before the asynchronous operation is completed\"
let progressWindow = new TaskProgressWindow()
progressWindow.Run() //This class(type in F#) shows a dialog with a cancel button
//When the cancel button is pressed I call Async.CancelDefaultToken()
member x.Cancel() =
Async.CancelDefaultToken()
解决方法
为了获得F＃异步工作流程的好处，您实际上必须在F＃中编写异步计算。您尝试编写的代码无法正常运行（即，它可以运行，但不会有用）。
用F＃编写异步计算时，可以使用
let!
do!
Async.Sleep
Thread.Sleep
// This is a synchronous call that will block thread for 1 sec
async { do Thread.Sleep(1000)
someMoreStuff() }
// This is an asynchronous call that will not block threads - it will create
// a timer and when the timer elapses,it will call \'someMoreStuff\'
async { do! Async.Sleep(1000)
someMoreStuff() }
async
do!
let!
async
Async.StartAsTask
Task<T>
let someFunction(n) = async {
do! Async.Sleep(n)
Console.WriteLine(\"working\")
do! Async.Sleep(n)
Console.WriteLine(\"done\")
return 10 }
type AsyncStuff() =
member x.Foo(n) = someFunction(n) |> Async.StartAsTask
// In C#,you can write:
var as = new AsyncStuff()
as.Foo(1000).ContinueWith(op =>
// \'Value\' will throw if there was an exception
Console.WriteLine(op.Value))
Task
BackgroundWorker
版权声明：本文内容由互联网用户自发贡献，该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容， 请发送邮件至 dio@foxmail.com 举报，一经查实，本站将立刻删除。