Delphi实现动态修改显示器分辨率

2017年02月06日 76 阅读

Delphi实现动态修改显示器分辨率2008-04-20本实例演示如何在程序中动态修改屏幕的分辨率，并且不需要重新启动计算机就可以生效。向窗体上添加两个Button控件，设计完成的主界面如图1所示。图1 主界面在程序中添加一个自定义函数DynamicResolution，它有两个参数，分别对应于水平和垂直方向的分辨率，并且该函数有一个BOOL类型的返回值，通过判断返回值可以判断DynamicResolution函数是否正确执行。DynamicResolut...

Delphi编程启动关闭热启动

2017年02月06日 80 阅读

Delphi编程启动关闭热启动2008-04-20如果你是要制作一个有密码保护的屏幕保护程序，那么关闭热启动将是非常必要的，否则被人一按热启动，关闭了你的程序，那么不是起不了保护作用吗？要使系统的热启动键（Ctrl+Alt+Del）失效，使用以下语句SystemParametersInfo（SPI_SCREENSAVERRUNNING, 1, 0, 0）;要恢复系统的热启动键（Ctrl+Alt+Del），使用以下语句SystemParametersInfo...

delphi编程启动屏幕保护程序

2017年02月06日 92 阅读

delphi编程启动屏幕保护程序2008-04-20在一些比较高级的程序中，有些资料是秘密的，那么在有人接近的时候，就需要启动一个屏幕保护，保护自己的电脑资料，所以我们选用WINDOWS的屏幕保护功能，可是操作系统需要我们在一定的时间内不接触电脑才能启动保护程序，这是达不到实时效果的，所以利用下列语句直接开始Windows的屏幕保护程序：SendMessage（HWND_BROADCAST,WM_SYSCOMMAND,SC_SCREENSAVE,0）;把以...

delphi编程取得系统界面颜色

2017年02月06日 74 阅读

delphi编程取得系统界面颜色2008-04-20制作程序时，被Windows的界面色彩弄得头昏眼花，设计时是一种颜色，色彩搭配得挺好的，可是到了用户手里字体却看不清楚，严重影响了程序效果，所以结合操作系统调配颜色将是令用户用得开心的不可多得的步骤：下面列出了操作系统界面各部位的名称，要取得系统颜色，把参数换一下就可以了。COLOR_SCROLLBAR 滚动条COLOR_BACKGROUND 桌面背景COLOR_ACTIVECAPTI...

用Delphi实现壁纸更换

2017年02月06日 80 阅读

用Delphi实现壁纸更换2008-04-20在Windows95/98中，都是使用注册表对系统数据进行管理,有关壁纸的设置数据保存在Hkey_Current_UserControl PanelDesktop的Wallpaper和TileWallpaper 等键值中,只要成功修改了这两个键值,然后发消息给Windows即可更换壁纸。在本例的程序中,使用了一个Tform;两个Tspeedbutton（Speedbutton1用于接受用户的浏览命令,Speed...

右键任来去

2017年02月06日 69 阅读

右键任来去2008-04-20用于开发WINDOWS程序的语言不少，一般来说小型通用程序用DELPHI是个不错的选择，没听说过吗？？？“聪明的程序员用DELPHI”。我们上网常用的FOXMAIL、网络蚂蚁等都是用它开发的。兴致来了用DELPHI做个小程序，比方说：“大文件切割机”，要与朋友们共享，想没想过将它注册到系统的右键中？朋友们只需在文件上点击右键，就可以选择启动你的杰作来工作了。现在就演示一下如何召唤...

Delphi编程检测驱动器类型

2017年02月06日 79 阅读

Delphi编程检测驱动器类型2008-04-20查看驱动器时，往往需要知道驱动器是属于什么类型的，才能进行读写操作，具体实现方法请看下面的程序：var x:integer;driver:pchar;begindriver:=f:;x := GetDriveType（driver）;Case x of2: Label1.Caption := 该驱动器是可移动驱动器;3: Label1.Caption := 该驱动器是固定驱动器;4: Label1.Capt...

Delphi编程辨别显示分辨率

2017年02月06日 72 阅读

Delphi编程辨别显示分辨率2008-04-20现在的显示分辨率是越来越高了，以至于是多少都搞不清楚，程序也往往需要知道分辨率才能合理安排窗体，所以要得到显示分辨率，下列的程序帮你忙：varx:longint;a:string;beginx := GetSystemMetrics（SM_CXSCREEN）;Str（x,a）;Label1.Caption := 显示器水平分辨率 + a;x := GetSystemMetrics（SM_CYSCREEN）;...

使用Delphi获取系列信息

2017年02月06日 68 阅读

使用Delphi获取系列信息2008-04-20Delphi以其优良的可视化编程，灵活的Windows API接口，丰富的底层操作越来越受到编程爱好者的青睐。在Delphi中，通过调用Windows API，可以很方便地获取系统信息，这有助于我们编写出更好的Windows应用程序。以下程序在Delphi3.0 For Windows 9x下编译通过。一、 用GetDriveType函数获取磁盘信息Lbl_DriveType:Tlabel;DriveType...

用delphi获取主板BIOS信息

2017年02月06日 73 阅读

用delphi获取主板BIOS信息2009-01-301、读取主板序列号2、AWard Bios密码读取3、读取BIOS信息4、获取BIOS日期信息＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝1、读取主板序列号uses SHA1, Base64;function GetHashedBiosInfo: string;var SHA1Context: TSHA1Context; SHA1Digest: TSHA1Dig...

