Только цифры в Edit Опции

[Tan]

Хотелось бы поинтересоваться как в делфи сделать так чтобы в компонент Edit можно было бы вводить только цифры. В паскале делал через ОРД но не знаю как тут это всё дело связать с

procedure TLogs.Edit2Change(Sender: TObject);
begin

end;

[мисс_граффити]

 procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if not(Key in ['0'..'9']) then
  Key:=#0;
end;