Вниз
Скачать: CL | DM;

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

 
lipskiy ©   (2002-03-22 15:01) [0]

Т.е. установить себе статус активного приложения, сняв его с другого?


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

function SwitchToThisWindow(H: HWND; Restore: Byte): DWORD; stdcall; external "user32.dll";

SwitchToThisWindow(Application.MainForm.Handle, 1);


 
lipskiy ©   (2002-03-22 15:22) [2]

Не работает :(
Мигает кнопкой на панели задач, и все.
А мне нужна реакция, как если бы на форму ткнули мышкой - чтоб она встала поверх всех и ее заголовок стал бы синим.


 
Виктор Щербаков ©   (2002-03-22 15:28) [3]

?
> А мне нужна реакция, как если бы на форму ткнули мышкой
> - чтоб она встала поверх всех и ее заголовок стал бы синим.

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


 
lipskiy ©   (2002-03-22 15:32) [4]

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


 
lipskiy ©   (2002-03-22 15:33) [5]

Блин, пардон, я под Win98 :)


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


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

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

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

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


 
lipskiy ©   (2002-03-22 17:51) [7]

Угу, некрасиво.
Ну да ладно.
Это у меня вопрос не очень принципиальный.
Просто экспериментирую :)


 
SPeller ©   (2002-03-22 18:04) [8]

Там можно найти то, что надо

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


 
SeF ©   (2002-03-23 01:20) [9]

вариант который прокатывает в W2k

application.minimize;
application.restore;

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



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.009 c
1-9549
Kostyanych
2002-03-23 00:46
2002.04.04
А как реализовать drag&drop из, например, проводника в свою прогу?


3-9389
kserg@ukr.net
2002-03-12 12:39
2002.04.04
ActiveControl - не срабатывает фокусировка в форме


3-9423
Dr. Web
2002-03-06 10:39
2002.04.04
FastReport 2.44


3-9365
amamed_3071
2002-03-09 09:40
2002.04.04
AdoQuery Time Out expected Error


14-9633
Neox
2002-02-23 11:45
2002.04.04
Delphi6 Help




   Наверх