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

Вниз

Звук при нажатии enter в TEdit   Найти похожие ветки 

 
AHTOH   (2003-08-28 23:02) [0]

Здравствуйте! Я обрабатываю нажатие клавиши Enter в TEdit так:

procedure Tmain.EditKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if key=vk_return then
begin
...
edit.clear
end;
end;

При этом после нажатия Enter раздается звук - винды проигрывают chord.wav
Как от этого избавиться?
Просьба варианты с отключением звука и удалением файла chord.wav не предлагать.


 
jack128   (2003-08-28 23:29) [1]

key := 0 ?


 
Илия Кожевников // ИК студия   (2003-08-28 23:44) [2]

k:=0 не поможет, а если при Энтере нужно что-то выполнить без звука поможет другой компонент - ты не первый :). Ну или можешь этот звук считать фичей своей программы, как ни как Enter не обычная клавиша ;)


 
AHTOH   (2003-08-29 00:45) [3]

так а что за компонент?


 
Doctor Deejay   (2003-08-29 00:46) [4]


> При этом после нажатия Enter раздается звук


Научись ФакЮ читать!


 
Song   (2003-08-29 08:40) [5]

На onKeyPress верни Key:=#0


 
AHTOH   (2003-09-02 19:38) [6]

всем спасибо, буду юзать onkeypress



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

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

Наверх





Память: 0.45 MB
Время: 0.012 c
6-48681
Manfred
2003-07-14 18:13
2003.09.15
Скачивание файла с сервера.


1-48577
Стрелок
2003-09-04 09:22
2003.09.15
Список с генерацией


14-48728
николай
2003-08-27 11:47
2003.09.15
метод стат. испытаний.


1-48622
Hawk2
2003-09-02 19:43
2003.09.15
Что за ошибка: Invalid pointer operation.


3-48477
Andrew
2003-08-22 15:21
2003.09.15
Работа с DBF (DBase, FoxPro) , без BDE





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский