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

Вниз

Как используя API выключить ActiveDesktop   Найти похожие ветки 

 
SerVS - S   (2002-01-29 14:13) [0]

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


 
Raptor   (2002-01-29 21:59) [1]

Обновить ActiveDesktop легко. Используешь интерфейс IActiveDesktop. Вот тпример который изменяет волпапер на ActiveDesktop и после этого обновляет его.

procedure WallpaperChanger(path:String);
var
ActiveDesktop: IActiveDesktop;
ss:WideString;
begin
ss:=WideString(path);
ActiveDesktop := CreateComObject(CLSID_ActiveDesktop) as IActiveDesktop;
ActiveDesktop.SetWallpaper(PWideChar(ss), 0);
ActiveDesktop.ApplyChanges(AD_APPLY_ALL or AD_APPLY_FORCE);
end;

Только не забудь включить модули ShlObj и ComObj в Uses.
А как включить или выключить я не знаю. В описании IActiveDesktop я не нашел способа сделать это.


 
Mover   (2002-02-20 12:16) [2]

А я знаю! ;-P
Технологию смотрите в моей программе Wallpaper (v0.6) в Кладовке.



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

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

Наверх




Память: 0.47 MB
Время: 0.016 c
14-81066
Fellomena
2002-03-18 18:46
2002.04.25
Возможна ли связка *.lib от Фортрана с Delphi проектами ?


1-80972
Jony
2002-04-12 09:55
2002.04.25
Где разместить ЕХЕ-шник?


3-80768
kserg@ukr.net
2002-04-04 13:12
2002.04.25
DbGridEh - не могу убить маркер сортировки


1-81002
VS
2002-04-10 12:20
2002.04.25
Как можно написать что-то типа Create Installer 2000 и подобные


1-80903
VJar
2002-04-14 23:33
2002.04.25
Самокопирование