Code: Select all
@ r,c, Button "Stop"..... ACTION lOk := .F.
lOk := .T.
Do While lOk
MiFuncionDeMedir()
....
Enddo
Rafael
Code: Select all
@ r,c, Button "Stop"..... ACTION lOk := .F.
lOk := .T.
Do While lOk
MiFuncionDeMedir()
....
Enddo
Code: Select all
Do While lOk
MiFuncionDeMedir()
SysRefresh()
Enddo