<?xml version="1.0" standalone="yes"?>
<?xml-stylesheet type="text/xsl" href="css/rss.xslt"?>
<rss version="2.0" xmlns:dc="http://purl.org/dc/elements/1.1/" xmlns:trackback="http://madskills.com/public/xml/rss/module/trackback/" xmlns:wfw="http://wellformedweb.org/CommentAPI/" xmlns:slash="http://purl.org/rss/1.0/modules/slash/"><channel><title>鸟儿博客 - Delphi</title><link>http://www.birdol.com/</link><description>Nobird's Blog~用文字见证每一天~ - </description><generator>RainbowSoft Studio Z-Blog 1.8 Walle Build 91204</generator><language>zh-CN</language><copyright>&amp;amp;copy; 2007-2009 Birdol.Com. Some Right Reserved. Power By Z-Blog. 苏ICP备09012946号.  </copyright><pubDate>Wed, 08 Sep 2010 20:48:49 +0800</pubDate><item><title>delphi之钩子函数(三)</title><author>admin@birdol.com (nobird)</author><link>http://www.birdol.com/article/594.html</link><pubDate>Fri, 17 Jul 2009 14:20:36 +0800</pubDate><guid>http://www.birdol.com/article/594.html</guid><description><![CDATA[钩子链和 CallNextHookEx 的返回值<br/><br/>SetWindowsHookEx 函数的第一个参数表示钩子类型, 共有 14 种选择, 前面我们已经用过两种:<br/>WH_KEYBOARD、WH_MOUSE.<br/><br/>系统会为每一种类型的钩子建立一个表(那就是 14 个表), 譬如某个应用程序启动了键盘钩子, 我们自己的程序也启动了键盘钩子, 同样是键盘钩子就会进入同一个表. 这个表(可能不止一个, 可能还会有鼠标钩子等等)就是传说中的"钩子链".<br/><br/>假如某个钩子链中共进来了三个钩子(譬如是: 钩子A、钩子B、钩子C 依次进来), 最后进来的 "钩子C" 会先执行.<br/>...]]></description><category>Delphi</category><comments>http://www.birdol.com/article/594.html#comment</comments><wfw:comment>http://www.birdol.com/</wfw:comment><wfw:commentRss>http://www.birdol.com/feed.asp?cmt=594</wfw:commentRss><trackback:ping>http://www.birdol.com/cmd.asp?act=tb&amp;id=594&amp;key=3beb17e0</trackback:ping></item><item><title>Delphi的编译指令</title><author>admin@birdol.com (nobird)</author><link>http://www.birdol.com/article/593.html</link><pubDate>Wed, 15 Jul 2009 14:04:45 +0800</pubDate><guid>http://www.birdol.com/article/593.html</guid><description><![CDATA[一个程序从无到有的过程是这样的: 编辑代码 -> 预处理 -> 编译(成dcu等) -> 链接(为exe等).<br/><br/>一、什么是预处理?<br/>譬如 VCL 中有很多代码是兼容 Linux 的, 在 Windows 下就需要在编译之前预处理掉那些 for Linux 的代码.<br/>1、判断操作系统: 其中的 "MSWINDOWS" 和 "LINUX" 就是 Delphi 预定义的 "条件标识符".<br/>[code=delphi]<br/>begin<br/>  {$IFDEF MSWINDOWS}<br/>    ShowMessage('Windows');<br/>...]]></description><category>Delphi</category><comments>http://www.birdol.com/article/593.html#comment</comments><wfw:comment>http://www.birdol.com/</wfw:comment><wfw:commentRss>http://www.birdol.com/feed.asp?cmt=593</wfw:commentRss><trackback:ping>http://www.birdol.com/cmd.asp?act=tb&amp;id=593&amp;key=1bfa96a4</trackback:ping></item><item><title>汉字与汉字区位码的转换</title><author>admin@birdol.com (nobird)</author><link>http://www.birdol.com/article/592.html</link><pubDate>Mon, 13 Jul 2009 13:55:38 +0800</pubDate><guid>http://www.birdol.com/article/592.html</guid><description><![CDATA[一个函数方便在汉字和其区位码之间进行转换。<br/>在没有 Uncode 的时代, 用 256 个 ACSII 只是提供了英文的方法, 其他文字不能使用ASCII。<br/>那时是独立的, 中文就有: GB2312-80(国内简体)、Big5(台湾繁体)、HKSCS(香港繁体), 但它们互不兼容.<br/>GB2312(1980年) 后来升级到 GBK(1995年), 现在电脑上使用的是 GB18030(2000]]></description><category>Delphi</category><comments>http://www.birdol.com/article/592.html#comment</comments><wfw:comment>http://www.birdol.com/</wfw:comment><wfw:commentRss>http://www.birdol.com/feed.asp?cmt=592</wfw:commentRss><trackback:ping>http://www.birdol.com/cmd.asp?act=tb&amp;id=592&amp;key=73685151</trackback:ping></item><item><title>Delphi之钩子函数(二)</title><author>admin@birdol.com (nobird)</author><link>http://www.birdol.com/article/587.html</link><pubDate>Fri, 03 Jul 2009 13:13:33 +0800</pubDate><guid>http://www.birdol.com/article/587.html</guid><description><![CDATA[目前对钩子的理解:<br/><br/>譬如我们用鼠标在某个窗口上双击了一次, 或者给某个窗口输入了一个字母 A;<br/>首先发现这些事件的不是窗口, 而是系统!<br/><br/>然后系统告诉窗口: 喂! 你让人点了, 并且是连续点了两鼠标, 你准备怎么办?<br/>或者是系统告诉窗口: 喂! 有人向你家里扔砖头了, 不信你看看, 那块砖头是 A.<br/><br/>这时窗口的对有些事件会忽略、对有些事件会做出反应:<br/>譬如, 可能对鼠标单击事件忽略, 窗口想: 你单击我不要紧, 累死你我不负责;<br/>但一旦谁要双击我, 我会马上行动, 给你点颜色瞧瞧!<br/>这里窗口准备要采取的行动, 就是我们提前写好的事件.<br/>...]]></description><category>Delphi</category><comments>http://www.birdol.com/article/587.html#comment</comments><wfw:comment>http://www.birdol.com/</wfw:comment><wfw:commentRss>http://www.birdol.com/feed.asp?cmt=587</wfw:commentRss><trackback:ping>http://www.birdol.com/cmd.asp?act=tb&amp;id=587&amp;key=4df56fed</trackback:ping></item><item><title>Delphi之钩子函数</title><author>admin@birdol.com (nobird)</author><link>http://www.birdol.com/article/586.html</link><pubDate>Wed, 01 Jul 2009 13:00:36 +0800</pubDate><guid>http://www.birdol.com/article/586.html</guid><description><![CDATA[提示: 如果要设置系统级钩子, 钩子函数必须在 DLL 中.<br/>[code=delphi]//举例:<br/>SetWindowsHookEx(<br/>  idHook: Integer;   {钩子类型}<br/>  lpfn: TFNHookProc; {函数指针}<br/>  hmod: HINST;       {包含钩子函数的模块(EXE、DLL)句柄; 一般是 HInstance; 如果是当前线程这里可以是 0}<br/>  dwThreadId: DWORD  {关联的线程; 可用 GetCurrentThreadId 获取当前线程; 0 表示是系统级钩子}<br/>...]]></description><category>Delphi</category><comments>http://www.birdol.com/article/586.html#comment</comments><wfw:comment>http://www.birdol.com/</wfw:comment><wfw:commentRss>http://www.birdol.com/feed.asp?cmt=586</wfw:commentRss><trackback:ping>http://www.birdol.com/cmd.asp?act=tb&amp;id=586&amp;key=950f3ce5</trackback:ping></item><item><title>刷feed订阅工具</title><author>admin@birdol.com (nobird)</author><link>http://www.birdol.com/article/554.html</link><pubDate>Wed, 22 Apr 2009 12:47:01 +0800</pubDate><guid>http://www.birdol.com/article/554.html</guid><description><![CDATA[想必有人之前看过我的这篇文章:<a target="_blank"  href="http://www.birdol.com/article/371.html">[无耻的刷刷订阅量]</a>，时隔N久之后放出这个工具，唯一的功能就是让你在feedsky之类的地方显示出来的订阅总数有所提高，大约增加500个左右，一般使用完后需要1~2天或者更久才能显示出来。订阅量增加是从有道订阅来的，可以自己在feedsky后台查看。<br/><br/>注意:<br/>1.工具仅能帮你增加500个左右的订阅量，重复使用无效。<br/>2.外挂将大大减小你的乐趣，慎用。<br/>...]]></description><category>Delphi</category><comments>http://www.birdol.com/article/554.html#comment</comments><wfw:comment>http://www.birdol.com/</wfw:comment><wfw:commentRss>http://www.birdol.com/feed.asp?cmt=554</wfw:commentRss><trackback:ping>http://www.birdol.com/cmd.asp?act=tb&amp;id=554&amp;key=3ce5d3cd</trackback:ping></item><item><title>discuz7.0 T楼工具&amp;amp;灌水机</title><author>admin@birdol.com (nobird)</author><link>http://www.birdol.com/article/552.html</link><pubDate>Sun, 19 Apr 2009 22:15:46 +0800</pubDate><guid>http://www.birdol.com/article/552.html</guid><description><![CDATA[朋友要的，做了一个给他，随手也就整理一个出来，话说discuz7的ajax效果，真的很适合T楼，而不适合聊天...技术论坛用用还是可以滴...<br/><br/>下载地址: http://nobird...]]></description><category>Delphi</category><comments>http://www.birdol.com/article/552.html#comment</comments><wfw:comment>http://www.birdol.com/</wfw:comment><wfw:commentRss>http://www.birdol.com/feed.asp?cmt=552</wfw:commentRss><trackback:ping>http://www.birdol.com/cmd.asp?act=tb&amp;id=552&amp;key=142c499c</trackback:ping></item><item><title>delphi之调用外部dll中的函数</title><author>admin@birdol.com (nobird)</author><link>http://www.birdol.com/article/548.html</link><pubDate>Fri, 17 Apr 2009 20:18:58 +0800</pubDate><guid>http://www.birdol.com/article/548.html</guid><description><![CDATA[分早绑定和晚绑定两种。<br/>早绑定的代码如下：<br/>[code=delphi]<br/>unit Unit1;<br/><br/>interface<br/><br/>uses<br/>  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,<br/>  Dialogs, StdCtrls;<br/><br/>type<br/>  TForm1 = class(TForm)<br/>    But...[/code]]]></description><category>Delphi</category><comments>http://www.birdol.com/article/548.html#comment</comments><wfw:comment>http://www.birdol.com/</wfw:comment><wfw:commentRss>http://www.birdol.com/feed.asp?cmt=548</wfw:commentRss><trackback:ping>http://www.birdol.com/cmd.asp?act=tb&amp;id=548&amp;key=d201149e</trackback:ping></item><item><title>delphi之autorun(复制自身+循环扫描)</title><author>admin@birdol.com (nobird)</author><link>http://www.birdol.com/article/547.html</link><pubDate>Wed, 15 Apr 2009 14:32:34 +0800</pubDate><guid>http://www.birdol.com/article/547.html</guid><description><![CDATA[话说这段还是很菜的代码，仅仅是在无保护的机子上实现效果而已。<br/>[code=delphi]<br/>unit Unit1;<br/><br/>interface<br/><br/>uses<br/>  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,<br/>  Dialogs,Tlhelp32,  StdCtrls;<br/><br/>type<br/>  TForm1 = class(TForm)<br/>    Button1: TButton;<br/>    procedure Button1Click(Sender: TObject);<br/>...]]></description><category>Delphi</category><comments>http://www.birdol.com/article/547.html#comment</comments><wfw:comment>http://www.birdol.com/</wfw:comment><wfw:commentRss>http://www.birdol.com/feed.asp?cmt=547</wfw:commentRss><trackback:ping>http://www.birdol.com/cmd.asp?act=tb&amp;id=547&amp;key=3643bb98</trackback:ping></item><item><title>delphi之模拟QQ窗口抖动</title><author>admin@birdol.com (nobird)</author><link>http://www.birdol.com/article/541.html</link><pubDate>Thu, 09 Apr 2009 11:06:38 +0800</pubDate><guid>http://www.birdol.com/article/541.html</guid><description><![CDATA[相信以后能用到，效果还不错，如果想抖的厉害些，就把下面的那些数值改大点吧~<br/>抖动的时候有个声音，声音资源的编译方法参考  <a target="_blank"  href="http://www.birdol.com/article/540.html">[delphi之声音资源(*.res)的编译方法]</a> <br/>[code=delphi]<br/>unit Unit1;<br/><br/>interface<br/><br/>uses<br/>  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,<br/>...]]></description><category>Delphi</category><comments>http://www.birdol.com/article/541.html#comment</comments><wfw:comment>http://www.birdol.com/</wfw:comment><wfw:commentRss>http://www.birdol.com/feed.asp?cmt=541</wfw:commentRss><trackback:ping>http://www.birdol.com/cmd.asp?act=tb&amp;id=541&amp;key=edb241d3</trackback:ping></item></channel></rss>
