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

Статья
08/11/2011

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

Пространство имен/путь к модулю: 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 7, Windows Vista с пакетом обновления 2 (SP2), Windows XP с пакетом обновления 3 (SP3), Windows XP x64 с пакетом обновления 2 (SP2), Windows Server 2008 R2, Windows Server 2008 с пакетом обновления 2 (SP2), Windows Server 2003 с пакетом обновления 2 (SP2)

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

Среда выполнения F#

Поддерживается в версиях 2.0, 4.0

Silverlight

Поддерживается в версии 3

См. также

Ссылки

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

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

Журнал изменений

Дата	Журнал	Причина
Июль 2010	Добавлен пример кода.	Улучшение информации.

Июль 2010

Добавлен пример кода.

Улучшение информации.

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