FoxClub Forums > Visual Foxpro, Foxpro for DOS > Как узнать, что последним была мышка или клавиатура? ::

• Войти

Страницы: 1 2 3 4

Re: Как узнать, что последним была мышка или клавиатура?
Ydin Автор Сообщений: 7648 Откуда: Киев Дата регистрации: 16.12.2005	Ydin 26.05.20 16:58:45 В прг ?INKEY(999,'m') ?LASTKEY() Клацаю мышкой - 151 13

Re: Как узнать, что последним была мышка или клавиатура?
Taran Сообщений: 13625 Откуда: Красноярск Дата регистрации: 16.01.2008	Taran 26.05.20 17:00:11 По приведенному выше Сашькой коду из wait ... Wind Мышка даёт именно -100. Где это ещё поймать х.з.. Надо Чемберджи ловить и пытать. Однозначно! ;)

Re: Как узнать, что последним была мышка или клавиатура?
Simple777 Сообщений: 33855 Дата регистрации: 05.11.2006	Simple777 26.05.20 17:10:29 В FPD 2.6 даёт - 100 левый клик. Вообще-то раньше я считал, что LASTKEY() работает только в таких командах как READ, EDIT, BROWSE. А оказалось, что её можно везде использовать, где ожидается нажатие на мышь или на клаву.

Re: Как узнать, что последним была мышка или клавиатура?
akvvohinc Сообщений: 4224 Откуда: Москва Дата регистрации: 11.11.2008	akvvohinc 26.05.20 17:15:48 А не достаточно анализировать определенные коды клавы? Ну, те, по которым может быть выход Ydin Требуется распознать как с объекта уходим - 1) просто по Enter или 2) мышкой на другом объекте или стрелками Для случая с Return 0 (или др. целое) на Valid не хватало у LastKey() определение мышки... Если ты умеешь определять все случаи выхода, кроме мышки, то мышь - это вариант OTHERWISE.

Re: Как узнать, что последним была мышка или клавиатура?

akvvohinc

Сообщений: 4224
Откуда: Москва
Дата регистрации: 11.11.2008

akvvohinc

26.05.20 17:15:48

А не достаточно анализировать определенные коды клавы? Ну, те, по которым может быть выход

Ydin
Требуется распознать как с объекта уходим -
1) просто по Enter или
2) мышкой на другом объекте или стрелками

Для случая с Return 0 (или др. целое) на Valid не хватало у LastKey() определение мышки...

Если ты умеешь определять все случаи выхода, кроме мышки, то мышь - это вариант OTHERWISE.

Re: Как узнать, что последним была мышка или клавиатура?
Simple777 Сообщений: 33855 Дата регистрации: 05.11.2006	Simple777 26.05.20 17:23:39 По средней и правой клавише из WAIT вообще не выходит.

Re: Как узнать, что последним была мышка или клавиатура?
akvvohinc Сообщений: 4224 Откуда: Москва Дата регистрации: 11.11.2008	akvvohinc 26.05.20 17:37:45 Simple777 Вообще-то раньше я считал, что LASTKEY() работает только в таких командах как READ, EDIT, BROWSE. А оказалось, что её можно везде использовать, где ожидается нажатие на мышь или на клаву. А где-то, кроме WAIT, ты получаешь -100? Закрой BROWSE мышью и спроси Lastkey().

Re: Как узнать, что последним была мышка или клавиатура?

akvvohinc

Сообщений: 4224
Откуда: Москва
Дата регистрации: 11.11.2008

akvvohinc

26.05.20 17:37:45

Simple777
Вообще-то раньше я считал, что LASTKEY() работает только в таких командах как READ, EDIT, BROWSE. А оказалось, что её можно везде использовать, где ожидается нажатие на мышь или на клаву.

А где-то, кроме WAIT, ты получаешь -100?
Закрой BROWSE мышью и спроси Lastkey().