Delphi中为TreeView添加单选和复选框

2017年02月06日 91 阅读

Delphi中为TreeView添加单选和复选框2009-01-30 天极 小刀轻舞打开电脑，进入Windows操作系统，在资源管理器的左边栏中清楚地显示了系统管理的所有磁盘的信息以及各个磁盘所容纳的文件与文件夹（如图一）。这种常见的显示方式是由一个根节点和若干个子节点构成的，这被称为“树形结构”。这种树形结构的用途非常广泛，在很多常用软件中都出现过它的身影。Windows中将这种结构封装为“树形控件”，即T...

第一个delphi for php的小程序

2017年02月06日 68 阅读

第一个delphi for php的小程序2009-01-30 java060515 java060515今天化了一个小时写了一个小程序，我的delphi php的第一个程序。功能是在浏览器上显示一道简单的加法题，用户可以输入答案，电脑会告诉你正确或者错误，然后可以再来一题。功能很简单，主要为了熟悉delphi for php，写的时候，不时地查阅php帮助，发现这次codegear的php帮助做的还是不错的。程序如下：//Includesrequire_...

delphi 2007开发vista应用必须注意的几点

2017年02月06日 70 阅读

delphi 2007开发vista应用必须注意的几点2009-01-301.必须使用windows版本判断，在程序开头判断是否vista，如果你的程序用到了vista的特性，必须这么做 2.不允许使用manifest，即使没有用到vista的特性，如果使用manifest，编译后在xp上也会蓝屏 3.尽量不要带dll，使用原生VCL开发，vista下编译的dll放到xp下有可能会不正常 4.程序运行时，把自己注册成administrator，如果你打算操...

让Delphi 2007 for PHP正确显示中文

2017年02月06日 90 阅读

让Delphi 2007 for PHP正确显示中文2009-01-30在 Delphi 2007 for PHP 中,中文显示（尤其是按钮中的文显示）可以用如下的方法进行解决:使用页面对象的setEncoding（$value）方法来为页面指定charset,$value的格式为"编码说明|编码",如下所示为将页面设置为GBK编码:$Unit1->setEncoding（"Chinese China （zh-cn）|G...

Delphi for PHP全面剖析

2017年02月06日 71 阅读

Delphi for PHP全面剖析2009-01-30 phpres.com AngeloverDelphi For PHP的试用版,需要注意的是官方授权的试用时间,只有一天,俺从业10年以来首次认识大公司这种特有销售风格！CodeGear™ Announces General Availability of Delphi® for PHP Developers Say Delphi’s Rapid Application...

Delphi 2007 For Win32/Delphi For PHP，速度真的很快！

2017年02月06日 78 阅读

Delphi 2007 For Win32/Delphi For PHP，速度真的很快！2009-01-30 phpres.com Angelover在使用Delphi For PHP的时候也让人回想起以前Delphi 7的时光，这当然是因为Delphi For PHP是使用Delphi 7开发的，在很久没有使用纯原生整合发展环境之后，特别令人感觉亲切和有一种非常怀念的熟悉味道。许多开发者仍然在使用Delphi 7，甚至有人做了一个所谓的Delphi 7绿...

Delphi 2007 for PHP的几条技巧

2017年02月06日 69 阅读

Delphi 2007 for PHP的几条技巧2009-01-30 phpres.com ngeloverDelphi 2007 for PHP，虽名为Delphi，但其实质上是Delphi的RAD框架与PHP语言的结合，以期能像其他版本的Delphi一样，能大幅度提高程序员的开发效率。如此结合，在网站界面设计、代码编写、程序调试等方面的确有不少令人耳目一新、为之惊叹的特性，这又让我们回忆起Borland的创新。可能因为是全新产品，在实际应用中，依然出现...

关于Delphi 2007的几个东东

2017年02月06日 74 阅读

关于Delphi 2007的几个东东2009-01-30 KYLIX KYLIX Delphi这几年的变化真快，不但由公司Borland剥离出来到CodeGear，版本也从2005->2006->2007每年都一个。不过Delphi2007应该是个跨时代的的产品吧，虽然和Delphi2006相比修改不是很大，不过也有很多新鲜的地方。具体的地球人都知道，我就不说了。不过新的东西总会有很多支持赶不上的问题。1.版本问题目前Delphi2007的版本...

EhLib 4.1在Delphi 2007下无法过滤和排序的问题

2017年02月06日 69 阅读

EhLib 4.1在Delphi 2007下无法过滤和排序的问题2009-01-30今天将一个程序升级到了 Delphi 2007，该程序是用Delphi7开发的，程序中用到了一个第三方组件EhLib。原先的 EhLib 是v3.6，无法在Delphi2007下安装，所以安装了最新的 v4.1。原先正常的程序，在升级后，发现 DBGridEh 无法进行排序和过滤，执行操作时无反应。后来发现，如果选择本地过滤和排序的话，一切都会正常；如果是服务器端排序和过滤...

Delphi2007新功能-有限的栈对象

2017年02月06日 80 阅读

Delphi2007新功能-有限的栈对象2009-01-30通过实验，答案是肯定的！这使我感到很兴奋，因为Delphi从诞生之日起，就限定了只能继承于TObject的堆对象，必须通过Create和Free来建立和销毁一个对象，而不能使用栈对象。而栈对象的好处就在于它能和其它类型一样很方便的定义，它能自动调用构造函数和析构函数，在作用域范围内（如函数内的局部对象）不必当心对象的建立和销毁问题。要是Delphi具有了该功能，无意是Delphi编程者们的福音。不...