Метод Async.StartChild<'T> (F#)

Статья
02/20/2013

Начинает дочернее вычисление в асинхронном рабочем процессе.Это позволяет одновременно выполнять несколько асинхронных вычислений.

Пространство имен/путь к модулю: Microsoft.FSharp.Control

Сборка: FSharp.Core (в FSharp.Core.dll)

// Signature:
static member StartChild : Async<'T> * ?int -> Async<Async<'T>>

// Usage:
Async.StartChild (computation)
Async.StartChild (computation, millisecondsTimeout = millisecondsTimeout)

Параметры

computation
Тип: Async<'T>

Дочернее вычисление.
millisecondsTimeout
Тип: int

Значение времени ожидания в миллисекундах.Если значение не указано, используется значение по умолчанию -1, что соответствует Infinite.

Возвращаемое значение

Новое вычисление, ожидающее завершения входного вычисления.

Заметки

Этот метод, как правило, должен использоваться как непосредственный правый член привязки let! в асинхронном рабочем процессе F#, как показано ниже.

 async { 
    ...
    let! completor1 = childComputation1
    |> Async.StartChild
    let! completor2 = childComputation2
    |> Async.StartChild
    ... 
    let! result1 = completor1
    let! result2 = completor2
     ... }

При таком использовании метод StartChild запускает экземпляр вычисления childComputation и возвращает объект completor, представляющий вычисление, которое должно ожидать завершения операции.При выполнении объект completor ожидает завершения вычисления childComputation.

Пример

В следующем примере кода демонстрируется использование функции Async.StartChild.

open System.Windows.Forms

let bufferData = Array.zeroCreate<byte> 100000000

let asyncChild filename =
        async {
            printfn "Child job start: %s" filename
            use outputFile = System.IO.File.Create(filename)
            do! outputFile.AsyncWrite(bufferData)
            printfn "Child job end: %s " filename
        }

let asyncParent =
        async {
            printfn "Parent job start."
            let! childAsync1 = Async.StartChild(asyncChild "longoutput1.dat")
            let! childAsync2 = Async.StartChild(asyncChild "longoutput2.dat")
            let! result1 = childAsync1
            let! result2 = childAsync2
            printfn "Parent job end."
        }


let form = new Form(Text = "Test Form")
let button = new Button(Text = "Start")
form.Controls.Add(button)
button.Click.Add(fun args -> Async.Start(asyncParent)
                             printfn "Completed execution." )
Application.Run(form)

Пример результатов выполнения

Результаты чередуются, потому что задания выполняются одновременно.

Платформы

Windows 8, Windows 7, Windows Server 2012, Windows 2008 Server R2

Сведения о версии

Основной версии библиотеки F#

Поддерживается в: 2.0, 4.0, портативное

См. также

Ссылки

Класс Control.Async (F#)

Пространство имен Microsoft.FSharp.Control (F#)

Поделиться через