Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Для новичков > Enter в treeview: beep'ает

Автор: Alexeyt 5.5.2012, 15:02

как сделать чтобы Enter на узле TreeView не beep'ал?
OnKeyDown вроде обработал, все равно beep'ает.

Автор: northener 6.5.2012, 01:23

Цитата(Alexeyt @ 5.5.2012, 15:02

)

как сделать чтобы Enter на узле TreeView не beep'ал?

А как сделать "чтобы Enter на узле TreeView beep'ал"?

Автор: Alexeyt 6.5.2012, 11:12

Делаем новую форму, кладем Treeview, заполняем в дизайн-тайме узлы (пара штук). В рантайме кликаем узел, жмем Enter - бипает. Д7

Автор: XperT 6.5.2012, 12:25

Код


procedure TForm1.TreeView1KeyPress(Sender: TObject; var Key: Char);
begin
  if Key = #13 then Key := #0;
end;

Ммм?

Автор: Alexeyt 6.5.2012, 14:10

XperT, помогло =)

Автор: northener 7.5.2012, 00:25

Цитата(Alexeyt @ 6.5.2012, 11:12

)

Делаем новую форму, кладем Treeview, заполняем в дизайн-тайме узлы (пара штук). В рантайме кликаем узел, жмем Enter - бипает.

В Д2007 не бипает.

Автор: XperT 7.5.2012, 10:08

Цитата(northener @ 7.5.2012, 00:25)

Цитата(Alexeyt @ 6.5.2012, 11:12

)

В Д2007 не бипает.

Оно не бипает, а проигрывается виндовый звук ошибки. Так как у меня 2010 и такая же ситуация наблюдается, думаю версия компилятора значение не имеет.

Автор: northener 7.5.2012, 17:03

Цитата(XperT @ 7.5.2012, 10:08

)

Оно не бипает, а проигрывается виндовый звук ошибки.

А понял. Это нужно было включить "богатую" звуковую схему.