| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Help!!!! Помогите, уважаемые мастера.... [D6]
ola © (2002-03-29 06:04:00)Есть проблема в процедуре ApplicationEvents1ShortCut надо сделать обработку нажатия комбинации клавиш ctrl+F1... у меня никак не получаеться, помогите пожалуйста...
Cobalt (2002-03-30 07:56:00) [1]Зачем в ApplicationEvents1ShortCut?
А чем тебе не подходит F1?
Устанавливаешь для проекта файл справки.
Каждому TWinControl-у, которому нужна справка, устанавливаешь HelpContext. И по нажатию заветной кнопки - Voila!
arhelon (2002-03-29 09:04:00) [2]Помоему такая фунция Тебе поможет
function GetShiftState: TShiftState;
ola (2002-03-29 07:14:00) [3]Смасибо, конечно, но так не подойдет у меня 128 форм и надо чтоб из любого места по нажатию этих клавиш вызывалась справка..... так что не подойдет
mukha (2002-03-29 07:01:00) [4]А может так?
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
If (Shift=[ssCtrl]) and (Key=VK_F1) then
MessageDlg("Нажаты Ctrl+F1",mtInformation,[mbOk],0);
end;
| |
