Вниз
Скачать: CL | DM;

Обновлений картинки на рабочем столе.   Найти похожие ветки 

← →
@!!ex ©   (2008-04-17 14:26) [0]

Хочу сделать для свой локалки софтину, которая получает новости и выводит их на обоине рабочего стола.
Собственно непонимаю как сообзить винде, что нужно из указанной картинки сделать обоину?
Гуглил, нашел пример с заменой BMPшки в которой винда хранит обоину, но в этом случае обоина обновляется только при перезагрузке.


← →
tesseract ©   (2008-04-17 14:27) [1]

См в сторону ActiveDesktop. Там хоть обрисуйся. Ну или рисуй прямо на нём. Handle сказать ? :-D


← →
Kolan ©   (2008-04-17 14:31) [2]

Череэ ActiveDesktop?

const
 CLSID_ActiveDesktop: TGUID = "{75048700-EF1F-11D0-9888-006097DEACF9}";
var
 FActiveDesktop: IActiveDesktop;
begin
 if (FileName <> "") and (FileExists(FileName)) then
   begin
     //if FActiveDesktop = nil then

     FActiveDesktop := CreateComObject(CLSID_ActiveDesktop)as IActiveDesktop;
     FActiveDesktop.SetWallpaper(FileName, 0);
     FActiveDesktop.ApplyChanges(AD_APPLY_ALL or AD_APPLY_FORCE);
   end;
end;


Вообще гугли. В нете полно&#133


← →
DVM ©   (2008-04-17 14:32) [3]

еще лучше через оверлей


← →
@!!ex ©   (2008-04-17 14:41) [4]

Не. Это все не то. ACtiveDesktop на всех компах отключен.
Вроде можнож обычную обоину установить. Как это делает mspaint, когда жмешь "Set As Background"


← →
Kolan ©   (2008-04-17 14:50) [5]

> Вроде можнож обычную обоину установить.

Можно и без ActiveDesktop. Ну погугли сам&#133


← →
easy ©   (2008-04-17 14:55) [6]


> которая получает новости и выводит их на обоине рабочего
> стола

а у нас в конторе обоев рабочего стола обычно не видно %)

> обоина обновляется только при перезагрузке

вот разве что..


← →
Ega23 ©   (2008-04-17 14:56) [7]


> а у нас в конторе обоев рабочего стола обычно не видно %)


5 баллов!

Я свои 2 раза в день вижу: при включении компа и при выключении.


← →
Kolan ©   (2008-04-17 14:56) [8]

Из каких то старых проектов кусок:

procedure TWallPaperChangeManager.RegChangeWallapaer(FileName: string);
var
 Reg: TRegIniFile;
begin
 Reg := TREgIniFile.Create("Control Panel");
 try
   Reg.WriteString("desktop", "Wallpaper", FileName);
   Reg.WriteString("desktop", "TileWallpaper", "1");
   SystemParametersInfo(SPI_SETDESKWALLPAPER, 0, Nil,
     SPIF_SENDWININICHANGE);
 finally
   Reg.Free;
 end;
end;


← →
Kolan ©   (2008-04-17 14:57) [9]

Кстати да :). Автор может лучше гаджет?


← →
antonn (work)   (2008-04-17 15:01) [10]

сделать проще и удобнее. написать прогу, окно которой будет всегда на рабочем столе (сильный пинок тем, кто яростно отстаивает точку зрения, что win+d должен сворачивать все), можно даже просто регион по шрифту вырезать. Как обычно и полагается продукту такого класса красивости приветствуются :)


← →
oldman ©   (2008-04-17 15:09) [11]


> easy ©   (17.04.08 14:55) [6]
> а у нас в конторе обоев рабочего стола обычно не видно %)


Не включаете компы?


← →
Kolan ©   (2008-04-17 15:12) [12]

> Не включаете компы?

Не выключают :)


← →
Dennis I. Komarov ©   (2008-04-17 15:17) [13]

Локальный Web-Server ИМХО будет лучше - если надо зайдет, инатче ненужна такая программа совсем

ЗЫ Это от нечего делать?


← →
ZeroDivide ©   (2008-04-17 15:18) [14]


> нашел пример с заменой BMPшки в которой винда хранит обоину,
>  но в этом случае обоина обновляется только при перезагрузке.
>


Не все нашел... можно и без перезагрузки. Ищи лучше.


← →
@!!ex ©   (2008-04-17 15:21) [15]

> [8] Kolan ©   (17.04.08 14:56)

Спасибо. :))

Нет смысла делать гаджеты или что-то в этом роде.
Нужно как раз ненавязчиво выводить сообщения не критичные.

Например:
17.04.2008 16:20
Интернета не будет до завтра, переустанавливаю систему.


Не работает у тебя интернет - сворачиваешь все на Win+D и смотришь новости.
И самое место для таких сообщений(ИМХО) - обоина рабочего стола.


← →
Dennis I. Komarov ©   (2008-04-17 15:24) [16]

> [15] @!!ex ©   (17.04.08 15:21)

Запуздырь в трей :) и Балонь мессажу


← →
Kolan ©   (2008-04-17 15:26) [17]

> Нет смысла делать гаджеты или что-то в этом роде.

Гаджет для этого и предназначен, а вот картинка раб. стола нет. ИМХО.


← →
@!!ex ©   (2008-04-17 15:59) [18]

> [17] Kolan ©   (17.04.08 15:26)

Не знай...
Все реализации гаджетов что я видел(Google Desktop, Vista, Vista Transform Pack) вызывают жуткое раздражение и навсегда висят у меня в трее.


> [16] Dennis I. Komarov ©   (17.04.08 15:24)

Баллоны тоже бесят. :)


← →
Kolan ©   (2008-04-17 16:01) [19]

> Баллоны тоже бесят. :)

Ну не обязательно балон. Можно окно меленькое как в QIP или Download Master"е&#133


← →
Kolan ©   (2008-04-17 16:02) [20]

А можно в хинт трея запихать. Мышку навел, почитал, убрал мышку &#151; все исчезло&#133



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

Скачать: CL | DM;



Память: 0.49 MB
Время: 0.012 c
15-1208514535
Ega23
2008-04-18 14:28
2008.06.01
Программы генерации RSA-ключей


2-1210445090
Alexey
2008-05-10 22:44
2008.06.01
Как поменять местами появление форм


2-1210157112
Mishenka
2008-05-07 14:45
2008.06.01
Как вывести монитор из стендбая?


2-1210591316
Leo
2008-05-12 15:21
2008.06.01
Захват записи или распределение доступа к оной.


15-1208262117
Vlad Oshin
2008-04-15 16:21
2008.06.01
Помогите с базой 1с версии 8.1 или языком. Актуальные итоги.




   Наверх