Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как активировать свое приложение?

lipskiy © (2002-03-22 15:01:00)
Т.е. установить себе статус активного приложения, сняв его с другого?

SeF (2002-03-23 01:20:00) [1]
вариант который прокатывает в W2k

application.minimize;
application.restore;

правда тоже некрасиво.

SPeller (2002-03-22 18:04:00) [2]
Там можно найти то, что надо

http://delphi.mastak.ru/cgi-bin/forum.pl?look=1&id=1016509032&n=5

lipskiy (2002-03-22 17:51:00) [3]
Угу, некрасиво.
Ну да ладно.
Это у меня вопрос не очень принципиальный.
Просто экспериментирую :)

Виктор Щербаков (2002-03-22 15:36:00) [4]

> Я под Win2k. Ну не может же быть, чтоб не было вариантов.
> Ну а с кнопкой мыши как это сделать (программно, ессно)?
> И чтоб курсор не дергался никуда.

Запоминаешь положение курсора. (GetCursorPos)
Помещаешь его в новое место. (SetCursorPos)
Жмешь кнопку (Mouse_Event)
Восстанавливаешь положение курсора.

Всё достаточно быстро произойдет. Пользователь не заметит, но всё равно не красиво, ИМХО.
> Блин, пардон, я под Win98 :)

Это не важно в данном случае :)

lipskiy (2002-03-22 15:33:00) [5]
Блин, пардон, я под Win98 :)

lipskiy (2002-03-22 15:32:00) [6]
Я под Win2k. Ну не может же быть, чтоб не было вариантов. Ну а с кнопкой мыши как это сделать (программно, ессно)? И чтоб курсор не дергался никуда.

Виктор Щербаков (2002-03-22 15:28:00) [7]
?
> А мне нужна реакция, как если бы на форму ткнули мышкой
> - чтоб она встала поверх всех и ее заголовок стал бы синим.

Так получается только в Win95. Даже в win98 - просто мигание кнопки. А интересно, есть проги, которые умеют так делать не нажимая программно кнопок мыши?

lipskiy (2002-03-22 15:22:00) [8]
Не работает :(
Мигает кнопкой на панели задач, и все.
А мне нужна реакция, как если бы на форму ткнули мышкой - чтоб она встала поверх всех и ее заголовок стал бы синим.

Виктор Щербаков (2002-03-22 15:03:00) [9]
function SwitchToThisWindow(H: HWND; Restore: Byte): DWORD; stdcall; external "user32.dll";

SwitchToThisWindow(Application.MainForm.Handle, 1);

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »