Как активизировать окно [D6, WinXP]
vvvaaa © (2005-11-26 15:39:00)
Есть свернутое окно и активно другое приложение
ShowWindow(Handle,SW_SHOW);
из свернутого востонавливает в нормальное, а
SetForegroundWindow(Handle);
должна (как написано в Help'e) перемещать окно на паредний
план и активизировать, но окно не перемещается и не активируется,
только в таскбаре мигать начинает. Почему окно не
активируется?
gdaujk (2005-11-27 06:53:00) [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: Можно было и поискать, тема уже была...
Наверх 
ЧАТ |
Орешник |
|
