Sdílet prostřednictvím


TPL a tradiční asynchronní programování v .NET

Platforma .NET Framework poskytuje následující dva standardní vzory pro provádění vstupně-výstupních a výpočetních asynchronní operací:

  • Asynchronní Programovací Model (APM), ve kterém jsou asynchronní operací reprezentovány dvojicí metod Begin/End, například FileStream.BeginRead a Stream.EndRead.

  • Asynchronní zpracování událostí (EAP), ve kterém jsou asynchronních operace reprezentovány dvojicí metoda/událost, které jsou pojmenovány název operaceAsync a název operaceCompleted, například WebClient.DownloadStringAsync a WebClient.DownloadStringCompleted. (Protokol EAP byl zaveden v rozhraní .NET Framework verze 2.0).

The Task Parallel Library (TPL) lze použít na různý způsob ve spojení s asynchronními vzory. Můžete vystavit APM a EAP operace jako úlohu pro konzumenty knihovny nebo můžete vystavit vzory AMP ale použít objekty úloh k jejich interní implementaci. V obou případech pomocí úlohy objektů, můžete zjednodušit kód a také využít následující užitečné funkce:

  • Zaregistrujte zpětná volání ve formě pokračování úlohy, kdykoliv po spuštění úlohy.

  • Koordinujte více operací, které jsou spuštěny v odezvě na Begin_ metodu, pomocí ContinueWhenAll a ContinueWhenAny metody nebo WaitAll metody nebo WaitAny metody.

  • Zapouzdření asynchronních vstupně-výstupně výzaných a výpočetních operací ve stejném objektu úlohy.

  • Sledování stavu objektu úlohy.

  • Zařazení stavu operace do objektu úlohy s pomocí TaskCompletionSource<TResult>.

Zabalení APM rozhraní do úlohy

Jak System.Threading.Tasks.TaskFactory a System.Threading.Tasks.TaskFactory<TResult> třídy poskytují několik přetíženíFromAsync aFromAsyncmetod, které umožňují zapouzdření dvojici metoda Begin a End APM v jednom Task instance nebo Task<TResult> instance. Různá přetížení mohou pojmout jakoukoli dvojicí Begin/End metod, které mají mezi nula a třemi vstupními parametry.

Pro páry, které mají End metody, které vrací hodnota (Function v jazyce Visual Basic) použijte metody v TaskFactory<TResult>, které vytváří Task<TResult>. Pro End metody, které vrátit typ void (Sub v jazyce Visual Basic) použijte metody v TaskFactory, které vytvoří Task.

Pro několik málo případů, ve kterých tyto Begin metody obsahují více než tři parametry nebo ref nebo outparametry, je zprostředkováno FromAsync přetížení, které zapouzdřuje pouze End metody.

Následující kód ukazuje signaturu pro FromAsync přetížení, které odpovídá FileStream.BeginRead a FileStream.EndRead metodám. Tato přetížení požadují následující tří parametry.

Public Function FromAsync(Of TArg1, TArg2, TArg3)(
                ByVal beginMethod As Func(Of TArg1, TArg2, TArg3, AsyncCallback, Object, IAsyncResult),
                ByVal endMethod As Func(Of IAsyncResult, TResult),
                ByVal dataBuffer As TArg1,
                ByVal byteOffsetToStartAt As TArg2,
                ByVal maxBytesToRead As TArg3,
                ByVal stateInfo As Object)
public Task<TResult> FromAsync<TArg1, TArg2, TArg3>(
    Func<TArg1, TArg2, TArg3, AsyncCallback, object, IAsyncResult> beginMethod, //BeginRead
     Func<IAsyncResult, TResult> endMethod, //EndRead
     TArg1 arg1, // the byte[] buffer
     TArg2 arg2, // the offset in arg1 at which to start writing data
     TArg3 arg3, // the maximum number of bytes to read
     object state // optional state information
    ) 