Re: Как узнать, что последним была мышка или клавиатура?
lulgu Сообщений: 1838 Дата регистрации: 30.11.2016	lulgu 26.05.20 17:41:23 Ydin Crispy Тема ностальгическая? ;) Или таки для чего-то практического? На форме строятся в Фреймворке объекты ... Вы сначала определитесь, в чем вы работаете - в .prg, в OOP или через опу. Это разные идеологии программирования и в теме это наглядно видно.

Re: Как узнать, что последним была мышка или клавиатура?

lulgu

Сообщений: 1838
Дата регистрации: 30.11.2016

lulgu

26.05.20 17:41:23

Ydin
Crispy
Тема ностальгическая? ;)
Или таки для чего-то практического?

На форме строятся в Фреймворке объекты ...

Вы сначала определитесь, в чем вы работаете - в .prg, в OOP или через опу.
Это разные идеологии программирования и в теме это наглядно видно.

Re: Как узнать, что последним была мышка или клавиатура?
Ydin Автор Сообщений: 7648 Откуда: Киев Дата регистрации: 16.12.2005	Ydin 26.05.20 19:50:38 akvvohinc А не достаточно анализировать определенные коды клавы? Ну, те, по которым может быть выход Ydin Требуется распознать как с объекта уходим - 1) просто по Enter или 2) мышкой на другом объекте или стрелками Для случая с Return 0 (или др. целое) на Valid не хватало у LastKey() определение мышки... Если ты умеешь определять все случаи выхода, кроме мышки, то мышь - это вариант OTHERWISE. А где тут OTHERWISE? Дает код клавы перед мышкой

Re: Как узнать, что последним была мышка или клавиатура?

Ydin
Автор

Сообщений: 7648
Откуда: Киев
Дата регистрации: 16.12.2005

Ydin

26.05.20 19:50:38

akvvohinc
А не достаточно анализировать определенные коды клавы? Ну, те, по которым может быть выход
Ydin
Требуется распознать как с объекта уходим -
1) просто по Enter или
2) мышкой на другом объекте или стрелками

Для случая с Return 0 (или др. целое) на Valid не хватало у LastKey() определение мышки...

Если ты умеешь определять все случаи выхода, кроме мышки, то мышь - это вариант OTHERWISE.

А где тут OTHERWISE?
Дает код клавы перед мышкой

Re: Как узнать, что последним была мышка или клавиатура?
Ydin Автор Сообщений: 7648 Откуда: Киев Дата регистрации: 16.12.2005	Ydin 26.05.20 19:53:40 lulgu Ydin Crispy Тема ностальгическая? ;) Или таки для чего-то практического? На форме строятся в Фреймворке объекты ... Вы сначала определитесь, в чем вы работаете - в .prg, в OOP или через опу. Это разные идеологии программирования и в теме это наглядно видно. Спасибо, lulgu! Буду определяться. У Вас 3 варианта - мне ближе всего третий. Да, эта технология мне больше первых нравится. Авангардизм dic.academic.ruавангардизм Исправлено 1 раз(а). Последнее : Ydin, 26.05.20 19:57

Re: Как узнать, что последним была мышка или клавиатура?

Ydin
Автор

Сообщений: 7648
Откуда: Киев
Дата регистрации: 16.12.2005

Ydin

26.05.20 19:53:40

lulgu
Ydin
Crispy
Тема ностальгическая? ;)
Или таки для чего-то практического?

На форме строятся в Фреймворке объекты ...

Вы сначала определитесь, в чем вы работаете - в .prg, в OOP или через опу.
Это разные идеологии программирования и в теме это наглядно видно.

Спасибо, lulgu! Буду определяться. У Вас 3 варианта - мне ближе всего третий. Да, эта технология мне больше первых нравится.
Авангардизм dic.academic.ruавангардизм

Исправлено 1 раз(а). Последнее : Ydin, 26.05.20 19:57

