Последние записи

made in programmersforum 6

Интенсив по Python: Работа с API и фреймворками 24-26 ИЮНЯ 2022. Знаете Python, но хотите расширить свои навыки?
Slurm подготовили для вас особенный продукт! Оставить заявку по ссылке - https://slurm.club/3MeqNEk

Online-курс Java с оплатой после трудоустройства. Каждый выпускник получает предложение о работе
И зарплату на 30% выше ожидаемой, подробнее на сайте академии, ссылка - ttps://clck.ru/fCrQw

23rd
Ноя

Изменить рисунок рабочего стола

Posted by maloy under Win Api, Архив

Son

Доброго времени суток. Проблема такого рода: можно ли получить HWND рабочего стола, но только той области, где размещаются обои? Чтоб нарисовать например рисунок на рабочем столе, но он бы был под ярлыками.
Такой код:

var  DescHWND: HWND;
...
DescHWND := FindWindow('ProgMan', nil);

возвращает (в Delphi) хендел на весь рабочий стол вместе с иконками.
Заранее благодарен

Stilet

Код:


   function GetDesktopListViewHandle: THandle;
var

S: String;
begin

Result := FindWindow('ProgMan', nil);
Result := GetWindow(Result, GW_CHILD);
Result := GetWindow(Result, GW_CHILD);
SetLength(S, 40);
GetClassName(Result, PChar(S), 39);
if PChar(S) <> 'SysListView32' then Result := 0;
end;

тема на форуме от 2008 года