控制Windows的桌面壁紙是一些看圖工具常有的功能,要實現該功能是非常容易的,以下的程序使壁紙換為我們想要的圖片,如果THEPCHAR為空,那麼就取消壁紙,變為Win默認色彩;但這種方法只是暫時的,在WINDOWS重新啟動後還是恢復原來的位圖,所以要永久保留還需要對WIN.INI文件進行改寫操作,才能保存住我們改動的圖片不被替換。但這種暫時性也好在讓我們可以實現定時更換桌面圖片功能:
var THEPCHAR:pchar;
begin
THEPCHAR:=e:\a.jpg;
SystemParametersInfo(SPI_SETDESKWALLPAPER, 0, THEPCHAR, SPIF_SENDWININICHANGE)
end;