[NumLock]

Код:

Send(Sender, Control.Update);

вообще желательно имя изменить, т.к. Update это метод класса TWinControl, а TForm является его наследником.