投稿日	： 2003/01/07(Tue) 13:04
投稿者	： 魔界の仮面弁士
Ｅメール	：
ＵＲＬ	：
タイトル	： 壁紙の設定方法

開発環境も明記してください。

> 今壁紙チェンジャーを作っているのですが・・・本題にはいっていない・・・
「どこがわからないのか」を明確にしましょう。(^_^;)

> とりあえず壁紙が変わる仕組みとそのプログラムの内容がしりたいのですが・・・
google等で検索すれば、必要なコード自体は簡単に入手できますから、
サンプルは見つかったけれど、その内容が理解できない、という事でしょうか？

bmpの壁紙だけで良いのであれば、SystemParametersInfo APIが使えます。

  Call SystemParametersInfo(SPI_SETDESKWALLPAPER, 0, _
          ByVal "C:\WINDOWS\隅田川.bmp", _
          SPIF_UPDATEINIFILE Or SPIF_SENDCHANGE)


JPEG等も扱いたいなら、SetWallPaperメソッドを使います。
IActiveDesktopインターフェイス用のタイプライブラリを参照設定して、こんな感じで。
    Dim objActiveDesktop As IActiveDesktop
    Set objActiveDesktop = New ActiveDesktop
    objActiveDesktop.SetWallpaper ByVal vbNullString, 0&
    objActiveDesktop.ApplyChanges AD_APPLY_SAVE
    Set objActiveDesktop = Nothing

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/shellcc/platform/shell/reference/ifaces/iactivedesktop/SetWallpaper.asp

なお、VBからIActiveDesktopインターフェイスを利用するためのタイプライブラリは、
標準では用意されていないので、*.TLBファイルを自作するか、あるいは
他の人が作成されたライブラリを利用するかしてください。

★ - 助けてください・・・ - みか 01/07-12:08No.2056
• 壁紙の設定方法 - 魔界の仮面弁士 01/07-13:04 No.2058
• マナーについて - Say 01/07-13:05 No.2059
  • Re: マナーについて - tac 01/08-14:58 No.2074
    • Re^2: マナーについて - ぎゃおん 01/08-15:28 No.2076
    • Re^2: マナーについて - 七氏 01/08-15:44 No.2078
    • Re^2: マナーについて - Say 01/08-17:10 No.2083
• Re: 助けてください・・・ - batchman 01/07-15:06 No.2065
• ありがとうございます - みか 01/07-21:09 No.2070