как в delphi сделать чтобы в edit можно было писать только числовые значения

[Эдик Кузьменко]

как в delphi сделать чтобы в edit можно было писать только латинские буквы
помогите пожалуйста

[Iron Monk]

Определитесь - числа или латинские буквы?

[Эдик Кузьменко]

перепутал тольуо цифры

[Iron Monk]

http://www.programmersforum.ru/showthread.php?t=269930

[Эдик Кузьменко]

а как сделать только латинские буквы

[Iron Monk]

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
     case Key of
     #8, #65..#122:;
     else  Key:= #0;
end;
end;

[Эдик Кузьменко]

Сообщение от Iron Monk

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
     case Key of
     #8, #65..#122:;
     else  Key:= #0;
end;
end;

с цифрами я разобрался спасибо
а как теперь сделать только английские буквы

[Stilet]

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
 if (key<'A')or(key>'Z')or(key<'a')or(key>'z') then key:=#0;
end;

[Iron Monk]

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
     case Key of
     #8, #65..#90:;
        #97..#122:;
     else  Key:= #0;
end;
end;

[Эдик Кузьменко]

всем огромное спасибо