Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как спрятать все иконки на рабочем столе? [D6, D7, Win95/98, Win2k]

KPY © (2003-02-28 16:24:00)
САБЖ собственно.

KPY (2003-03-03 07:48:00) [1]
сделал все как у Songoku работает под 2000 и под 98

GROL (2003-03-02 12:54:00) [2]

> h := GetWindow(h, GW_CHILD);
h := GetWindow(h, GW_CHILD);
> if YesNo = True then

Надо вставлять такую строку, т.к. у меня в XP потом меню десктопа не вызывается.

Songoku (2003-03-01 14:54:00) [3]
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;

Marser (2003-02-28 23:56:00) [4]

> DVM © (28.02.03 19:45)

> Человек не просил прятать все окно Progman -а, а просил
> только иконки. Вдруг он контекстное меню хотел оставить?

Ну тогда можно все ярлыки вынести за предел экрана :-)
При помощи реестра эти вещи настраиваються и более тонко

DVM (2003-02-28 19:45:00) [5]
Человек не просил прятать все окно Progman -а, а просил только иконки. Вдруг он контекстное меню хотел оставить?

Marser (2003-02-28 19:36:00) [6]
HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer

NoDesktop[REG_DWORD]= 1

Через TRegistry.Действует после ребута.

AGGRESSOR (2003-02-28 18:43:00) [7]
И вовсе не нужно такого гемороя. Это делается одной строкой:
ShowWindow (GetDesktopWindow, SW_HIDE);

R4D][ (2003-02-28 18:23:00) [8]
Я не уверен, но посмотри в ShellApi.pas работу с иконками рабочего стола и просто изменяй их координаты на те, которые не входят в видимость. В любом случае нужно будет использовать COM.

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »