Главная страница
    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.039 c
4-1124892270
ArtemESC
2005-08-24 18:04
2005.10.30
Соединение с интернетом


3-1126973127
Tonich
2005-09-17 20:05
2005.10.30
Числа в базе данных


2-1128934886
Wolferio
2005-10-10 13:01
2005.10.30
Печать на матричный принтер.


14-1128674620
SpecLab
2005-10-07 12:43
2005.10.30
Стратегия игры в Lines


14-1128514901
syte_ser78
2005-10-05 16:21
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
Английский Французский Немецкий Итальянский Португальский Русский Испанский