První parametr je Func<T1, T2, T3, T4, T5, TResult> delegát, který odpovídá podpisu FileStream.BeginRead metody. Druhý parametr je Func<T, TResult> delegát, který převezme IAsyncResult a vrátí TResult. Protože EndRead vrátí hodnotu integer, kompilátor odvodí typ TResult takto Int32 a typ úlohy jako Task<Int32>. Poslední čtyři parametry jsou stejné jako v FileStream.BeginRead metodě:

  • Vyrovnávací paměť v níž chcete uložit data soubor.

  • Posun, kdy má začít zápis dat do vyrovnávací paměti.

  • Maximální objem data, který se má přečíst ze souboru.

  • Volitelný objekt, který obsahuje data definována uživatelem k předání ve zpětném volání.

Použití ContinueWith pro funkcionalitu zpětného volání

Pokud požadujete přístup k datům v soubor, jako protiklad k pouze počtu bajtů, FromAsync metoda není dostatečná. Místo toho použijte Task<String>, jehož Result vlastnost obsahuje datový soubor. To lze provést přidáním pokračování do původní úlohy. Pokračování provádí práci, které by obvykle byla prováděna delegátem AsyncCallback. Je vyvolána při dokončení práce předchůdce a když byla vyrovnávací paměť dat naplněna. (Před vrácením by měl být objekt FileStream ukončen.)

Následující příklad ukazuje, jak vrátit Task<String>, která zapouzdřuje dvojici BeginRead/EndRead tříd FileStream.

Const MAX_FILE_SIZE As Integer = 14000000
Shared Function GetFileStringAsync(ByVal path As String) As Task(Of String)
    Dim fi As New FileInfo(path)
    Dim data(fi.Length) As Byte

    Dim fs As FileStream = New FileStream(path, FileMode.Open, FileAccess.Read, FileShare.Read, data.Length, True)

    ' Task(Of Integer) returns the number of bytes read
    Dim myTask As Task(Of Integer) = Task(Of Integer).Factory.FromAsync(
        AddressOf fs.BeginRead, AddressOf fs.EndRead, data, 0, data.Length, Nothing)

    ' It is possible to do other work here while waiting
    ' for the antecedent task to complete.
    ' ...

    ' Add the continuation, which returns a Task<string>. 
    Return myTask.ContinueWith(Function(antecedent)
                                   fs.Close()
                                   If (antecedent.Result < 100) Then
                                       Return "Data is too small to bother with."
                                   End If
                                   ' If we did not receive the entire file, the end of the
                                   ' data buffer will contain garbage.
                                   If (antecedent.Result < data.Length) Then
                                       Array.Resize(data, antecedent.Result)
                                   End If

                                   ' Will be returned in the Result property of the Task<string>
                                   ' at some future point after the asynchronous file I/O operation completes.
                                   Return New UTF8Encoding().GetString(data)
                               End Function)

End Function
const int MAX_FILE_SIZE = 14000000;
public static Task<string> GetFileStringAsync(string path)
{
    FileInfo fi = new FileInfo(path);
    byte[] data = null;
    data = new byte[fi.Length];

    FileStream fs = new FileStream(path, FileMode.Open, FileAccess.Read, FileShare.Read, data.Length, true);

    //Task<int> returns the number of bytes read
    Task<int> task = Task<int>.Factory.FromAsync(
            fs.BeginRead, fs.EndRead, data, 0, data.Length, null);

    // It is possible to do other work here while waiting
    // for the antecedent task to complete.
    // ...

    // Add the continuation, which returns a Task<string>. 
    return task.ContinueWith((antecedent) =>
    {
        fs.Close();

        // Result = "number of bytes read" (if we need it.)
        if (antecedent.Result < 100)
        {
            return "Data is too small to bother with.";
        }
        else
        {
            // If we did not receive the entire file, the end of the
            // data buffer will contain garbage.
            if (antecedent.Result < data.Length)
                Array.Resize(ref data, antecedent.Result);

            // Will be returned in the Result property of the Task<string>
            // at some future point after the asynchronous file I/O operation completes.
            return new UTF8Encoding().GetString(data);
        }
    });
}

Metoda může být volána následovně.

Dim myTask As Task(Of String) = GetFileStringAsync(path)

' Do some other work
' ...

Try
    Console.WriteLine(myTask.Result.Substring(0, 500))
Catch ex As AggregateException
    Console.WriteLine(ex.InnerException.Message)
End Try

Task<string> t = GetFileStringAsync(path);          

// Do some other work:
// ...

try
{
     Console.WriteLine(t.Result.Substring(0, 500));
}
catch (AggregateException ae)
{
    Console.WriteLine(ae.InnerException.Message);
}            

Poskytování speciálních stavových dat

V typické operaci IAsyncResult, pokud váš delegát AsyncCallback vyžaduje některá speciální stavová data, bude jej nutné poslat přes poslední parametr v metodě Begin, tak aby data mohla být zabalena do objektu IAsyncResult, který je nakonec předán metodě zpětného volání. Toto není obvykle nutné při použití metod FromAsync. Pokud jsou vlastní data známa pro pokračování, lze je zachytit přímo v delegátu pokračování. Následující příklad je založeny na předchozím příkladu, ale namísto přezkoumání Result vlastnost předchozího kroku, pokračování prozkoumá stav speciálních data, která je přímo dostupná pro uživatelský delegát pokračování.

Public Function GetFileStringAsync2(ByVal path As String) As Task(Of String)
    Dim fi = New FileInfo(path)
    Dim data(fi.Length) As Byte
    Dim state As New MyCustomState()

    Dim fs As New FileStream(path, FileMode.Open, FileAccess.Read, FileShare.Read, data.Length, True)
    ' We still pass null for the last parameter because
    ' the state variable is visible to the continuation delegate.
    Dim myTask As Task(Of Integer) = Task(Of Integer).Factory.FromAsync(
            AddressOf fs.BeginRead, AddressOf fs.EndRead, data, 0, data.Length, Nothing)

    Return myTask.ContinueWith(Function(antecedent)
                                   fs.Close()
                                   ' Capture custom state data directly in the user delegate.
                                   ' No need to pass it through the FromAsync method.
                                   If (state.StateData.Contains("New York, New York")) Then
                                       Return "Start spreading the news!"
                                   End If

                                   ' If we did not receive the entire file, the end of the
                                   ' data buffer will contain garbage.
                                   If (antecedent.Result < data.Length) Then
                                       Array.Resize(data, antecedent.Result)
                                   End If
                                   '/ Will be returned in the Result property of the Task<string>
                                   '/ at some future point after the asynchronous file I/O operation completes.
                                   Return New UTF8Encoding().GetString(data)
                               End Function)

End Function
public Task<string> GetFileStringAsync2(string path)
{             
    FileInfo fi = new FileInfo(path);
    byte[] data = new byte[fi.Length];                       
    MyCustomState state = GetCustomState();
    FileStream fs = new FileStream(path, FileMode.Open, FileAccess.Read, FileShare.Read, data.Length, true);
    // We still pass null for the last parameter because
    // the state variable is visible to the continuation delegate.
    Task<int> task = Task<int>.Factory.FromAsync(
            fs.BeginRead, fs.EndRead, data, 0, data.Length, null);

    return task.ContinueWith((antecedent) =>
    {
        // It is safe to close the filestream now.
        fs.Close();

        // Capture custom state data directly in the user delegate.
        // No need to pass it through the FromAsync method.
        if (state.StateData.Contains("New York, New York"))
        {
            return "Start spreading the news!";
        }
        else
        {
            // If we did not receive the entire file, the end of the
            // data buffer will contain garbage.
            if (antecedent.Result < data.Length)
                Array.Resize(ref data, antecedent.Result);

            // Will be returned in the Result property of the Task<string>
            // at some future point after the asynchronous file I/O operation completes.
            return new UTF8Encoding().GetString(data);
        }
    });

}

Synchronizace více FromAsync úloh

