Скачать: CL | DM;

OnKeyUp   Найти похожие ветки 

← →
workbench   (2008-08-15 14:08) [0]

В программе для таблицы (TDBGridEh) есть обработчик события OnKeyUp, при нажатии Enter`а появляется модальное окно где нужно выбрать значение, неясно следущее: когда я выбираю нужное значение и жму Enter (аналог для кнопки "ОК" типа) опять срабатывает соот-й обработчик TDBGridEh (в модальной форме тоже есть обработчик OnKeyUp - так вот он при этом вообще не вызывается), для модальной формы в OnShow пробовал ставить SetFocus... не помогло,  почему так...хз, я что-то не так делаю?

---

← →
Vlad Oshin ©   (2008-08-15 14:10) [1]

в одном из них надо передать событие дальше

---

← →
Vlad Oshin ©   (2008-08-15 14:30) [2]

хотя..
вот, например, вообще ничего не надо ставить никуда

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;

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.017 c