Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Попустить окно [D6, Win95/98, WinXP]


ATLANTIDO ©   (2002-03-23 01:24:00) 

Поднимаю окно :
GetWindowRect(Form1.Handle,Rect);
SetWindowPos (Form1.Handle,HWND_TOPMOST,Rect.Left,Rect.Top,Rect.Right-Rect.Left,Rect.Bottom-Rect.Top, SWP_SHOWWINDOW);
SetForeGroundWindow(Form1.Handle);
BringWindowToTop(Form1.Handle);
SetActiveWindow(Form1.Handle);
Вопрос в том, как его снова сделать нормальным. Т. е.
чтобы оно перестало быть поплавком.
SetWindowPos (Form1.Handle,HWND_TOP,...) не помогает.


Набережных С.   (2002-03-25 19:28:00) [1]

Кто-то здесь предлагал такой вариант, попробуй:

var
a:cardinal;
begin
a:=GetWindowThreadProcessId(GetForegroundWindow,nil);
AttachThreadInput(GetCurrentThreadId,a,true);
SetForegroundWindow(Handle);
AttachThreadInput(GetCurrentThreadId,a,false);
end;


ATLANTIDO   (2002-03-25 19:14:00) [2]

Пожалуйста, помогите. Срочно надо :(


ATLANTIDO   (2002-03-25 17:38:00) [3]

Я так и делал. Но когда запущена например Fifa, мое
окно даже не поднимается


Набережных С.   (2002-03-25 17:28:00) [4]

HWND_NOTOPMOST


ATLANTIDO   (2002-03-25 17:06:00) [5]

1)Поднять окно выше всех
2)Определенные действия
2)Вернуть окно в нормальное состояние. Т.е. так, чтобы
другие окна могли его перекрыть.


Suntechnic   (2002-03-25 06:47:00) [6]

>ATLANTIDO © (23.03.02 01:24)
Что тебе и куда поднять надо? Толком объясни задачу...


ATLANTIDO   (2002-03-24 23:02:00) [7]

helpme


ATLANTIDO   (2002-03-23 11:40:00) [8]

Теперь мое окно вообще не всплывает - как было перекрыто
так и остается.


SPeller   (2002-03-23 08:53:00) [9]

А ты попробуй вместо
SetWindowPos(Form1.Handle,HWND_TOPMOST,Rect.Left,Rect.Top,Rect.Right-Rect.Left,Rect.Bottom-Rect.Top, SWP_SHOWWINDOW);
поставить
SetWindowPos (Form1.Handle, HWND_TOP,Rect.Left,Rect.Top,Rect.Right-Rect.Left,Rect.Bottom-Rect.Top, SWP_SHOWWINDOW);


Наверх

Титульная страница Поиск, карта сайта Написать письмо