壁紙を変更する

壁紙の変更など、システムの環境を設定するには SystemParametersInfo APIを使用します。壁紙の変更は、この関数に定数 SPI_SETDESKWALLPAPER を設定します。

■ 壁紙を変更する例

begin SystemParametersInfo (SPI_SETDESKWALLPAPER, 0, PChar('C:\Borland\Athena.bmp'), SPIF_UPDATEINIFILE); end;