Текущий архив: 2002.03.14;
Скачать: CL | DM;
Вниз
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
Страницы: 1 вся ветка
Текущий архив: 2002.03.14;
Скачать: CL | DM;
Память: 0.46 MB
Время: 0.008 c
