Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.10.02;
Скачать: CL | DM;

Вниз

Форма (окно) сзади всех.. как сделать?   Найти похожие ветки 

 
SergP ©   (2005-09-08 01:11) [0]

Нужно чтобы окно было сзади всех окон, причем даже сзади иконок на рабочем столе... Как это можно сделать?


 
GanibalLector ©   (2005-09-08 01:20) [1]


protected
 procedure CreateParams(var Params: TCreateParams); override;

//...

procedure TForm.CreateParams(var Params: TCreateParams);
begin
 inherited CreateParams(Params);
 if Assigned(Application.MainForm) then
 begin
   Params.WndParent := GetDesktopWindow;
   Params.Style := WS_CHILD;
 end;
end;
//Взято с сайтаhttp://www.swissdelphicenter.ch/en/tipsindex.php


P.S. На счет иконок ты загнул!


 
SergP ©   (2005-09-08 01:36) [2]


>  [1] GanibalLector ©   (08.09.05 01:20)


Пробовал это... На Delphiworld находил....
Вроде бы почти то, но хотелось бы все-таки позади иконок...


> P.S. На счет иконок ты загнул!


неужели невозможно?

Хочу чтобы на рабочем столе поверх обоев высвечивались всякие полезные надписи, типа напоминания и т.п., но чтобы при этом не мешали работе, поэтому и нужно позади иконок...


 
SergP ©   (2005-09-08 07:32) [3]

Ну тогда хоть подскажите с помощью чего можно такое сделать....


 
SergP ©   (2005-09-08 07:33) [4]

Ну тогда хоть подскажите с помощью чего можно такое сделать....


 
Slym ©   (2005-09-08 08:08) [5]

Хук на WM_PAINT и прочий WM и рисуй прямо не десктопе.


 
DVM ©   (2005-09-08 10:16) [6]

SetShellWindow()


 
DVM ©   (2005-09-08 10:19) [7]


> Вроде бы почти то, но хотелось бы все-таки позади иконок...

Ты что серьезно полагаешь, что иконки сами по себе лежат на поверхности десктопа? И под них можно "подсунуть окно"?
Это у эксплорера в ListView содержащем иконки фон отрисовывается такой же как на десктопе и даже если ты подсунешь свое окно под ListView, последний, отрисовывая свой фон "замажет" изображение твоего окна.



Страницы: 1 вся ветка

Текущий архив: 2005.10.02;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.059 c
2-1124979182
Sphinx
2005-08-25 18:13
2005.10.02
Странная ошибка


1-1126004967
Ш-К
2005-09-06 15:09
2005.10.02
Подгрузка DFM


1-1126604338
IfBeginThenEnd
2005-09-13 13:38
2005.10.02
Базовый API


3-1124259146
Strech
2005-08-17 10:12
2005.10.02
Получение доступа к BLOB полям в таблицах dBase (dbf) через ADO


1-1126561026
lauren
2005-09-13 01:37
2005.10.02
bold button