Validasi Angka

Script untuk membuat agar TEdit pada delphi hanya bisa diisi oleh data angka saja, isikan script dibawah ini ke Event nya OnKeyPress TEdit:
if Not ( key in ['0'..'9',#13,#27,#8]) then key:=#0;