| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
OnKeyUp [D6, 2000]
workbench © (2008-08-15 14:08:00)В программе для таблицы (TDBGridEh) есть обработчик события OnKeyUp, при нажатии Enter`а появляется модальное окно где нужно выбрать значение, неясно следущее: когда я выбираю нужное значение и жму Enter (аналог для кнопки "ОК" типа) опять срабатывает соот-й обработчик TDBGridEh (в модальной форме тоже есть обработчик OnKeyUp - так вот он при этом вообще не вызывается), для модальной формы в OnShow пробовал ставить SetFocus... не помогло, почему так...хз, я что-то не так делаю?
Vlad Oshin (2008-08-15 14:30:00) [1]хотя..
вот, например, вообще ничего не надо ставить никуда
procedure TForm2.FormKeyUp(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
if key=13 then form3.showmodal;
end;
procedure TForm3.FormKeyUp(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
if Key=13 then begin close; end;
end;
Vlad Oshin (2008-08-15 14:10:00) [2]в одном из них надо передать событие дальше
| |
