>* Briefly setfocus to each control to make refresh work in grid
>IF TYPE('this.ActiveControl.name') = "C"
> loActiveControl = this.ActiveControl && original control with focus
> FOR i = 1 TO this.ControlCount
> IF UPPER(this.Controls(i).baseclass) <> "LABEL"
> this.Controls(i).setfocus()
> endif
> ENDFOR
> loActiveControl.setfocus() && reset to original control
>endif
>DODEFAULT()
Larry Tucker