Sub Button1_Click
StartDownload
End Sub
Sub Button2_Click
Msgbox2("msg","Do you want to start the download?", "Question", Array("yes", "no"))
End Sub
Sub msg_Click(ButttonText As String)
If ButttonText = "yes" Then
StartDownload
Else
Log("No")
End If
End Sub
Sub StartDownload
hd.ProgressDialogShow("Loading")
Download.DoDownload
End Sub
Sub EndDownload
hd.ProgressDialogHide
hd.ToastMessageShow("Download finished",False)
End Sub