具体使用方法如下,另外还附有源代码:/*1、 MD5String、MD5File、MD5Print、MD5Match这四个函数是供调用的。其他是用来辅助这几个函数的子函数。2、MD5String为加密字符串。3、MD5File为加密这个文件。4、MD5Print是将加密后的密文转换成字符串。5、MD5Match是用来比较密文是否一致。加密字符串aaa MD5String('aaa')将加密后的aaa显示出来 MD5Print(MD5String('aaa'))比较两次密文是否一致: MD5Match(MD5String('第一次明文'),MD5String('第二次输入的明文'))*/MD5加密算法(DELPHI)unit md5;// -----------------------------------------------------------------------------------------------INTERFACE// ----------------------------------------------------------------------

Code 2009-03-05

本页内容为:Delphi程序中调用控制面板程序(winexec的使用),该文章本站转载自网络,如有侵权请告之,我们将会及时将其删除,其正文内容如下:var x:cardinal;begin{启动控制面板}x:=winexec('rundll32.exe shell32.dll,Control_RunDLL',9);{辅助选项 属性-键盘}x:=winexec('rundll32.exe shell32.dll,Control_RunDLL access.cpl,,1',9);{辅助选项 属性-声音}x:=winexec('rundll32.exe shell32.dll,Control_RunDLL access.cpl,,2',9);{辅助选项 属性-显示}x:=winexec('rundll32.exe shell32.dll,Control_RunDLL access.cpl,,3',9);{辅助选项 属性-鼠标}x:=winexec('rundll32.exe shell32.dll,Control_RunDLL access.cpl,,4',9);{辅助选项 属性-常规}x:

Code 2009-03-02

procedure CmdExecAndView(FileName: string; memo: TMemo);procedure _AddInfo(mmInfo:TMemo; S: string; var line: string);var    i, p: Integer;begin    if mmInfo.Lines.Count > 800 then      mmInfo.Lines.Clear;    //去掉 \r    for i := 0 to Length(S) - 1 do      if S[i] = #13 then S[i] := ' ';    line := line + S;    // \n 断行    p := Pos(#10, line

Code 2009-03-02

直接显示调用地址 程序代码http://321cc.cn/Ip.jpg自定义个性签名调用地址 程序代码http://321cc.cn/jpg.jsp/?s=你的签名&w=.jpg直接显示代码:把文件放于任意目录,用图片调用方式调用该文件即可显示最新文章的图片。自己修改showip.asp的对应参数。调整文章标题在图片中的位置。调用方式为【img]showip.asp【/img](其中【为英文输入法字符),背景图片为Ip.jpg,可以自己修改。压缩包中包含纯真数据库版本:2008年12月15日自定义个性签名版本还在调试中,暂不提供下载 显IP个性签名-增强版 下载地址1 显IP个性签名-增强版 下载地址2

Code 2008-12-20

把文件放于BLOG根目录,用图片调用方式调用该文件即可显示最新文章的图片。自己修改showlog.asp的对应参数。调整文章标题在图片中的位置。调用方式为【img]showlog.asp【/img](其中【为英文输入法字符),图片放到showlog/images目录下。修改其中的SQL语句可调用热门文章,精华文章等,另外如果加上IP地址库还可以显示访问者IP来源地址噢。增强版本:随机替换背景图片及处理日志标题位置。显IP来源地址本站已经做出。转载太多,好多都没注明来源。只提供会员下载(免费注册)。 显IP地区+随机背景图片增强版 - 下载 随机背景图片增强版 - 下载 单张图片版 - 下载

Code 2008-12-16