Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.08.15;
Скачать: CL | DM;

Вниз

Как переключиться на приложение.   Найти похожие ветки 

 
Vladislav ©   (2002-08-02 16:10) [0]

Как переключиться на какое-либо приложение, т.е сделать активным? К примеру, чтобы моя прога становилась активна по таймеру.


 
Виктор Щербаков ©   (2002-08-02 16:17) [1]

SetForegroundWindow


 
Eugene Lachinov ©   (2002-08-02 16:18) [2]

procedure TForm1.Timer1Timer(Sender: TObject);
var
hForeGround : HWnd;
begin
hForeGround := GetForegroundWindow;
AttachThreadInput(GetWindowThreadProcessId(hForeGround, nil),
GetWindowThreadProcessId(Handle, nil), True);
SetForegroundWindow(Handle);
end;


 
Vladislav ©   (2002-08-02 16:24) [3]

to Eugene Lachinov
Спасибо.


 
Виктор Щербаков ©   (2002-08-02 16:41) [4]

При этом нужно принимать во внимание побочные эффекты.
Например, пользователь набирает текст не глядя на экран, а тут Ваша программа решила забрать себе фокус клавиатурного ввода. Естественно пулучится лажа. Вызов же SetForegroundWindow без AttachThreadInput приведет к тому, что кнопка окна вашего приложения на таскбаре будет мигать и привлечет внимание пользователя, когда тот посмотрит на экран. Иногда это предпочтительней.



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

Текущий архив: 2002.08.15;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.011 c
1-48083
Dinara
2002-07-31 23:29
2002.08.15
Как из второго экземпляра программы послать первому сообщение?...


14-48262
doroshka
2002-07-17 19:15
2002.08.15
Посоветуйте компонент или как сделать, чтоб в меню прятались...


7-48340
Megadeth
2002-06-03 19:01
2002.08.15
S.M.A.R.T


14-48261
roadrunner
2002-07-19 11:18
2002.08.15
Помогите советом. Печать графических файлов


4-48357
Geser
2002-06-10 09:20
2002.08.15
Skinable Apllication