Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.04;
Скачать: [xml.tar.bz2];




Вниз

Непонятки с обработчиком события OnKeyDown 


Loxly   (2002-02-14 20:24) [0]

Проблема с изменением значения параметра var Key:word
Уважаемые Мастера, помогите решить следующую проблему.
У компонента Memo:TMemo имеется обработчик события OnKeyDown. При вводе текста отлеживается нажатие клавиш Ctrl+пробел. Событие возникает когда нужно. Глюков нет.
Но при нажатии Ctrl+пробел в Memo печатается пробел, который мне не нужен.
Т.к. параметр Key объявлен как var, то я закономерно предположил, что присваивание Key:=0 подавит печать пробела. Однако пробел печатается все равно :((
Операция Key:=#0 отлично проходит в OnKeyPress, но в там я не могу узнать о нажатии клавиши Ctrl.
Если бы событие OnKeyDown происходило раньше, чем OnKeyPress, то можно было бы при нажатии Ctrl устанавливать флажок, а в OnKeyPress изменять Key, но OnKeyPress проиходит раньше. Манипуляции с параметром Key события OnKeyUp тоже ни к чему не приводят.
Пожалуйста, посоветуйте что-нибудь.



Набережных С.   (2002-02-14 20:42) [1]

procedure ....Memo1KeyPress(Sender: TObject; var Key: Char);
begin
if (Key = " ")and(GetKeyState(VK_CONTROL)<0)then Key:=#0;
end;



Loxly   (2002-02-14 22:54) [2]

Спасибо! Все получилось :-)




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.04;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.041 c
4-9341            welvist               2002-01-05 23:22  2002.03.04  
Использование функции , реаизованной в Dllбиблиотеке


1-9147            Poirot                2002-02-17 05:42  2002.03.04  
Как сделать форму прозроачной - Alpha например на 70%


6-9265            Evgenii               2001-12-14 23:09  2002.03.04  
Народ, помогите, как звонить через Modem.


4-9334            - Andrew -            2002-01-03 17:46  2002.03.04  
Вопрос об идентификации однотипных дочерних окон в


3-9088            perov                 2002-02-07 08:40  2002.03.04  
помогите составить запрос, пожалуйста