Показать сообщение отдельно
  #4  
Старый 28.04.2012, 08:52
x128 x128 вне форума
Новичок
 
Регистрация: 03.02.2010
Сообщения: 64
Репутация: 133
По умолчанию

Как вариан, в обработчике OnKeyDown для Edit-а:
Код:
TEdit(Sender).ReadOnly:=(Shift=[ssShift]) or (Shift=[ssCtrl]);
Ответить с цитированием