Re: Как узнать, что последним была мышка или клавиатура?
Ydin Автор Сообщений: 7648 Откуда: Киев Дата регистрации: 16.12.2005	Ydin 26.05.20 20:13:12 Lulgu, вот Вы знаете 3 технологии. Можете дать ссылки на первые 2? С третьей я определился как с базовой. Но может я пойму, что первая или вторая круче?

Re: Как узнать, что последним была мышка или клавиатура?
lulgu Сообщений: 1838 Дата регистрации: 30.11.2016	lulgu 26.05.20 20:14:14 Ydin lulgu Ydin Crispy Тема ностальгическая? ;) Или таки для чего-то практического? На форме строятся в Фреймворке объекты ... Вы сначала определитесь, в чем вы работаете - в .prg, в OOP или через опу. Это разные идеологии программирования и в теме это наглядно видно. Спасибо, lulgu! Буду определяться. У Вас 3 варианта - мне ближе всего третий. Да, эта технология мне больше первых нравится. Авангардизм dic.academic.ruавангардизм По третьему варианту тут спецов хоть .опой ешь, один другого круче. Только в этом варианте фреймворков не бывает.

Re: Как узнать, что последним была мышка или клавиатура?

lulgu

Сообщений: 1838
Дата регистрации: 30.11.2016

lulgu

26.05.20 20:14:14

Ydin
lulgu
Ydin
Crispy
Тема ностальгическая? ;)
Или таки для чего-то практического?

На форме строятся в Фреймворке объекты ...

Вы сначала определитесь, в чем вы работаете - в .prg, в OOP или через опу.
Это разные идеологии программирования и в теме это наглядно видно.

Спасибо, lulgu! Буду определяться. У Вас 3 варианта - мне ближе всего третий. Да, эта технология мне больше первых нравится.
Авангардизм dic.academic.ruавангардизм

По третьему варианту тут спецов хоть .опой ешь, один другого круче.
Только в этом варианте фреймворков не бывает.

Re: Как узнать, что последним была мышка или клавиатура?
Ydin Автор Сообщений: 7648 Откуда: Киев Дата регистрации: 16.12.2005	Ydin 26.05.20 20:17:27 Это уже подтасовка. Ответ принят. Можно без продолжения. Thanks!

Re: Как узнать, что последним была мышка или клавиатура?
Chemberzhy Сообщений: 13142 Откуда: Измаил Дата регистрации: 28.04.2009	Chemberzhy 26.05.20 20:19:29 Ydin В прг ?INKEY(999,'m') ?LASTKEY() Клацаю мышкой - 151 13 Ну, ты бы сказал сразу, что требуется... Может типа такого подойдет тебе? Часть текста скрыта Закрыть Я к текстбоксу привязал параметр, ты можешь куда угодно в какую нить переменную впихнуть и потом читать при необходимости ------------------ Что-то с памятью моей стало, всё что было не со мной- помню. Исправлено 5 раз(а). Последнее : Chemberzhy, 26.05.20 20:32

Re: Как узнать, что последним была мышка или клавиатура?

Chemberzhy

Сообщений: 13142
Откуда: Измаил
Дата регистрации: 28.04.2009

Chemberzhy

26.05.20 20:19:29

Ydin
В прг
?INKEY(999,'m')
?LASTKEY()

Клацаю мышкой -
151
13

Ну, ты бы сказал сразу, что требуется...

Может типа такого подойдет тебе?




  
    Часть текста скрыта
  
  
      
  
  

  
      
          Закрыть

Я к текстбоксу привязал параметр, ты можешь куда угодно в какую нить переменную впихнуть и потом читать при необходимости

------------------
Что-то с памятью моей стало, всё что было не со мной- помню.

Исправлено 5 раз(а). Последнее : Chemberzhy, 26.05.20 20:32

Re: Как узнать, что последним была мышка или клавиатура?
Ydin Автор Сообщений: 7648 Откуда: Киев Дата регистрации: 16.12.2005	Ydin 26.05.20 20:56:49 Сань, ты прав, но я уже решил проблему. Извини. Но хорошо по теме! Кому-то понадобится потом. Тут даже Лулгу поймал драйв...

