LPARAMETERS lnBytesWritten, lnSize thisform.ProgressBar.Value = INT(lnBytesWritten / lnSize * 100) DOEVENTS && <== VFP graphics thread process the updated queue thisform.Label1.Caption = STR(lnBytesWritten) + " / "+ STR(lnSize)