Как в delphy 7 сделать так, чтобы в текстовом поле, в данном случае в stringgrid, можно было вводить только цифры?

Помню что кажется это было через case и процедуру KeyPress, но не помню непосредственно как это описать.. .
Заранее спасибо)