Воскресенье, 15.06.2025, 10:31 Приветствую вас Гость | Группа "Гости" 
[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
  • Страница 1 из 1
  • 1
Модератор форума: Волк-1024, Anton93, xXxSh@dowxXx  
тграничения на курсор
HTTqpДата: Пятница, 20.03.2015, 20:15 | Сообщение # 1
Частый гость
Зарегистрирован: 08.10.2014
Группа: Пользователи
Сообщений: 57
Статус: Offline
Пытаюсь ограничить передвижения курсора, все бы хорошо, но почему то у меня при компиляции работает идеально, при запуске на других машинах почему то он спокойно выходит за границы формы.
Код:
Код

procedure tp(hWnd: HWND; uMsg: UINT; idEvent: UINT_PTR; dwTime: DWORD);  stdcall;   
   var
      PrmInRect: TRect;
        begin
          GetWindowRect(hWnd,PrmInRect);
          ClipCursor(@PrmInRect);
        end;

//Запускаю так
//hWinHandle это хендл окна, созданый на winapi > hWinHandle:=CreateWindowEx(....);  
SetTimer(hWinHandle,1,100,@tp);    
 
Волк-1024Дата: Четверг, 26.03.2015, 16:26 | Сообщение # 2
Авторитетный
Зарегистрирован: 24.07.2011
Группа: Модераторы
Сообщений: 469
Статус: Offline
Работает и так...

Pascal, C\C++, Assembler, Python
 
AndroidДата: Четверг, 29.12.2016, 14:39 | Сообщение # 3
Постоянный
Зарегистрирован: 13.12.2011
Группа: Пользователи
Сообщений: 100
Статус: Offline
видел такое поведение на одном винлокере. не его пилишь?
 
  • Страница 1 из 1
  • 1
Поиск:

delphicode.ru © 2008 - 2025 Хостинг от uCoz