![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Окно
Goorus © (2004-08-11 06:56:00)Как сдедать, чтобы окно всегда было снизу, тоесть обратное StayOnTop. Пишу на WinAPI, поэтому у онка нет функции SendToBack, а аналогичной, типа WM_SENDTOBACK, я не нашёл.
Goorus (2004-08-11 12:19:00) [1]Пасибо :)
inic (2004-08-11 10:57:00) [2]Попробуй, это снесет тебе башню:)
TForm1 = class(TForm)
private
{ Private declarations }
procedure WMWindowPosChanging (var Msg: TWMWindowPosChanging); message WM_WINDOWPOSCHANGING;
public
{ Public declarations }
end;
// ...
procedure TForm1.WMWindowPosChanging (var Msg: TWMWindowPosChanging);
begin
Msg.WindowPos.hwndInsertAfter:= HWND_BOTTOM;
Msg.WindowPos.flags:= Msg.WindowPos.flags and (not SWP_NOZORDER);
inherited;
end;
Если я правильно понял, то это именно то, что ты хотел,
а также попробуй убирать другие флаги SWP_.
inic (2004-08-11 10:57:00) [3]Я забыл, что нахожусь в WinAPI, но как переделать в чистое WINAPI я думаю понятно