![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
окно поверх всех окон и назад
Змей © (2005-12-16 02:46:00)есть функция SetWindowPos(Handle, HWND_TOPMOST, Left, Top,
Width, Height, SWP_NOACTIVATE or SWP_NOMOVE or SWP_NOSIZE);
она делает окно поверх всех окон!
а как можно сделать обратное действие?
т.е.
procedure TForm1.Button1Click(Sender: TObject);
SetWindowPos(Handle, HWND_TOPMOST, Left, Top,
Width, Height, SWP_NOACTIVATE or SWP_NOMOVE or SWP_NOSIZE);
end;
procedure TForm1.Button2Click(Sender: TObject);
мы делаем окно обычным :)
end;
Спасибо!
umbra (2005-12-16 09:56:00) [1]а справка по SetWindowPos что по этому поводу говорит?