Как определить ctrl?

← →
Алексейй (2004-03-18 20:53) [0]

Мне нужно, чтобы в edit можно было вводить только числа и можно было делать копипаст (ctrl+c, ctrl+v). Делаю с помощью обработчика FormShortCut (там, если клавиша "неправильная" - handle:=true). Но! ctrl+v и просто v там имеют одинаковый код (так же как и регистры там не разлечаются). В итоге чтобы был копипаст - приходится пропускать и символьные клавиши (c и v). А в keypressed - различаются, но как там сделать handle? т.е. не пропустить изменение на onchange?

← →
Cobalt © (2004-03-18 22:56) [1]

OnKeyDown?

← →
Алексейй (2004-03-19 00:20) [2]

2 Cobalt
"OnKeyDown?"
И что? Просто в formshortcut есть параметр "var Handled: Boolean" с помощью которого я делаю прерывание обработки (т.е. ввели что-тот в едит, но до того как сработал onchange я сделал handle:=true и на этом обработка закончиалась! Т.е. при нажатии не цифры ничго не происходит!). Как подобное реализовать в всяких кейдаунах и т.п.?

TKeyEvent = procedure (Sender: TObject; var Key: Word; Shift: TShiftState)
Дело в том, что параметр Key можно заменить на 0, тогда собственный обработчик компонента (его оконная функция), проигнорирует это событие. Т.к. в обработчик будет передан изменённый тобой Key.

Как определить ctrl? Найти похожие ветки