Re: Как узнать, что последним была мышка или клавиатура?
Chemberzhy Сообщений: 13142 Откуда: Измаил Дата регистрации: 28.04.2009	Chemberzhy 26.05.20 21:12:24 И ладно Я лет шесть назад последний раз Фокс запускал, хоть память поднапряг, полезно. ------------------ Что-то с памятью моей стало, всё что было не со мной- помню.

Re: Как узнать, что последним была мышка или клавиатура?
lulgu Сообщений: 1838 Дата регистрации: 30.11.2016	lulgu 26.05.20 21:19:29 Ydin Сань, ты прав, но я уже решил проблему. Извини. Но хорошо по теме! Кому-то понадобится потом. Тут даже Лулгу поймал драйв... Какой еще драйв - сразу же было понятно, что вы от безделья завели ненужную тему.

Re: Как узнать, что последним была мышка или клавиатура?
Taran Сообщений: 13625 Откуда: Красноярск Дата регистрации: 16.01.2008	Taran 26.05.20 21:30:38 Chemberzhy И ладно Я лет шесть назад последний раз Фокс запускал, хоть память поднапряг, полезно. Жулик он и есть жулик. Так и не сознается откуда фишку выхватил. То лист фольги продаст, как крыло медного самолёта. Жучара. Коснись в Измаил поеду, придётся штаны карманами внутрь надевать чтоб не обчистил с любовью.

Re: Как узнать, что последним была мышка или клавиатура?

Taran

Сообщений: 13625
Откуда: Красноярск
Дата регистрации: 16.01.2008

Taran

26.05.20 21:30:38

Chemberzhy
И ладно Я лет шесть назад последний раз Фокс запускал, хоть память поднапряг, полезно.

Жулик он и есть жулик.
Так и не сознается откуда фишку выхватил.
То лист фольги продаст, как крыло медного самолёта.
Жучара. Коснись в Измаил поеду, придётся штаны карманами внутрь надевать чтоб не обчистил

с любовью.

Re: Как узнать, что последним была мышка или клавиатура?
akvvohinc Сообщений: 4224 Откуда: Москва Дата регистрации: 11.11.2008	akvvohinc 27.05.20 05:51:58 Ydin А где тут OTHERWISE? Дает код клавы перед мышкой DO CASE CASE <нажали Enter> CASE <нажали Tab> CASE <нажали другую возможную клавишу выхода из поля> OTHERWISE * клавиш выхода не нажимали, но вышли, значит, <нажали мышь> ENDCASE

Re: Как узнать, что последним была мышка или клавиатура?
Ydin Автор Сообщений: 7648 Откуда: Киев Дата регистрации: 16.12.2005	Ydin 27.05.20 09:40:54 Просто вернет Enter, т.к. перед нажатием мышкой было на клаве нажато Enter

Re: Как узнать, что последним была мышка или клавиатура?
Crispy Сообщений: 18571 Дата регистрации: 16.05.2005	Crispy 27.05.20 10:37:23 Ydin Требуется распознать как с объекта уходим - 1) просто по Enter или 2) мышкой на другом объекте или стрелками А что KeyPress() больше уже не работает? ;) ------------------ В действительности все иначе, чем на самом деле. (Антуан де Сент-Экзюпери)

Re: Как узнать, что последним была мышка или клавиатура?

Crispy

Сообщений: 18571
Дата регистрации: 16.05.2005

Crispy

27.05.20 10:37:23

Ydin
Требуется распознать как с объекта уходим -
1) просто по Enter или
2) мышкой на другом объекте или стрелками

А что KeyPress() больше уже не работает? ;)

------------------
В действительности все иначе, чем на самом деле.
(Антуан де Сент-Экзюпери)

Страницы: 1 2 3 4

:: Список Форумов•Список тем•Поиск•Войти

Извините, только зарегистрированные пользователи могут оставлять сообщения в этом форуме.

On-line: 37 (Гостей: 37)