Звуки сообщений

[fawr]

есть едит в который можно записать только один символ - когда пытаешься записать в него второй звучит стандартный сигнал windows... так же сообщения warning и error - стандартные звуки... когда ставишь какой-нибудь свой - они звучат звучат вместе...
можно ли заменить стандартный от windows звук, что бы в программе звучал такой какой хочу, не меняя звуки в настройках самого windows????

[raxp]

...обрабатывайте ввод сами.

[fawr]

ооо спасибо кэп
вот только уже написал - ставишь звук свой, а получаешь и свой звук и звук виндовс. Мне хотелось бы избавиться от звука виндовс.

[raxp]

...не знаю, что вы там ставите, а ответ вам дан четкий - поставить свой обработчик нажатий:

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
 if (length(Edit1.Text) = Edit1.maxlength) and (Key <> #8) then Key:=#0
end;

[fawr]

молодо-зелено...
не сразу понял о чём вы.
спасибо