*Grid.init this.Addproperty("CurrentRecno",0) this.ColumnThisOne.DynamicBackColor = "(iif(recno()=this.CurrentRecno,0xFFFF00,0xFFFFFF))" *Grid.BeforeRowColChange lparameters nColIndex thisform.Lockscreen = .t. *Grid.AfterRowColChange lparameters nColIndex this.CurrentRecno = recno() thisform.Lockscreen = .f.Cetin