Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2005.10.30;
Скачать: [xml.tar.bz2];

Вниз

Звуки клавишь...   Найти похожие ветки 

 
XfroSt   (2005-10-04 15:26) [0]

Написал в обработчик OnKeyPress TEdit"a строку
if key = 13 then FB.Click;
Все просто ели жем ентер то жмется кнопка.
Вопрос: как избавиться от звука винды (звука ошибки клавиши) ?
Или есть  более простой способ нажатия контрола при нажатии Ентера в едите.


 
Leonid Troyanovsky ©   (2005-10-04 15:58) [1]


> XfroSt   (04.10.05 15:26)  

> Вопрос: как избавиться от звука винды (звука ошибки клавиши)

> Или есть  более простой способ нажатия контрола при нажатии
> Ентера в едите.


Это не то, чтобы "звук ошибки клавиши", а реакция EDIT (WM_CHAR)
на ввод illegal characters.
Избежать можно назначением key := #0 в OnKeyPress.

Ну, а проще всего сделать ту самую кнопку default (True).
Если, конечно, не смущает, что она сработает в любом эдите.

--
Regards, LVT.


 
XfroSt   (2005-10-04 16:08) [2]

а в OnKeyDown что присвоить key ибо  если пишу в OnKeyPress key = #0 то в едит не введешь ведь не чего...


 
Leonid Troyanovsky ©   (2005-10-04 16:33) [3]


> XfroSt   (04.10.05 16:08) [2]

> если пишу в OnKeyPress
> key = #0 то в едит не введешь ведь не чего...


if key = #13 then  key := #0

бо, остальные (legal) пропускать надо.

--
Regards, LVT.


 
злобная танька   (2005-10-04 16:54) [4]

етот вопрос кажный месяц спрашивают
в FAQ нада ево!



Страницы: 1 вся ветка

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

Наверх





Память: 0.45 MB
Время: 0.037 c
2-1128592502
root
2005-10-06 13:55
2005.10.30
Типы полей в Access


14-1128709701
default
2005-10-07 22:28
2005.10.30
"Живое" пиво, срок хранения три дня


3-1127153296
WonderfulDay
2005-09-19 22:08
2005.10.30
create table


1-1128748195
Gefest80
2005-10-08 09:09
2005.10.30
Реестр!


2-1128819510
quadronik
2005-10-09 04:58
2005.10.30
Пример из дельфийского ХЕЛПа..не работает





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский