为了让程序用ALT+DEL+CTRL看不见,在implementation后添加声明: function RegisterServiceProcess(dwProcessID, dwType: Integer): Int…
在Windwos中调用系统功能
对程序员而言,有一句至理名言就是:“写得好就是写得少!(Writing better is writing less)” 回答: 以下命令可以直接在Windows的运行窗口直接执行,在Delphi中你要这样使用: win…
列windows窗口
(* Window List Component 1.5 by Jerry Ryle Aaugh! I accidentally uploaded the wrong source which had a nasty b…
删除文件和目录,包括子目录
//============================================================================== //作者:cactus123456@hotmail.com…
通过IdHTTP自动提交网页信息
unit StartPostUnit; interface uses Classes,IdBaseComponent,stdctrls,Sysutils,IdComponent, IdTCPConnection, IdT…
简单加密解密短字符串
{ ************************************************************************* * Name: Crypt32.Pas * Description:…
在别的程序中建立一个按钮,并执行按钮中的事件
//利用本示例可以在别的程序建立自己的图形及事件 unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, …
测试你网站在国外访问速度的工具
http://www.alertra.com/
[原创]Delphi中在使用LoadFromStream时千万要注意的问题
比如下面这段代码 IdHTTP1:=TIdHTTP.Create(nil); try IdHTTP1.Get(CheckURL, MS); //保存到内存流 //MS.SaveToFile(‘c:\eip2.…