Время задержки для всплывающего окна в WP7

Question

Я новичок в разработке для Windows Phone, и я хотел бы знать, есть ли в WP7 что-то вроде временной задержки.

Как я хотел бы показать Popup через несколько секунд после полной загрузки изображения (скажем, через 5 секундМне нужно открыть всплывающее окно автоматически) без нажатия какой-либо кнопки.

На данный момент я делаю так, но он открывает всплывающее окно, как только изображение загружается.

 Public Sub New()
    InitializeComponent()
    photoChooserTask = New PhotoChooserTask()
    AddHandler photoChooserTask.Completed, AddressOf photoChooserTask_Completed
 End Sub
 Dim photoChooserTask As PhotoChooserTask

Добавить изображение:

 Private Sub AddImage_Click(sender As System.Object, e As System.EventArgs)
        Try
            photoChooserTask.Show()

        Catch ex As System.InvalidOperationException

            MessageBox.Show("An error occurred.")
    End Try
 End Sub

Afer Загрузка изображения:

 Private Sub photoChooserTask_Completed(sender As Object, e As PhotoResult)

        If e.TaskResult = TaskResult.OK Then
            'Code to display the photo on the page in an image control named myImage.
            Dim bmp As System.Windows.Media.Imaging.BitmapImage = New System.Windows.Media.Imaging.BitmapImage()
            bmp.SetSource(e.ChosenPhoto)
            myImage.Source = bmp
        End If

  Dim popup As New Popup()
        popup.VerticalOffset = 140
        Dim control As New PhonePage3()
        popup.Child = control
        popup.IsOpen = True
    End Sub
  End Sub

Answer 1

Это довольно просто, используйте класс Timer для своей задачи (http://msdn.microsoft.com/en-us/library/system.threading.timer.aspx).

Создать таймер:

Timer myTimer = new Timer(OnTimerDone);

Запустите таймер для обратного вызова за 5 секунд (5000 мсек):

myTimer.Change(5000, Timeout.Infinite);

Определить функцию обратного вызова:

private void OnTimerDone(object state)
{
    // your code here
}

Вот и все :-) Извините за код C #, но я думаю, что его легко перевести на VB.