Statické ContinueWhenAll and ContinueWhenAny metody poskytují přídavnou flexibilitu při použití ve spojení s FromAsync metodou. Následující příklad ukazuje, jak zahájit více asynchronních vstupně-výstupních operací a pak počkat na jejich dokončení před spuštěním pokračování.

Public Function GetMultiFileData(ByVal filesToRead As String()) As Task(Of String)
    Dim fs As FileStream
    Dim tasks(filesToRead.Length) As Task(Of String)
    Dim fileData() As Byte = Nothing
    For i As Integer = 0 To filesToRead.Length
        fileData(&H1000) = New Byte()
        fs = New FileStream(filesToRead(i), FileMode.Open, FileAccess.Read, FileShare.Read, fileData.Length, True)

        ' By adding the continuation here, the 
        ' Result of each task will be a string.
        tasks(i) = Task(Of Integer).Factory.FromAsync(AddressOf fs.BeginRead,
                                                      AddressOf fs.EndRead,
                                                      fileData,
                                                      0,
                                                      fileData.Length,
                                                      Nothing).
                                                  ContinueWith(Function(antecedent)
                                                                   fs.Close()
                                                                   'If we did not receive the entire file, the end of the
                                                                   ' data buffer will contain garbage.
                                                                   If (antecedent.Result < fileData.Length) Then
                                                                       ReDim Preserve fileData(antecedent.Result)
                                                                   End If

                                                                   'Will be returned in the Result property of the Task<string>
                                                                   ' at some future point after the asynchronous file I/O operation completes.
                                                                   Return New UTF8Encoding().GetString(fileData)
                                                               End Function)
    Next

    Return Task(Of String).Factory.ContinueWhenAll(tasks, Function(data)

                                                              ' Propagate all exceptions and mark all faulted tasks as observed.
                                                              Task.WaitAll(data)

                                                              ' Combine the results from all tasks.
                                                              Dim sb As New StringBuilder()
                                                              For Each t As Task(Of String) In data
                                                                  sb.Append(t.Result)
                                                              Next
                                                              ' Final result to be returned eventually on the calling thread.
                                                              Return sb.ToString()
                                                          End Function)
End Function
public Task<string> GetMultiFileData(string[] filesToRead)
{
    FileStream fs;
    Task<string>[] tasks = new Task<string>[filesToRead.Length];
    byte[] fileData = null;
    for (int i = 0; i < filesToRead.Length; i++)
    {
        fileData = new byte[0x1000];
        fs = new FileStream(filesToRead[i], FileMode.Open, FileAccess.Read, FileShare.Read, fileData.Length, true);

        // By adding the continuation here, the 
        // Result of each task will be a string.
        tasks[i] = Task<int>.Factory.FromAsync(
                 fs.BeginRead, fs.EndRead, fileData, 0, fileData.Length, null)
                 .ContinueWith((antecedent) =>
                     {
                         fs.Close();

                         // If we did not receive the entire file, the end of the
                         // data buffer will contain garbage.
                         if (antecedent.Result < fileData.Length)
                             Array.Resize(ref fileData, antecedent.Result);

                         // Will be returned in the Result property of the Task<string>
                         // at some future point after the asynchronous file I/O operation completes.
                         return new UTF8Encoding().GetString(fileData);
                     });
    }

    // Wait for all tasks to complete. 
    return Task<string>.Factory.ContinueWhenAll(tasks, (data) =>
    {
        // Propagate all exceptions and mark all faulted tasks as observed.
        Task.WaitAll(data);

        // Combine the results from all tasks.
        StringBuilder sb = new StringBuilder();
        foreach (var t in data)
        {
            sb.Append(t.Result);
        }
        // Final result to be returned eventually on the calling thread.
        return sb.ToString();
    });

}

FromAsync úlohy pouze pro End metodu

Pro několik případů, ve kterých tyto metody Begin metoda vyžadují více než tři vstupní parametry nebo mají ref nebo out parametry, můžete použít FromAsync přetížení, například TaskFactory<TResult>.FromAsync(IAsyncResult, Func<IAsyncResult, TResult>), které představují pouze End metodu. Tyto metody lze také použít v libovolných scénářích, ve kterých předáváte IAsyncResult a chcete jej zapouzdřit do úloha.

