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




Вниз

Ctrl+M в TMemo 


Dimedrol   (2002-02-26 16:56) [0]

Коллеги, не подскажете, как избавиться от того что при нажатии 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) [1]

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




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




Наверх





Память: 0.71 MB
Время: 0.025 c
14-43142          Dimka Maslov          2002-01-29 09:54  2002.03.14  
Неисповедимы пути его...


3-42982           Люк                   2002-02-15 11:45  2002.03.14  
Работа ADO под WindowsXP


14-43148          Dima Kopachev         2002-01-29 00:35  2002.03.14  
Компаненты как у Netscape v6


4-43213           _SnAke_               2002-01-15 12:31  2002.03.14  
TRegIniFile (реестр Windows)


7-43194           Mastadon              2001-12-10 15:07  2002.03.14  
Надежда умирает последней !!! Насчет декомпиляции dcu в pas