向上帝打申请了，下辈子再也不做程序员！！ 上帝批复：OK！
2009年3月25日
字符串函数
unit uzxString;interface uses Classes,SysUtils; const DELIMITER_LF = #10; const DELIMITER_CR = #13 ; const DELIMITER_BLANK = ' '; const DELIMITER_COMMA = ','; { izx interface }type zxCharSet = s... Read More
posted @ 2009-03-25 10:09 zywuhao Views(768) Comments(0) Diggs(0)
带图标的提示栏(Hint窗口)
{--代码开始--} unit Hintx; interface uses Windows, Messages, Controls; type TIconHintX = class(THintWindow) protected procedure Paint; override;public function CalcHintRect(MaxWidth: Integer; const... Read More
posted @ 2009-03-25 10:02 zywuhao Views(302) Comments(0) Diggs(0)
网络函数库
{========================================================================= 功 能: 网络函数库 时 间: 2002/10/02 版 本: 1.0 备 注: 没有事情干，抄抄写写整理了一些网络函数供大家使用。 希望大家能继续补充===================================... Read More
posted @ 2009-03-25 09:47 zywuhao Views(343) Comments(0) Diggs(0)
2009年3月23日
公积金如何缴？如何贷？如何用？
每逢年底，提取住房公积金的市民越来越多。为帮助市民了解住房公积金的使用规定，方便市民提取使用。就住房公积金的使用事项，采访了合肥市住房公积金管理中心，对市民关心的问题进行一一解答。 住房公积金之缴存 提取缴存免征个人所得税 哪些单位应当依法缴存住房公积金？ 答：国家机关、事业单位、国有企业、城镇集体企业、外商投资企业、城镇私营企业及其他城镇企业、民办非企业单位、社会团体及其他经济组... Read More
posted @ 2009-03-23 08:54 zywuhao Views(292) Comments(0) Diggs(0)
2009年3月20日
用DELPHI在状态栏中显示进程条
经常上网的朋友可能早就已经发现，在一些浏览器的底部会在某些情况下动态显示一个进程条，比如在显示网页的时候，如果时间比较长，就会出现一个一格一格前进的，用以提醒用户已经有多少数据被下传下来。它不仅仅出现在浏览器中，还经常被用于下载软件中，比如现在最热门的BT下载软件，都使用了这一技术。技术的改进源于工作的需要，现在编写网络软件那么流行，上面的小技巧应该是每个像我们这样的编程爱好者都需要的吧。 ... Read More
posted @ 2009-03-20 15:40 zywuhao Views(302) Comments(0) Diggs(0)
delphi常用函数、属性、事件参考手册 （转）
名称 类型 说明 abort 函数 引起放弃的意外处理 abs 函数 绝对值函数 addexitproc 函数 将一过程添加到运行时库的结束过程表中 addr 函数 返回指定对象的地址 adjustlinebreaks 函数 将给定字符串的行分隔符调整为cr/lf序列 align 属性 使控件位于窗口某部分 alignment 属性 控件标签的文字位置 allocmem 函数 ... Read More
posted @ 2009-03-20 13:34 zywuhao Views(196) Comments(0) Diggs(0)
怀念一下这些经常不记得的Delphi代码...
1.防止刷新时闪烁的终极解决办法 Code highlighting produced by Actipro CodeHighlighter (freeware)http://www.CodeHighlighter.com/-->{ 防止刷新时闪烁的终极解决办法(对付双缓冲无效时) } Perform($000B, 0, 0); //锁屏幕 防止闪烁 // 做一些会发生严重闪烁的事情.... Read More
posted @ 2009-03-20 12:17 zywuhao Views(283) Comments(0) Diggs(0)
MS-SQL 2005 中的分页查询
假设有表TableA，字段为FieldA, FieldB，查询第10到20条记录，SQL如下： select * from ( select row_number() over(order by FieldA) as RowNum, * from TableA ) t where t.RowNum between 10 and... Read More
posted @ 2009-03-20 12:11 zywuhao Views(155) Comments(0) Diggs(0)
这年头能让人笑疯的笑话不多了!嘎嘎
我笑了一夜！现在还停不下来不管火星不火星分享给大家=================================================================我女朋友前几天找我去医院，我就问怎么了，她说，她的腿有点弯，就是俗称的O型腿。她觉得影响她的美观，所以决定去医院看看有办法解决没。因为我女朋友一向斯斯文文的，所以她觉得有点不好意思，为了自己漂亮就来医院她还是第一次，所以... Read More
posted @ 2009-03-20 11:44 zywuhao Views(387) Comments(0) Diggs(0)
鹦鹉笑话
小X特别喜欢鹦鹉。一天他去溜鸟市，发现一只鹦鹉卖3万元。 他很好奇，于是就问买主：您的鹦鹉怎么这么贵呀？买主：我这只鹦鹉聪明！什么都会说。 小X一听这么聪明就一狠心买下来了。 晚上到了家，他特别的高兴。就摆弄这只鹦鹉。 小X:　我会走 鹦鹉：我会走 小X：我会跑 鹦鹉：我会跑 小X：我会飞 鹦鹉：你吹牛呢！ 小X又去逛鸟市。发现一只鹦鹉标价3元钱。 于是... Read More
posted @ 2009-03-20 11:42 zywuhao Views(416) Comments(0) Diggs(0)