21e325b27a
* NEW: Put the old examples in '/trunk/app/examples'. git-svn-id: svn://localhost/gambas/trunk@6724 867c0c6c-44f3-4631-809d-bfa615b0a4ec
20 lines
299 B
Text
20 lines
299 B
Text
' Gambas class file
|
|
|
|
Public Sub AddDownload(hDownload As WebDownload)
|
|
|
|
Dim hForm As FDownload
|
|
|
|
hForm = New FDownload(svwDownload)
|
|
hForm.Init(hDownload)
|
|
|
|
End
|
|
|
|
Public Sub timRefresh_Timer()
|
|
|
|
Dim hForm As FDownload
|
|
|
|
For Each hForm In svwDownload.Children
|
|
hForm.Redraw
|
|
Next
|
|
|
|
End
|