|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
StringGrid можно вводить только буквы
помогите с кодом чтобы в StringGrid можно вводить только буквы.
в events я создаю процедуру OnKeyPress так? |
#2
|
||||
|
||||
Код:
procedure TForm1.StringGrid1KeyPress(Sender: TObject; var Key: Char); begin if Key in ['0'..'9'] then Key := #0; end; Всегда пишите код так, будто сопровождать его будет склонный к насилию психопат, который знает, где вы живете. |