Скрытие значков рабочего стола

← →
VJar (2002-05-12 12:50) [0]

Как скрыть все значки на рабочом столе, включая
Мой компьютер, Корзину, Мои документы и т.д ???

← →
VJar (2002-05-12 13:08) [1]

Я уже разобрался

procedure ShowDesktop(const YesNo : boolean);
var h : THandle;
begin
h := FindWindow("ProgMan", nil);
h := GetWindow(h, GW_CHILD);
if YesNo = True then
ShowWindow(h, SW_SHOW)
else
ShowWindow(h, SW_HIDE);
end;

Спрятать: ShowDesktop(False)
Показать: ShowDesktop(True)

добавляй эту функцию в UBPFD http://delphibase.endimus.com/

Скрытие значков рабочего стола Найти похожие ветки