Shared Function ReturnTaskFromAsyncResult() As Task(Of String)
    Dim ar As IAsyncResult = DoSomethingAsynchronously()
    Dim t As Task(Of String) = Task(Of String).Factory.FromAsync(ar, Function(res) CStr(res.AsyncState))
    Return t
End Function
static Task<String> ReturnTaskFromAsyncResult()
{
    IAsyncResult ar = DoSomethingAsynchronously();
    Task<String> t = Task<string>.Factory.FromAsync(ar, _ =>
        {
            return (string)ar.AsyncState;
        });

    return t;
}

Spuštění a zrušení FromAsync úlohy

Úloha vrácená FromAsync metodou, má stav WaitingForActivation a bude spuštěna systémem v určitém okamžiku po vytvoření úlohy. Pokusíte-li se volat Start na takové úloze, bude vyvolána vyjímka.

Nelze zrušit FromAsync úlohu, protože základní API rozhraní .NET Framework aktuálně nepodporuje stornování probíhajících operací se soubory nebo I/O na sítí. Můžete přidat funkcionalitu zrušení do metody, která zapouzdřuje FromAsync volání, ale nemůže reagovat na zrušení před FromAsync voláním nebo po jeho dokončení (například v úloze pokračování).

Některé třídy, které podporují protokol EAP, například WebClient podporují zrušení a tuto funkci nativního zrušení můžete integrovat používáním rušících tokenů.

Vystavení složité EAP operace jako úlohy

TPL neposkytuje žádné metody, které jsou vytvořeny speciálně k zapouzdření asynchronní operace založených na událostech jako je tomu v FromAsync rodině metod kolem IAsyncResult vzoru. TPL však poskytuje třídu System.Threading.Tasks.TaskCompletionSource<TResult> , které může být použita k reprezentaci jakékoli sady doplňkových operací, jako třeba Task<TResult>. Operace může být synchronní nebo asynchronní a může být I/O vázána nebo výpočetně vázaná nebo obojí.

Následující příklad zobrazuje způsob použití TaskCompletionSource<TResult> chcete-li odkrýt sadu asynchronních WebClient operací pro klientský kód jako základní Task. Tato metoda umožňuje zadat pole web URL adres a výraz nebo název pro vyhledávání a potom vrátí počet případů v kolikrát byl vyhledávaný výraz nalezen na stránce.

Class SimpleWebExample
    Dim tcs As New TaskCompletionSource(Of String())
    Dim nameToSearch As String
    Dim token As CancellationToken
    Dim results As New List(Of String)
    Dim m_lock As Object
    Dim count As Integer
    Dim addresses() As String

    Public Function GetWordCountsSimplified(ByVal urls() As String, ByVal str As String, ByVal token As CancellationToken) As Task(Of String())

        Dim webClients() As WebClient
        ReDim webClients(urls.Length)

        ' If the user cancels the CancellationToken, then we can use the
        ' WebClient's ability to cancel its own async operations.
        token.Register(Sub()
                           For Each wc As WebClient In webClients
                               If Not wc Is Nothing Then
                                   wc.CancelAsync()
                               End If
                           Next
                       End Sub)


        For i As Integer = 0 To urls.Length
            webClients(i) = New WebClient()

            ' Specify the callback for the DownloadStringCompleted
            ' event that will be raised by this WebClient instance.
            AddHandler webClients(i).DownloadStringCompleted, AddressOf WebEventHandler

            Dim address As New Uri(urls(i))
            ' Pass the address, and also use it for the userToken 
            ' to identify the page when the delegate is invoked.
            webClients(i).DownloadStringAsync(address, address)
        Next

        ' Return the underlying Task. The client code
        ' waits on the Result property, and handles exceptions
        ' in the try-catch block there.
        Return tcs.Task
    End Function

    Public Sub WebEventHandler(ByVal sender As Object, ByVal args As DownloadStringCompletedEventArgs)

        If args.Cancelled = True Then
            tcs.TrySetCanceled()
            Return
        ElseIf Not args.Error Is Nothing Then
            tcs.TrySetException(args.Error)
            Return
        Else
            ' Split the string into an array of words,
            ' then count the number of elements that match
            ' the search term.
            Dim words() As String = args.Result.Split(" "c)
            Dim NAME As String = nameToSearch.ToUpper()
            Dim nameCount = (From word In words.AsParallel()
                            Where word.ToUpper().Contains(NAME)
                            Select word).Count()

            ' Associate the results with the url, and add new string to the array that 
            ' the underlying Task object will return in its Result property.
            results.Add(String.Format("{0} has {1} instances of {2}", args.UserState, nameCount, NAME))
        End If

        SyncLock (m_lock)
            count = count + 1
            If (count = addresses.Length) Then
                tcs.TrySetResult(results.ToArray())
            End If
        End SyncLock
    End Sub
