Вниз
Скачать: CL | DM;

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

← →
autootvetchik   (2003-06-24 11:28) [0]

В FAQ`ах не нашел, а вопрос такой:
Почему в НЕмодальной форме (Form.Show) не работают "горячие клавиши".
Подробнее:
- на главной форме есть SpeebButton`ы и Panel (Dock)
- при нажатии кнопок другие формы (на которых есть ActionList)помещаются в Panel (ManualDock) и показываются (FormShow).
Так вот, при ShowModal клавиши работают, а при Show нет, хотя сами Action работают нормально.

------------
procedure TForm1.SpeedButtonClick(Sender: TObject);
begin
if Form2=nil then Form2 := TForm2.Create(Self);
Form2.ManualDock(Form1.Panel1, nil);
Form2.Show;
end;
------------

ЗАРАНЕЕ СПАСИБО ЗА ОТВЕТ :-)


← →
titnn ©   (2003-06-24 11:53) [1]

зарегистрируй HotKey , и форма будет ловить сочетание в любом состоянии , даже не активном...


← →
autootvetchik   (2003-06-25 08:07) [2]

SORRY за некорректный вопрос - проблемма оказалась немного глубже: причина не в "модальности" формы, а в Dock. Т.е. пока форма свободна, все работает нормально. Как только она помещается в Dock-контейнер (например, TPanel) на другой форме (программно или мышкой) все - на ней можно ставить крест. Перестают работать HotKey в Action, хотя сами Action работают нормально, перестает работать PostMessage(Handle, WM_NEXTDLGCTL, 0, 0), а попытка установить ActiveCOntrol := Form2.Edit1 вообще вызывает ошибку. Есть ли лекарство чтобы форма работала и самостоятельно и в Dock`е ???



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

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



Память: 0.45 MB
Время: 0.009 c
1-20099
antoniz
2003-06-24 12:04
2003.07.07
В поле таблицы БД сохранен файл Excel можно ли открыть его в Exce


3-19971
tamara
2003-06-10 16:57
2003.07.07
MSSQL2000


14-20232
SH
2003-06-19 13:55
2003.07.07
Компилятор на одной дискете


14-20308
Zergling
2003-06-18 06:58
2003.07.07
Эксперты для дельфи


1-20049
levova
2003-06-25 15:09
2003.07.07
Динамически созданю обект MyButton:TButton...




   Наверх