Экспертная система Delphi.int.ru

Сообщество программистов
Общение, помощь, обмен опытом

Логин:
Пароль:
Регистрация | Забыли пароль?

Delphi.int.ru Expert

Другие разделы портала

Переход к вопросу:

#   

Статистика за сегодня:  


Лучшие эксперты

Подробнее »



Вопрос # 5 387

Раздел: Delphi » Прочее
/ вопрос открыт /

Приветствую, уважаемые эксперты!
Возможно ли заставить исчезнуть курсор мыши в чужом приложении?
Возможно есть аналог ShowCursor для чужих приложений?
PS В данном случае чужое приложение - браузер Opera в котором проигрывается флеш.

Ins Вопрос ожидает решения (принимаются ответы, доступен мини-форум)

Вопрос задал: Ins (статус: 1-ый класс)
Вопрос отправлен: 8 июня 2011, 01:10
Состояние вопроса: открыт, ответов: 1.

Ответ #1. Отвечает эксперт: ierihon1

Здравствуйте, Игорь Александров
ич!
Всё таки я нашёл способ решения этой проблемы, вместо того чтобы совсем прятать курсор он будет убираться в такой угол в котором он не будет вден и это поможет избежать проблем с его появлением. на форме должны быть два таймера я задал первому интервал 7000 а второму 500.
вот обработчики события OnTime:

procedure TForm2.Timer1Timer(Sender: TObject);
var Point:TPoint;
begin
GetCursorPos(Point);
X1:=point.X;
Y1:=point.Y;
timer2.Enabled:=True;
Timer1.Enabled:=False;
end;
 
procedure TForm2.Timer2Timer(Sender: TObject);
var Point:TPoint;
begin
GetCursorPos(Point);
X2:=point.X;
Y2:=point.Y;
if (X1=X2) and (Y1=Y2) then
SetCursorPos(Screen.Width-1,0)
else
Timer1.Enabled:=True;
end;

Ответ отправил: ierihon1 (статус: 1-ый класс)
Время отправки: 8 июня 2011, 11:28
Оценка за ответ: 4

Комментарий к оценке: Прошу прощения, но это совсем не то что я хочу сделать. Если просто перемещать - то вполне хватает и одного таймера. Ставлю 4 за желание помочь)

Мини-форум вопроса

Всего сообщений: 23; последнее сообщение — 15 июня 2011, 01:37; участников в обсуждении: 4.

Страницы: [« Предыдущая] [1] [2]

Вадим К

Вадим К (статус: Академик), 8 июня 2011, 13:34 [#21]:

Он скрывается не сразу, а через несколько секунд.
Галочка "подтверждения прочтения" - вселенское зло.
bugmenot

bugmenot (статус: 3-ий класс), 8 июня 2011, 17:31 [#22]:

http://msdn.microsoft.com/en-us/library/ms648395(VS.85).aspx
скормить прозрачный HCURSOR
виконання програми розпочинається з того самого мiсця, де призупинилося.

Ins

Ins (статус: 1-ый класс), 15 июня 2011, 01:37 [#23]:

bugmenot:
Вариант конечно, но хотелось бы именно скрыть курсок, а не заменить его на прозрачный =\

Страницы: [« Предыдущая] [1] [2]

Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.

Версия движка: 2.6+ (26.01.2011)
Текущее время: 25 апреля 2026, 18:55
Выполнено за 0.02 сек.