End Class
Task<string[]> GetWordCountsSimplified(string[] urls, string name, CancellationToken token)
{
    TaskCompletionSource<string[]> tcs = new TaskCompletionSource<string[]>();
    WebClient[] webClients = new WebClient[urls.Length];
    object m_lock = new object();
    int count = 0;
    List<string> results = new List<string>();

    // If the user cancels the CancellationToken, then we can use the
    // WebClient's ability to cancel its own async operations.
    token.Register(() =>
    {
        foreach (var wc in webClients)
        {
            if (wc != null)
                wc.CancelAsync();
        }
    });


    for (int i = 0; i < urls.Length; i++)
    {
        webClients[i] = new WebClient();

        #region callback
        // Specify the callback for the DownloadStringCompleted
        // event that will be raised by this WebClient instance.
        webClients[i].DownloadStringCompleted += (obj, args) =>
        {

            // Argument validation and exception handling omitted for brevity.

            // Split the string into an array of words,
            // then count the number of elements that match
            // the search term.
            string[] words = args.Result.Split(' ');
            string NAME = name.ToUpper();
            int nameCount = (from word in words.AsParallel()
                             where word.ToUpper().Contains(NAME)
                             select word)
                            .Count();

            // Associate the results with the url, and add new string to the array that 
            // the underlying Task object will return in its Result property.
            results.Add(String.Format("{0} has {1} instances of {2}", args.UserState, nameCount, name));

            // If this is the last async operation to complete,
            // then set the Result property on the underlying Task.
            lock (m_lock)
            {
                count++;
                if (count == urls.Length)
                {
                    tcs.TrySetResult(results.ToArray());
                }
            }
        };
        #endregion

        // Call DownloadStringAsync for each URL.
        Uri address = null;
        address = new Uri(urls[i]);
        webClients[i].DownloadStringAsync(address, address);

    } // end for

    // Return the underlying Task. The client code
    // waits on the Result property, and handles exceptions
    // in the try-catch block there.
    return tcs.Task;
}

Úplnější příklad, který obsahuje další zpracování výjimek a ukazuje, jak volat metoda z klientského kódu naleznete zde Postupy: Obalení vzoru EAP v úloze.

Nezapomeňte, že každá úloha která je vytvořena TaskCompletionSource<TResult> bude zahájena v TaskCompletionSource a proto by uživatelský kód neměl volat metodu Start na úlohu.

Implementování APM vzoru za pomoci úlohy

V některých případech může být žádoucí přímo vystavit IAsyncResult vzor pomocí dvojice metod Begin/End v API rozhraní. Například můžete chtít zachovat konzistenci s existující API rozhraním nebo máte automatizované nástroje, které vyžadují tento vzor. V takových případech můžete použít úlohy k zjednodušit způsobu, jak jsou APM vzory interně implementovány.

Následující příklad ukazuje jak použit úlohu k implementaci dvojice APM Begin/End metod pro dlouhotrvající výpočetní metody.

