-
Хочу сделать для свой локалки софтину, которая получает новости и выводит их на обоине рабочего стола.
Собственно непонимаю как сообзить винде, что нужно из указанной картинки сделать обоину?
Гуглил, нашел пример с заменой BMPшки в которой винда хранит обоину, но в этом случае обоина обновляется только при перезагрузке.
-
См в сторону ActiveDesktop. Там хоть обрисуйся. Ну или рисуй прямо на нём. Handle сказать ? :-D
-
Череэ ActiveDesktop?
const
CLSID_ActiveDesktop: TGUID = '';
var
FActiveDesktop: IActiveDesktop;
begin
if (FileName <> '') and (FileExists(FileName)) then
begin
FActiveDesktop := CreateComObject(CLSID_ActiveDesktop)as IActiveDesktop;
FActiveDesktop.SetWallpaper(FileName, 0);
FActiveDesktop.ApplyChanges(AD_APPLY_ALL or AD_APPLY_FORCE);
end;
end;
Вообще гугли. В нете полно…
-
еще лучше через оверлей
-
Не. Это все не то. ACtiveDesktop на всех компах отключен.
Вроде можнож обычную обоину установить. Как это делает mspaint, когда жмешь "Set As Background"
-
> Вроде можнож обычную обоину установить.
Можно и без ActiveDesktop. Ну погугли сам…
-
> которая получает новости и выводит их на обоине рабочего
> стола
а у нас в конторе обоев рабочего стола обычно не видно %)
> обоина обновляется только при перезагрузке
вот разве что..
-
> а у нас в конторе обоев рабочего стола обычно не видно %)
5 баллов!
Я свои 2 раза в день вижу: при включении компа и при выключении.
-
Из каких то старых проектов кусок:
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;
-
Кстати да :). Автор может лучше гаджет?
-
сделать проще и удобнее. написать прогу, окно которой будет всегда на рабочем столе (сильный пинок тем, кто яростно отстаивает точку зрения, что win+d должен сворачивать все), можно даже просто регион по шрифту вырезать. Как обычно и полагается продукту такого класса красивости приветствуются :)
-
> easy © (17.04.08 14:55) [6]
> а у нас в конторе обоев рабочего стола обычно не видно %)
Не включаете компы?
-
> Не включаете компы?
Не выключают :)
-
Локальный Web-Server ИМХО будет лучше - если надо зайдет, инатче ненужна такая программа совсем
ЗЫ Это от нечего делать?
-
> нашел пример с заменой BMPшки в которой винда хранит обоину,
> но в этом случае обоина обновляется только при перезагрузке.
>
Не все нашел... можно и без перезагрузки. Ищи лучше.
-
> [8] Kolan © (17.04.08 14:56)
Спасибо. :))
Нет смысла делать гаджеты или что-то в этом роде.
Нужно как раз ненавязчиво выводить сообщения не критичные.
Например:
17.04.2008 16:20
Интернета не будет до завтра, переустанавливаю систему.
Не работает у тебя интернет - сворачиваешь все на Win+D и смотришь новости.
И самое место для таких сообщений(ИМХО) - обоина рабочего стола.
-
> [15] @!!ex © (17.04.08 15:21)
Запуздырь в трей :) и Балонь мессажу
-
> Нет смысла делать гаджеты или что-то в этом роде.
Гаджет для этого и предназначен, а вот картинка раб. стола нет. ИМХО.
-
> [17] Kolan © (17.04.08 15:26)
Не знай...
Все реализации гаджетов что я видел(Google Desktop, Vista, Vista Transform Pack) вызывают жуткое раздражение и навсегда висят у меня в трее.
> [16] Dennis I. Komarov © (17.04.08 15:24)
Баллоны тоже бесят. :)
-
> Баллоны тоже бесят. :)
Ну не обязательно балон. Можно окно меленькое как в QIP или Download Master'е…
-
А можно в хинт трея запихать. Мышку навел, почитал, убрал мышку — все исчезло…
Есть новые 
Нет новых [134434 +30][b:0][p:0.001]