>parameter lcObject >lcTable = This.TableName && class properties that store the name of the table >lcForm = This.FormName && and the form name that the toolbar applies to >if !used(lcTable) or type("lcObject") <> "C" > return >endif >if type(lcForm) = "O" > if upper(&lcForm..ActiveControl.BaseClass) $"TEXTBOX,EDITBOX,CHECKBOX,OPTIONGROUP" > &lcForm..ActiveControl.Value = &lcForm..ActiveControl.Value > endif >endif >>Setting the Value of the active control to itself did the trick.