转载请注明出处：http://blog.youkuaiyun.com/jh_zzz/archive/2006/12/21/1451693.aspx QQ 群中有人提到这个问题，我到网上搜了一下，居然没有找到相关的文章，后来在台湾一个bbs上发现了一个工具，在此以 MS Agent Control 为例和大家分享一下具体的做法。 1. Delphi Event Sink Generator 下载地址：htt

这是用的比较多的一个C++函数，我把他转成了 Delphi 的版本：function IsTextUTF8(lpstrInputStream : PChar; iLen : Integer) : Boolean;var  i : Integer;  cOctets : DWORD; // octets to go in this UTF-8 encoded character  chr : U

Graphics32是个BCB/Delphi/Kylix用的2D绘图库，其功能特殊之处，在於在无须硬体加速的情况下，能够有接近於一百倍Delphi內置绘图库的高速度，下面是它的介绍。首页：http://www.graphics32.org/wiki/它的原理除了部份计算公式的改善外，更重要的著眼点是，完全基於32位元的图形运算，其原理在於。- 在32位元的环境下，大部分的函式皆有最好的速度表现-

禁用/启用本地网络连接，网上搜了一下大多数都是通过使用SetupAPI禁用/启用相关设备来实现，有一个尽然是通过ShellAPI实现的，感觉这些方法都不好，只好自己动手，代码如下：//Unit toget the local network connection list// and enable/disable correspond network connection///

2010/8/1更新：实际项目中使用发现如果页面大量使用了 ajax，这个解决方案还存在很错问题，工作起来非常不稳定。慎用！！！ 下载地址：http://download.youkuaiyun.com/source/1913671 我们目前的项目程序普遍使用 Delphi 客户端内嵌 Internet Explorer 的方式实现，在开发过程中，由于

一句话就搞定： ChangeFileExt (ExtractFileName (), );