>> >> Procedure command1.MouseUp &&(1) >> Lparameters nButton, nShift, nXCoord, nYCoord >> Thisform.label1.Caption = "MOUSE UP" >> Thisform.timer1.Enabled = .F. >> Endproc >>>
> Procedure command1.MouseUp &&(2) > Lparameters nButton, nShift, nXCoord, nYCoord > Thisform.timer1.Enabled = .F. > Thisform.label1.Caption = "MOUSE UP" > Endproc >Fabio: