Форум программистов, компьютерный форум CyberForum.ru

Инверсия мыши - C++

Восстановить пароль Регистрация
Другие темы раздела
C++ Получить первые n-минимальных элементов массива,используя указатели http://www.cyberforum.ru/cpp-beginners/thread446699.html
Дан массив.Получить первые n-минимальных элементов массива,используя указатели. Как лучше реальзовать? На уровне начинающего человека, изучающего си
C++ Отобразить симметрично относительно вертикальной оси секторы матрицы Всем ПРИВЕТ! Помогите пожалуйста с задачкой ...=) Заполнить матрицу А(10,10), случайными числами. Отобразить симметрично относительно вертикальной оси секторы матрицы, которые лежат влево и вправо от главной и побочной диагоналей. http://www.cyberforum.ru/cpp-beginners/thread446698.html
C++ Вычислить число различных элементов последовательности (предположить, что последовательность неубывающая)
C++ Вычислить число различных элементов последовательности( предположить, что последовательность неубывающая) Если можно то с коментариями!
C++ C++ функция деления нацело без остатка
Помогите решить задачу: Функция реализуящая деление нацело с отбрасыванием остатка.
C++ Вычислить число элементов http://www.cyberforum.ru/cpp-beginners/thread446683.html
Вычислить число различных элементов последовательности ( предположить что последовательность неубываюшая) Заренее спасибо!!если можно то подробно!
C++ нужен коммеентарий функции string changeStr(string s) { int i=s.length(); char buf = s; while(s!=' ') { i-=1; } s = s; s = buf; return s; } подробнее

Показать сообщение отдельно
Lady_In_Dreams
 Аватар для Lady_In_Dreams
1 / 1 / 0
Регистрация: 15.02.2012
Сообщений: 16
15.02.2012, 17:25     Инверсия мыши
Вот пример в паскале
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
var
...
  OldPoint: TPoint;
...
procedure TForm1.FormCreate(Sender: TObject);
begin
  GetCursorPos (OldPoint);
  Timer1.Interval := 1;
  Timer1.Enabled := True;
end;
 
procedure TForm1.Timer2Timer(Sender: TObject);
var
  p: TPoint;
begin
  GetCursorPos (p);
  OldPoint.X := OldPoint.X - (p.X - OldPoint.X);
  OldPoint.Y := OldPoint.Y - (p.Y - OldPoint.Y);
  if OldPoint.X < 0 then OldPoint.X := OldPoint.X + Screen.Width ;
  if OldPoint.Y < 0 then OldPoint.Y := OldPoint.Y + Screen.Height;
  if OldPoint.X > Screen.Width  then OldPoint.X := OldPoint.X - Screen.Width ;
  if OldPoint.Y > Screen.Height then OldPoint.Y := OldPoint.Y - Screen.Height;
  SetCursorPos (OldPoint.X, OldPoint.Y);
end;
 
Текущее время: 12:11. Часовой пояс GMT +3.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2016, vBulletin Solutions, Inc.
Рейтинг@Mail.ru