Witam serdecznie.
Chcę zrobić pewny StayOnTop formy i do tego, żeby nie było paska/ikony na taskbarze.
Ofc zrobiłem to:
procedure NoTaskBar; //wywoływany był w OnCreate i w OnShow, ale to chyba nie ma znaczenia, więc jest w OnShow
begin
ShowWindow(Application.Handle, SW_HIDE);
//ShowWindow(GetDesktopwindow, SW_HIDE);
end;
procedure TPTKACFForm.CreateParams(var Params: TCreateParams);
begin
inherited CreateParams(Params);
with Params do begin
ExStyle := ExStyle or WS_EX_TOPMOST;
WndParent := GetDesktopwindow;
end;
end;
No ale razem to nie współgra ;/ Domyslam się, że dlatego, że parenta zmieniamy temu formowi na pulpit, no a w kodzie NoTaskBar mamy usuniecie z taskbara naszego appa... Ale jak próbowałem
ShowWindow(GetDesktopwindow, SW_HIDE);
lub podobnie, to też z marnym skutkiem.. :)
Jakieś pomysły?
Z góry dziękuję i pozdrawiam!