delphi编程控制壁纸

2016-02-19 17:46 10 1 收藏

今天图老师小编给大家精心推荐个delphi编程控制壁纸教程，一起来看看过程究竟如何进行吧！喜欢还请点个赞哦~

【 tulaoshi.com - 编程语言】

　　控制Windows的桌面壁纸是一些看图工具常有的功能，要实现该功能是非常容易的，以下的程序使壁纸换为我们想要的图片，如果THEPCHAR为空，那么就取消壁纸，变为Win默认色彩；但这种方法只是暂时的，在WINDOWS重新启动后还是恢复原来的位图，所以要永久保留还需要对WIN.INI文件进行改写操作，才能保存住我们改动的图片不被替换。但这种暂时性也好在让我们可以实现定时更换桌面图片功能：

var THEPCHAR:pchar;beginTHEPCHAR:=e:a.jpg;SystemParametersInfo(SPI_SETDESKWALLPAPER, 0, THEPCHAR, SPIF_SENDWININICHANGE)end;

来源:http://www.tulaoshi.com/n/20160219/1616019.html

上一篇： delphi编程实现弹出、关闭CD-ROM驱动器
下一篇：朋友进一步是情人 - QQ图案分组

看过《delphi编程控制壁纸》的人还看了以下文章更多>>

Delphi编程技巧集锦

标签：编程语言网络编程

◇[DELPHI]网络邻居复制文件 uses shellapi; copyfile(pchar('newfile.txt'),pchar('//computername/direction/targer.txt'),false); ◇[DELPHI]产生鼠标拖动效果通过MouseMove事件、DragOver事件、EndDrag事件实现，例如在PANEL上的LABEL： var xpanel,ypanel,xlabel,ylabel:integer; PAN...

Delphi编程技巧实例

标签： Delphi

Delphi作为一门新起的Windows编程语言，由于其集众多的优秀特性于一身，因而越来越得到广大编程人员和发烧友的青睐。以下十则技巧涉及的面比较广泛，希望能够对Delphi的爱好者有所裨益。 1．类似于vb．中的doevents功能。大家或许发现，在Delphi中没有类似于vb．中的doevents函数，这样有的时候，我们将无法使Windows响应...

iPhone如何远程控制电脑？

标签： iphone iPhone 5s iPhone 6 iphone刷机

iPhone如何远程控制电脑？相信大部分的机友们都知道iOS设备可以作为遥控器所使用，但是如何利用它进行远程控制电脑开机呢?也许还有很多朋友对这一功能不是很了解，所以接下来图老师小编来和大家分享下iPhone如何远程控制电脑，以下图老师小编为大家总结了远程控制电脑开机方法，有需要的朋友们可以来参考下。【iPhone远程控...

winXP远程控制技术汇总

标签：电脑入门

为系统添加远程桌面默认状态下，Windows 2000及其之前的系统并没有安装远程桌面，要想在这些系统中使用远程桌面，需要自己手工添加。在Windows XP系统安装光盘的“SUPPORTTOOLS”目录中，可找到一个名为“Msrdpcli.exe”的程序，它实际上就是远程桌面连接登录器。将此程序复制到没有远程桌面的系统中并运行后，即可自...

Java join 线程控制用法

标签：编程语言网络编程

JDK说明： join public final void join() throws InterruptedException等待该线程终止。抛出： InterruptedException - 如果任何线程中断了当前线程。当抛出该异常时，当前线程的中断状态被清除测试代码：代码如下： public class MyTh...

查看更多精彩>>