[NumLock]

Код:

Edit1.ReadOnly:=True;