Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Ctrl+M в TMemo [D5, D6, Win95/98, Win2k]


Dimedrol ©   (2002-02-26 16:56:00) 

Коллеги, не подскажете, как избавиться от того что при нажатии Ctrl+Mв TMemo НЕ отрабатывал ENTER.
Написал потомок от TMemo
там сделал так попробовал ENTER вырубить (WantReturns:=false - неприемлемо):

private
{ Private declarations }
procedure WMKEYUP(var Message: TWMKey); message WM_KEYUP;
protected

procedure TTWMemo.WMKEYUP(var Message: TWMKey);
begin
if Message.CharCode=VK_RETURN then
begin
Message.CharCode:=0;
//inherited;
end;
end;

Не работает ;-(
Больше конечно интересует, чтобы после Ctrl+M "ввода" не было...


Dimedrol   (2002-02-26 18:04:00) [1]

Отбой. я разобрался...
Все решаемо все-таки на уровне OnKeyUp OnKeyDown OnKeyPress


Наверх

Титульная страница Поиск, карта сайта Написать письмо