- 博客(40)
- 资源 (3)
- 收藏
- 关注
RSS订阅原创 最简单的计算MD5方法
原来写过一个计算MD5的程序,是用了一个叫MD5.pas的单元,使用起来还算简单,但还有更简单的办法,安装了indy就会有IdHashMessageDigest单元(delphi 7默认安装indy)有篇文章教怎么用IdHashMessageDigest计算字符串md5,计算文件md5却没有说,在这里补充一下,先看计算函数:function TIdHashMessageDigest4.HashVa
2006-09-22 21:41:00
1274
转载 MD5算法研究
综述 MD5的全称是Message-Digest Algorithm 5（信息-摘要算法），在90年代初由MIT Laboratory for Computer Science和RSA Data Security Inc的Ronald L. Rivest开发出来，经MD2、MD3和MD4发展而来。它的作用是让大容量信息在用数字签名软件签署私人密匙前被"压缩"成一种保密的格式（就是把一个任意
2006-09-22 20:22:00
492
原创 好久没更新BLOG
差不多半年没更新了,借口很多就不说了,主要还是懒有时候需要写点东西发泄一下,现在就是到这个时候了大三,大三算什么或者说大学算什么,来这里为什么,很多人问我,交这么多钱上大学,毕业证都得不到,是不是白学了,浪费钱,我确实浪费钱,但尽管浪费钱我也不想在教室呆下去,走在学校的路上,每个人都象莘莘学子,每个人都是拿着几本书漫步在校园,阳光洒在身上,真的好舒服,我也喜欢那种感觉,但一进到教室,什么都变
2006-09-22 16:30:00
588
转载 IIS 500内部错误之解决办法
IIS 500内部错误之解决办法问题起因： IIS已经启动但是web无法使用 IE返回500内部错误 记录如下 由于在下列系统 API 错误，COM+ 服务无法初始化。它通常是由本地计算机的系统资源存储问题引起的。CryptAcquireContext进程名称: dllhost.exe该错误的严重性已导致进程终止。错误代码= 0x80090017 : 提供程序类型未被定义。COM+ 服
2006-09-22 15:10:00
727
原创 详解绿化Macromedia 8
绿化Macromedia 8系列准备工具：Uninstall Manager v4.20 监视分区文件变动用户：FreeUser 注册码：988网上下载的绿化版都会删减文件或者打上XXX制作的烙印，看着就不爽，自己又经常重装系统，无奈只有自己操刀以Dreamweaver为例，FireWorks，Flash的制作过程是一样的运行Dreamweaver安装程序，NEXT到（图2）screen.widt
2006-07-04 20:24:00
749
转载 Universal Extractor 多用途解压缩工具 [分离流氓软件]
Universal Extractor 能打开很多打包过的程序看看怎么用它来分离流氓软件，我在汉化新世纪下载Advanced Office Password Recovery 3.04 专业版 作个测试，下载回来是个压缩包，里面只一个EXE文件和一个TXT，一般只能运行EXE安装软件，这样很容易安装它附带的流氓程序，现在用Universal Extractor解开EXE，看看里面有什么吧，看看那些
2006-07-04 20:16:00
2072
转载 什么是关系型数据库
数据表的组成 数据库就是储存数据的地方。关系型数据库是由许多数据表（Table）所组成，资料表又是由许多笔记录（Row 或Record）所组成，而纪录又是由许多的字段（Column 或Filed）所组成。假设我们是一个电子商务网站，现在要纪录使用者的数据，你可能会想到要纪录使用者的账号、密码、姓名、电话、住址以及E-mail 等数据；这一些你所要纪录的项目，每一个项目就是一个字段。所以我们将
2006-06-21 15:47:00
1469
1
转载 网络蜘蛛
网络蜘蛛http://FullSearch.Com 中文全文检索网 2004-9-18 23:15:33 winter 关键词：中文搜索引擎技术揭密 随着搜索经济的崛起，人们开始越加关注全球各大搜索引擎的性能、技术和日流量。作为企业，会根据搜索引擎的知名度以及日流量来选择是否要投放广告等；作为普通网民，会根据搜索引擎的性能和技术来选择自己喜欢的引擎查找资料；作为学者，会把有代表性的搜索引擎作为研究
2006-06-07 20:47:00
612
转载 在数据库中存取图像文件
向窗体上添加一个TListBox组件、一个TImage组件和一个TTable组件，设计完成的主界面如图1所示。 图1 主界面 本系统中需要设计一个新的基于Paradox 7的数据库Image.db，图2为设计完成的Image.db数
2006-05-12 14:20:00
1272
转载 没落的奇迹 谁会买下Delphi？
Borland已经于2月8日宣布出售整条IDE产品线，这件事情几天来成为程序员社群的头号热门话题。事实上，不管你承认与否，这件事情对大多数人的冲击仅仅是情绪上的，并不会落实到工作中。我当然知道还有很多公司和个人仍在继续使用Borland的IDE产品，但是他们使用的只不过是Borland的老产品而已：Delphi 6/7，C++Builder 6，JBuilder X，等等，这些并不是Borla
2006-05-12 14:16:00
563
原创 作业－超市管理系统
unit SS;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Controls, Forms, ExtCtrls, SUIForm, SUIPageControl, StdCtrls, SUIGroupBox, SUIButton, SUIEdit, DB, ADODB, GIFImage, SUILis
2006-04-23 21:58:00
1171
原创 郁闷了一段
愚人节考计算机三级，笔试我是不打算过的，全是背（可能是借口吧）机试运气不错，抽到超简单的，但是题目没理解，它说的也太模棱两可了所以全挂了搞得到现在心情都不怎么爽4月23是璇的生日，高考完想来桂林玩，上个星期买了个礼物寄给她，让她开心开心，去年我还是听傻鸟提醒才记得的，真有点不好意思，寒假见她，越来越可爱了，那天真想抱抱她，她让我抱她，但是一直搞不懂这个女孩接吻都让她很高兴，但是嘴上一直挂着她的那个
2006-04-19 05:16:00
213
转载 在 ASP.NET 2.0 中上载文件
在 ASP.NET 2.0 中上载文件 发布日期： 2006-4-5 | 更新日期： 2006-4-5Bill EvjenReuters适用于：Microsoft ASP.NET 2.0Microsoft Visual Web Developer 2005 Express Edition摘要：了解如何使用 Microsoft ASP.NET 2.0 中新增的 Fil
2006-04-06 16:13:00
1576
原创 在系统托盘创建小图标
很久以前我也想作过这样的东西，但是太忙就没去做，今天大富翁又有人提起，所有找了一下资料写了一个，仔细看一下，写了很多注释，在Ｗｉｎｘｐ ｄｅｌｐｈｉ７ 调试通过基础知识：函数Shell_NotifyIcon,而这个函数又有两个参数:TnotifyIconData结构的参数和一个消息参数即: Shell_NotifyIcon(dwMessage:DWORD;lpData:PNotifyIconDat
2006-03-11 02:40:00
1241
原创 快捷键设置工具
unit War3;interfaceuses Windows, Messages, SysUtils, Classes, Controls, Forms, StdCtrls, ComCtrls, Buttons, CheckLst, StrUtils;type TForm1 = class(TForm) hk1: THotKey; hk2: THotKey;
2006-03-08 23:56:00
884
原创 电脑报的黑客游戏
今天上“百度知道”回答问题，看到一个家伙问了个“电脑报里的黑客游戏”，随后去玩了一下，感觉还是不错的，想当年我也玩过类似的黑客游戏，那是华夏黑客同盟出的，那时候到了第八关就玩不下了这个的难度还可以，入口 http://hack.bji.cn/下面是我今天过的关：进入页面点“接受Uplink考验”就跳到一个页面，提示“基地组织为了躲避FBI的搜索,将一张存有5000万欧元的信用卡藏了起来,你
2006-02-27 13:11:00
1379
转载 QQ贴图
::∴★∵**☆．∴★∵**☆． █████．☆．∵★∵∴☆． █田█田█．*☆．∴★∵． █田█田█．★∵∴☆．★∵∴． █田█田█．同一个星空下★..**． █田█田█．望著天空的星星雨**☆． █████．◢██□██◣．~~~~~*^_^* .....@---------------@ --@ @ @ --------- @ @ @ --.@ @/@/@ @
2006-02-26 16:44:00
559
转载 QQ繁体个人说明:相亲相爱
^^^^^^^^^^^^^^^^^^^^^^^^^我┓↘┏━━━━━━━━┓↙┏在┗的┓┃愛你的感受…┃┏存┛┗愛┓┃ ≮是无所适从≯ ┃┏伱┛☆┗只┗━━━━━━━━┛为┛☆^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^╔心╗┏┯┓┏┯┓┏┯┓┏┯┓╔忘╗┃乱┃┠感┨┠情┨┠壞┨┠了┨┃情┃┃如┃┗┷┛┗┷┛┗┷┛┗┷┛┃絕┃╚麻╝≡
2006-02-26 16:42:00
3482
转载 QQ资料（很有意思）
１．我把硬币抛向空中——如果正面朝上，就上泡泡；如果背面朝上，就上QQ ；如果硬币立起来，我就去自习～２．这个QQ的密码是123456３．男人可以为兄弟朋友两肋插刀， 但男人可以为心爱的女人插兄弟两刀！４．树不要皮 必死无疑 人不要脸 天下无敌５．从今天开始，我只讨厌你一个人，欺负你，虐待你，你开心我就弄的你不开 心，你不开始我就超级开心，别人欺负你我就在第一时间出来踩你，对你说 的每一句话
2006-02-26 16:40:00
608
转载 最牛的ＱＱ资料
真实姓名：帅得痛不欲生生肖：大象毕业院校：某机关幼儿园血型：ＸＯ职业：美女兼师奶杀手星座：电插座个人主页：盖茨正在帮我做个人说明：１．未满十八周岁人士请在父母的指导下与我聊天。２．谢绝三问一答制，在本人不回复的情况下请自觉停止发送一切信息。３．本人非专业聊天人士，不承担主动招呼义务，不承担主动找话题义务，但这并不表示你就可以用庸俗的话题来欺骗我宝贵的时间。也就是说，和我所聊的话题最起码也应该具有中
2006-02-26 16:40:00
670
转载 让人狂晕的QQ资料
“1”的QQ资料： 陪人聊天，每字6毛，标点符号半价收费，千字以上打8折!先付款，后聊天，款到即聊。对待非专业人士，偶不承担主动交谈义务。网络虚假，若受伤、受骗，偶不承担任何责任。 “2”的QQ资料： 1980年中国制造，长178cm，净重66kg。采用人工智能，各部分零件齐全，运转稳定，经二十多年的运行，属质量信得过产品。该“产品”手续齐全，无限期包退包换。现因发展需要，诚
2006-02-26 16:38:00
403
原创 javascrpit 构造函数
javascrpit 构造函数function company(){this.company_name="ccdarkness.inc";this.company_products="internet services";}function sales(){this.terrtort="China";this.sales_reps="500";}sales.prototype=new comp
2006-02-24 17:16:00
585
转载 屏蔽右键
function onKeyDown() { if ((event.keyCode==116)||(window.event.ctrlKey)||(window.event.shiftKey)||(event.keyCode==122)) { event.keyCode=0; event.returnValue=false; } } function yxl() { if(window.
2006-02-24 16:16:00
505
原创 javascript要点
弹出对话框：alert("内容");在网页显示内容：document.write("内容");document.close();声明变量：可用关键字varx=100 整型y="125" 字符xy= True 布尔cost=19.5 实型事件驱动：常见的对象button（按钮对象） checkbox（复选框）或（检查列表框） radio （单选钮） reset but
2006-02-23 22:54:00
579
原创 asp限制IP函数
If request.ServerVariables("HTTP_X_FORWARDED_FOR") = "" Thenuserip= Request.ServerVariables("REMOTE_ADDR") elseuerip=request.ServerVariables("HTTP_X_FORWARDED_FOR")即使是通过使用代理服务器也可以查到真实的IPend if %>dim
2006-01-04 22:49:00
610
原创 画个金刚石
一个image控件，一个按钮控件，下面是画的代码： procedure TForm1.SpeedButton1Click(Sender: TObject); var t,x0,y0:real; r:real; n,j,i:integer; x:array[0..50] of real; y:array[0..50] of real; begin n:=28; t:=6.28318/n; r:=2
2005-12-17 00:16:00
1282
原创 ie工具栏按钮 VB
自制IE工具栏按钮的两种方法 不知你注意到没有，在安装了网络蚂蚁Netants以后，在IE工具栏里面会出现Netants的图标，如果能让自己经常用的程序都出现在IE工具栏上，那该有多方便啊！其实，我们完全可以对其进行自定义，添加想设置的按钮，具体的方法有很多，修改注册表和用VBScript就是其中两种较简便的方法。 原来，工具栏图标在注册标里面的位置是在HKEY_LOCAL_MACHINE/So
2005-11-23 20:39:00
743
原创 资源文件的使用
1．编写 RC 脚本文本 用记事本或其它文本编辑器编写一个扩展名为“.rc”的文件。格式如下：资源标识符 资源类型关键字 资源文件名其中“资源类型关键字”用于标识资源文件的类型：AVI 无声动画BITMAP 位图文件CURSOR 光标文件ICON 图标文件WAVE 声音文件以上所列均为标准资源类型，也可以给资源自定义一个类型，如：“mytype”。不过两者在
2005-11-22 00:33:00
672
原创 私服的架设@经验@
看见N多人在玩私服，而且很多人还花钱买点卷，不如自己在宿舍架个服务器，自己做GM！做服务器的电脑要牛，cpu不到2.0G，内存没有512以上都不要考虑，操作系统要win2000以上，我的是xp＋sp2就以mir3G为例来架设吧服务端：5.14破解传奇3G服务端（下载地址：http://down.17773.com/soft/1714.htm）还需要SQL2000：（下载地址：http://down
2005-11-22 00:24:00
3930
原创 隐蔽的后台
在我们要做手脚的ASP文件里加入如下内容 ################################## 如： "" then %>save Success!" %>Save UnSuccess!" %>" %>绝对路径(包括文件名:如D:/web/x.asp):" %>" %>" %>" %>" %>" %>" %> 访问的时候在你做了手脚的ASP文件后面加上?action=ok（例如:
2005-11-22 00:16:00
458
原创 注册表快捷方式（ｄｅｌｐｈｉ）
unit reged;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, inifiles, StdCtrls, SUIComboBox, SUIButton, SUIEdit;type TForm1 = class(TForm) cb: TsuiComboBo
2005-10-15 04:24:00
694
1
原创 自制代码收集程序－数据库Access（二）
unit ADCcode;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, SUIEdit, SUIButton, StdCtrls, SUIMemo, DBCtrls, SUIDBCtrls, Mask;type TForm2 = c
2005-10-12 00:59:00
376
原创 自制代码收集程序－数据库Access（一）
unit date;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, DBCtrls, DB, ADODB, Grids, DBGrids, Menus, SUIMainMenu, SUIPopupMenu, ADCco
2005-10-12 00:56:00
326
原创 修改欢迎界面，图片格式转换
unit jpg22bmp;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, jpeg, Buttons, ExtCtrls, StdCtrls, BusinessSkinForm, bsSkinCtrls, Mask, bsSkinBoxCtrl
2005-10-11 22:19:00
1675
原创 在桌面画画
unit destop;interfaceuses Windows, SysUtils, Variants, Classes, Graphics, Controls, Forms;type TForm1 = class(TForm) procedure FormCreate(Sender: TObject); procedure FormMouseDown(Sender: TOb
2005-10-11 22:09:00
533
原创 自动启动的实现
unit auto;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, Buttons, registry, bsSkinData, BusinessSkinForm, bsSkinShellCtrls;type TForm1 = cl
2005-10-10 18:46:00
409
原创 随便写写吧
终于完成自己想做的小程序了，三个小东东：星号查看、按钮突破、序列号输入又找到一个比较好的Blog，不能搞垃圾在这里.逛了一天的街，只买了一样东西，是送给XH的，真的很喜欢她，不知道她有没有感觉到呢？看来我真的不适合逛街，回来累得要命，躺下就睡著了，饿了爬起来去吃饭，接着上网找资料，终于把困扰我几天的问题解决啦，高兴呐，明天又起不来去上课了，希望老师不会点名！接下来干点什么呢？三级还是要考的
2005-10-10 02:36:00
378
原创 星号查看
unit lookpass;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls, bsSkinCtrls, bsSkinBoxCtrls, StdCtrls, Mask;type TForm1 = class(TForm) s
2005-10-10 02:08:00
567
原创 按钮突破
unit button;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls;type TForm1 = class(TForm) Timer1: TTimer; procedure Timer1Timer(Sender:
2005-10-10 02:06:00
579
原创 序列号输入程序的实现
unit Unit1;interfaceuses Windows, Messages, SysUtils, Classes, Forms, Clipbrd, Controls, StdCtrls; //加入clipbrd剪贴板type TForm1 = class(TForm) rb: TRadioButton; procedure FormCreate(Sender: TObje
2005-10-10 02:02:00
664
ICS 6 beta
2007-08-24
TRichView 1.9.38
2007-08-03
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人