On-line: tnsr2, гостей 0. Всего: 1 [подробнее..]
АвторСообщение
постоянный участник




Пост N: 6934
Зарегистрирован: 12.09.06
ссылка на сообщение  Отправлено: 09.04.21 11:37. Заголовок: Странное поведение DefineHotKey....


Запускаю прогу на МиниГуи, открываю Far и при редактировании текста
не могу поставит цифры 1,2,3,4,5 и клавиши F1-F5.
Да только что пробовал набрать эти цифры здесь на форуме и они не набираются.
Я давно этот вопрос хотел задать, да времени всё не хватало.
Т.е. у меня в Минигуи меню с кнопками и сделано так:
{ VK_F1, 49 } 
{ VK_F2, 50 }
{ VK_F3, 51 }
{ VK_F4, 52 }
{ VK_F5, 53 }
aN := aBtn[ nI ][8] // HotKey array

IF ! Empty( aN ) // Define HotKey
IF HB_ISARRAY( aN )
FOR nK := 1 TO Len( aN )
_DefineHotKey( This.Name , 0 , aN[ nK ] , hb_MacroBlock( "_wPost(2, , '"+cN+"')" ) )
NEXT
ELSE
_DefineHotKey( This.Name , 0 , aN , hb_MacroBlock( "_wPost(2, , '"+cN+"')" ) )
ENDIF
ENDIF
.....
DEFINE TIMER Timer_1 INTERVAL (StaticTimeUpdate * 100) * 1000 ACTION myListUsers()
.....
:Event( 2, {|ow,ky,cn| ow:=ky, This.&(cn).Setfocus, _PushKey( VK_SPACE ) } )

Как такое может быть и как от этого избавиться ?

Спасибо: 0 
ПрофильЦитата Ответить
Ответов - 5 [только новые]


постоянный участник




Пост N: 3712
Зарегистрирован: 17.02.12
ссылка на сообщение  Отправлено: 09.04.21 12:35. Заголовок: Andrey пишет Как так..


Andrey пишет
 цитата:
Как такое может быть и как от этого избавиться ?


Это нормальное поведение hmg (было всегда) для _definehotkey и консольного far.
Избавиться можно попробовать, на gotfocus ставить hotkey на окно, по lostfocus удалять.
Схему (даже рыба была) эту тебе давал ранее, смотри

Спасибо: 0 
ПрофильЦитата Ответить
постоянный участник




Пост N: 6935
Зарегистрирован: 12.09.06
ссылка на сообщение  Отправлено: 09.04.21 12:57. Заголовок: Да уж, не ожидал... ..


Да уж, не ожидал...

Спасибо: 0 
ПрофильЦитата Ответить
постоянный участник




Пост N: 3713
Зарегистрирован: 17.02.12
ссылка на сообщение  Отправлено: 09.04.21 13:34. Заголовок: SergKis пишет Избави..


SergKis пишет
 цитата:
Избавиться можно попробовать, на gotfocus ставить hotkey на окно, по lostfocus удалять.


Не поможет, т.к. назначения и обработка останутся старые.
Назначай на тсб и держи в фокусе - поможет или от far избавиться

Спасибо: 0 
ПрофильЦитата Ответить
постоянный участник




Пост N: 6936
Зарегистрирован: 12.09.06
ссылка на сообщение  Отправлено: 09.04.21 15:28. Заголовок: SergKis пишет: Не п..


SergKis пишет:

 цитата:
Не поможет, т.к. назначения и обработка останутся старые.


У меня окно на кнопках, несколько штук таких есть.
Легче тогда отказаться от DefineHotKey в них.
Хотя юзера будут страдать...
Привыкнут.

А почему МиниГуи так влияет на другие проги ?
Т.е. в Мизиле тоже не могу набрать 1-5, в Блокноте такая же беда.
Круто поступает МиниГуи...

Спасибо: 0 
ПрофильЦитата Ответить
постоянный участник




Пост N: 6938
Зарегистрирован: 12.09.06
ссылка на сообщение  Отправлено: 12.04.21 11:30. Заголовок: Пришлось отказаться ..


Пришлось отказаться СОВСЕМ от DefineHotKey.
Вешается прога на МиниГуи если запущена с 1С.

Спасибо: 0 
ПрофильЦитата Ответить
Ответ:
1 2 3 4 5 6 7 8 9
большой шрифт малый шрифт надстрочный подстрочный заголовок большой заголовок видео с youtube.com картинка из интернета картинка с компьютера ссылка файл с компьютера русская клавиатура транслитератор  цитата  кавычки моноширинный шрифт моноширинный шрифт горизонтальная линия отступ точка LI бегущая строка оффтопик свернутый текст

показывать это сообщение только модераторам
не делать ссылки активными
Имя, пароль:      зарегистрироваться    
Тему читают:
- участник сейчас на форуме
- участник вне форума
Все даты в формате GMT  3 час. Хитов сегодня: 284
Права: смайлы да, картинки да, шрифты да, голосования нет
аватары да, автозамена ссылок вкл, премодерация откл, правка нет