[MegaPiha]

Сообщение от ariane

Желательно, да! Это ограничивающий фактор, иначе некоторые товарищи будут сидеть до вечера, пока не введут правильную комбинацию. Переберут все буквы, цифры)

Можно так ограничить.

Код:

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
 If Key in ['A'..'z'] Then Key := #0;
end;