Форум: "Основная";
Текущий архив: 2005.10.02;
Скачать: [xml.tar.bz2];
ВнизФорма (окно) сзади всех.. как сделать? Найти похожие ветки
← →
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;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.005 c