Как активизировать окно

← →
vvvaaa (2005-11-26 15:39) [0]

Есть свернутое окно и активно другое приложение
ShowWindow(Handle,SW_SHOW);
из свернутого востонавливает в нормальное, а
SetForegroundWindow(Handle);
должна (как написано в Help"e) перемещать окно на паредний план и активизировать, но окно не перемещается и не активируется, только в таскбаре мигать начинает. Почему окно не активируется?

← →
gdaujk © (2005-11-27 06:53) [1]

procedure ForceForegroundWindow(MainWnd: HWND); var fPID, cPID: DWORD; begin fPID := GetWindowThreadProcessId(GetForegroundWindow, nil); cPID := GetWindowThreadProcessId(MainWnd, nil); AttachThreadInput(fPID, cPID, True); ShowWindow(MainWnd, SW_SHOW); SetForegroundWindow(MainWnd); AttachThreadInput(fPID, cPID, False); end;

PS: Можно было и поискать, тема уже была...

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