Class Calculator
    Public Function BeginCalculate(ByVal decimalPlaces As Integer, ByVal ac As AsyncCallback, ByVal state As Object) As IAsyncResult
        Console.WriteLine("Calling BeginCalculate on thread {0}", Thread.CurrentThread.ManagedThreadId)
        Dim myTask = Task(Of String).Factory.StartNew(Function(obj) Compute(decimalPlaces), state)
        myTask.ContinueWith(Sub(antedecent) ac(myTask))

    End Function
    Private Function Compute(ByVal decimalPlaces As Integer)
        Console.WriteLine("Calling compute on thread {0}", Thread.CurrentThread.ManagedThreadId)

        ' Simulating some heavy work.
        Thread.SpinWait(500000000)

        ' Actual implemenation left as exercise for the reader.
        ' Several examples are available on the Web.
        Return "3.14159265358979323846264338327950288"
    End Function

    Public Function EndCalculate(ByVal ar As IAsyncResult) As String
        Console.WriteLine("Calling EndCalculate on thread {0}", Thread.CurrentThread.ManagedThreadId)
        Return CType(ar, Task(Of String)).Result
    End Function
End Class

Class CalculatorClient
    Shared decimalPlaces As Integer
    Shared Sub Main()
        Dim calc As New Calculator
        Dim places As Integer = 35
        Dim callback As New AsyncCallback(AddressOf PrintResult)
        Dim ar As IAsyncResult = calc.BeginCalculate(places, callback, calc)

        ' Do some work on this thread while the calulator is busy.
        Console.WriteLine("Working...")
        Thread.SpinWait(500000)
        Console.ReadLine()
    End Sub

    Public Shared Sub PrintResult(ByVal result As IAsyncResult)
        Dim c As Calculator = CType(result.AsyncState, Calculator)
        Dim piString As String = c.EndCalculate(result)
        Console.WriteLine("Calling PrintResult on thread {0}; result = {1}",
                   Thread.CurrentThread.ManagedThreadId, piString)
    End Sub

End Class
class Calculator
{
    public IAsyncResult BeginCalculate(int decimalPlaces, AsyncCallback ac, object state)
    {
        Console.WriteLine("Calling BeginCalculate on thread {0}", Thread.CurrentThread.ManagedThreadId);
        Task<string> f = Task<string>.Factory.StartNew(_ => Compute(decimalPlaces), state);
        if (ac != null) f.ContinueWith((res) => ac(f));
        return f;
    }

    public string Compute(int numPlaces)
    {
        Console.WriteLine("Calling compute on thread {0}", Thread.CurrentThread.ManagedThreadId);

        // Simulating some heavy work.
        Thread.SpinWait(500000000);

        // Actual implemenation left as exercise for the reader.
        // Several examples are available on the Web.
        return "3.14159265358979323846264338327950288";
    }

    public string EndCalculate(IAsyncResult ar)
    {
        Console.WriteLine("Calling EndCalculate on thread {0}", Thread.CurrentThread.ManagedThreadId);
        return ((Task<string>)ar).Result;
    }
}

public class CalculatorClient
{
    static int decimalPlaces = 12;
    public static void Main()
    {
        Calculator calc = new Calculator();
        int places = 35;

        AsyncCallback callBack = new AsyncCallback(PrintResult);
        IAsyncResult ar = calc.BeginCalculate(places, callBack, calc);

        // Do some work on this thread while the calulator is busy.
        Console.WriteLine("Working...");
        Thread.SpinWait(500000);
        Console.ReadLine();
    }

    public static void PrintResult(IAsyncResult result)
    {
        Calculator c = (Calculator)result.AsyncState;
        string piString = c.EndCalculate(result);
        Console.WriteLine("Calling PrintResult on thread {0}; result = {1}",
                    Thread.CurrentThread.ManagedThreadId, piString);
    }
}

Ukázka použití StreamExtensions

Streamextensions.cs v souboru vzorků pro paralelní programování v.NET Framework 4 na webu MSDN obsahuje několik referenční implementace, které používají objekty úloh pro asynchronní soubor a síťové I/O.

Viz také

Koncepty

Knihovna paralelních úloh