Qmgrid functions

[Lucas]

I tried

- function a (with qmgrid)
- function b (run download with SetProgressCallback(&test_DDP_progress) and opt waitmsg 1)


Function test_DDP_progress

Code:

Copy      Help

function# nbAll nbRead str&s fila
opt waitmsg 1
int w1=id(3 win("testd" "#32770"))

DlgGrid h.Init(w1)
if nbRead=nbAll
,h.CellSet(fila 2 "downloaded")
else
,int p=iif(nbAll>0 MulDiv(nbRead 100 nbAll) 0)
,h.CellSet(fila 2 F"{p} %")

but opt waitmsg 1 doesn't work.

any solution?