Форум: "Начинающим";
Текущий архив: 2008.09.28;
Скачать: [xml.tar.bz2];
Вниз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 вся ветка
Форум: "Начинающим";
Текущий архив: 2008.09.28;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.091 c