Текущий архив: 2002.09.12;
Скачать: CL | DM;
Вниз
Не реагировала на команду Найти похожие ветки
← →
Пастор (2002-07-22 09:11) [0]Как на чистом API сделать, чтобы окно не реагировала на команду "Свернуть все окна"?
На VCL это работает :
procedure TForm1.WMWinPosChanging(var Message: TWMWINDOWPOSCHANGING);
begin
Message.WindowPos^.flags := Message.WindowPos^.flags and not SWP_HIDEWINDOW;
end;
А на API почему то этот трюк не проходит :(
WM_WINDOWPOSCHANGING :
begin
wp := Pointer(lParam);
wp^.flags := wp^.flags or SWP_SHOWWINDOW and not SWP_HIDEWINDOW;
Result:=0;
end;
← →
Пастор (2002-07-22 21:37) [1]а в ответ тишина...
← →
Proton © (2002-07-23 01:42) [2]WM_WINDOWPOSCHANGING :
with PWINDOWPOS(wp)^ do
begin
flags := flags or SWP_SHOWWINDOW and not SWP_HIDEWINDOW;
Result:=0;
end;
← →
Пастор (2002-07-23 10:43) [3]это тоже самое..
← →
Proton © (2002-07-23 13:53) [4]попробывал ?
with PWINDOWPOS(wp)^ do
надо заменть на
with PWINDOWPOS(lparam)^ do
← →
pierre © (2002-07-23 15:44) [5]Обрабатываешь мессадж на сворачивание разворачиванием!
Страницы: 1 вся ветка
Текущий архив: 2002.09.12;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.016 c
