是vc的bug还是delphi的bug?
最近一阵子，总是被一个莫名其妙的bug困扰。自己写的ocx（.net2005）在delphi7中调用，明明没有释放主动释放过内存，却被连续释放了两次。结果，程序退出时就down掉了。当然，这是在debug模式下才会出现，但是exe跑的时候会莫名奇妙的down掉，而且出错往往指向ocx，我想一定和ocx的调用有关。
上网找了purify，boundscheck等工具也是未果。很不爽。
最后只能把ocx的函数和属性一个一个调用检查。才发现错误。
原来....竟然....是：ocx的属性最后一项不能是VARANT_BOOL型，改为LONG就好了，太奇怪了（似乎只在最后一项时才有问题）。
VARANT_BOOL大概是2个字节的，估计调用时内存越界了。但是无论是vc还是delphi，似乎都没有做好。
看来，要避免这样的问题，统一用LONG型是最稳妥地。
OCX有时间要把其他的函数也修改一下了。
相关文档：
前段时间因为项目需要，获取指定文件的图标，绕了很多弯子，现在弄出来了，跟大家共享下.
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls,ShellAPI, ExtCtrls;
type
TForm1 = class(TForm)
l ......
Delphi编写系统服务七：完成端口演示 收藏
在开发大量Socket并发服务器，完成端口加重叠I/O是迄今为止最好的一种解决方案，下面是简单的介绍：
“完成端口”模型是迄今为止最为复杂的一种I/O模型，特别适合需要同时管理为数众多的套接字，采用这种模型，往往可以达到最佳的系统性能。但是� ......
Delphi 中WebBrowser控件详解实例 转
2008-05-07 12:07
很久都没有原创了，前几天帮朋友做了个网址发布程序，主要应用到了WebBrowser控件。
今天主要给大家演示一下过程，让大家学习一下Delphi工具。
WebBrowser功能：
1。自动加载网页
2。去除WebBrowser滚动条
3。WebB ......
procedure TForm1.Button2Click(Sender: TObject);
var
o : Olevariant;
begin
webbrowser1.Navigate('http://www.163.com');
delay(2000);
o := WebBrowser1.OleObject.document.all.item('username',0);
o.value := 'username';
o := W ......
我一直使用Delphi6开发软件，看到CSDN上的OPhone手机开发，又去Google一番，听说编写手机软件
能赚钱，所以要学习Java ME，读了几天博文，大多数概念搞清楚了。
要学JavaME就得先学JavaSE，所以装了很多软件(不装那么多，OPhone就装不上去)。
推荐一篇优秀的文章：
在 NetBeans IDE 中设计 Swing GUI
读完这篇文章，初 ......
