![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
![]() Привет народ, подскажите как запретить в edit ввод символо : @%&
я пытался через событие OnkeyDown но не знаю что писать if key=?????? какой код имеют символы нашел только обозначение клавиши Enter=vk_return |
#2
|
|||
|
|||
![]() Код:
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char); begin if (Key in [#64, #37, #38]) then Key := #0; end; |
#3
|
|||
|
|||
![]() Nyctos Kasignete спасибо
![]() |
#4
|
||||
|
||||
![]() а Ord и Chr тебе на что даны?
Ord('c') - код букбы с. Chr(24) - символ с кодом 24 Оставайтесь хорошими людьми... VK id2634397, ds [at] phoenix [dot] dj Последний раз редактировалось PhoeniX, 03.04.2009 в 22:01. |