Форум: "Основная";
Текущий архив: 2003.12.16;
Скачать: [xml.tar.bz2];
ВнизBeep сигнал Найти похожие ветки
← →
Cool_Zero (2003-12-02 14:19) [0]Плиз, помогите! Короче вопрос очень простой, неужно избавиться от стандартного звука(bepp) после нажати Enter в Edit.
← →
Pa5ha (2003-12-02 14:34) [1]Надо в keypress перехватить код и если ENTER то присвоить ему $00.
Пример:
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if ord(key)=13 then key:=chr($00);
end;
← →
Cool_Zero (2003-12-03 15:00) [2]ОК, Спасибо!!!!!!!!!!!!!
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2003.12.16;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.012 c