2016年3月17日
Delphi结构中使用String时遇到的内存泄露问题（没有利用String的引用计数自动销毁字符串的功能）
先定义一个结构： TUserInfo = record UserID: Integer; // 用户编号 UserName: string; // 用户名end; 然后编写如下代码： procedure TForm1.Timer1Timer(Sender: TObject);begin User.U Read More
posted @ 2016-03-17 23:45 findumars Views(829) Comments(0) Diggs(0)
Delphi主窗口任务栏菜单的问题（转发WM_SYSCOMMAND到Application）
Delphi的VCL框架在创建应用时TApplication是一个自动创建的隐藏窗口，其它创建的窗口是自动以该窗口为窗口，这就导致创始的主窗口在任务栏的系统菜单只有三项，只要在主窗口的Create事件中将系统菜单用Application的系统菜单替换，并将SysCommand消息转发到主窗口就正常了 Read More
posted @ 2016-03-17 23:43 findumars Views(338) Comments(0) Diggs(0)
Delphi读写UTF-8、Unicode格式文本文件
// UTF-8文件写入函数procedure SaveUTFFile(const FileName: string; S: string; WriteHeader: Boolean = True);var MemStream: TMemoryStream; HeaderStr: String;be Read More
posted @ 2016-03-17 23:39 findumars Views(6986) Comments(0) Diggs(0)
Delphi 中TWebBrowser的扩展控件TExWebBrowser
主要扩展了3D界面、右键菜单、是否显示图片、是否支持JAVA等功能。 代码如下： http://blog.csdn.net/missmecn/article/details/2292758 Read More
posted @ 2016-03-17 23:38 findumars Views(1392) Comments(1) Diggs(0)
Delphi使用StrToDatetime在不同操作系统出现不同的情况（控制面板的时间格式都记录在注册表里，因此也可修改注册表）
Str:= '2010-4-13 06:22:22'; StrToDateTime(Str); 现象：在WinXP, Win2003 都不会报错 但是在Windows7,Windows Server 2008 上，报 ‘xxx’ is not a valid date and time 错误 后来发 Read More
posted @ 2016-03-17 23:33 findumars Views(505) Comments(0) Diggs(0)