摘要：
转至：http://www.cnblogs.com/Equn93/archive/2010/04/27/1722070.html问题1：服务端接收的所有中文都是"?????"(乱码) 解决：设置HTTPRIO控件的HTTPRIO.HTTPWebNode.UserUTF8InHeader属性为true问题2：Dephi编写的客户端在windows2003下调用WebService提示"Access violation at address 00E59195. Write of address 00E59195" 解决：我的电脑属性->高级->性 阅读全文
摘要：
在打包的时候会发现图标，总是不对，或者有时候桌面快捷方式的图标都丢失了可以用以下脚本试试，摘至（http://hi.baidu.com/shaoping007/blog/item/2393bb1e8bd8260f41341750.html）：解决：只需重组系统图标缓存 即可。 这里有个批处理很好用把下面的文字复制到文本文档，改后缀名为.bat，双击运行，okrem 关闭Windows外壳程序explorertaskkill /f /im explorer.exerem 清理系统图标缓存数据库attrib -h -s -r "%userprofile%\AppData\Local\Ic 阅读全文
摘要：
1. Variant和Stream的互换procedure VarToStream(var AStm: TStream; var AOvar: Olevariant);var p: Pointer;begin AStm:= TMemoryStream.Create; AStm.Position := 0; p := VarArrayLock(AOvar); AStm.Write(p^, VarArrayHighBound(AOvar, 1)); VarArrayUnlock(AOvar);end;procedure StreamToVar(var AStm: TStream; var AOva 阅读全文
摘要：
{****************************************************************************** 文件名称： uWnDownLoadHelper.pas 文件功能： 断点续传下载线程单元 作者 ： enli--------------------------------------------------------------------------------}unituWnDownLoadHelper;interfaceusesIdHTTP,IdAuthentication,IdHeaderList,IniFiles,md5, 阅读全文
摘要：
Delphi强力优化 nightmare(qingrui li)**关于记录类型的返回值C++程序员不会这样做，因为返回值会被压入堆栈，导致时间效率和空间效率都降低。但Delphi无此问题。一般情况下，记录类型返回值会像Out参数一样传递引用（在EAX寄存器中）。**公共表达式Delphi只在一个语句行内提取公共表达式。如果公共表达式包含函数调用，则不会被提取，因为可能改变语义。如果确保函数返回值相同，应预先计算。**类属性每次引用属性时都会使属性重新计算，即使属性是直接映射到域。频繁调用属性时应预先计算。**循环内的重复计算表达式外提C++程序员可能会让编译器做此优化，但Delphi一般不会 阅读全文
摘要：
Delphi的四舍五入函数一、四舍五入法 四舍五入是一种应用非常广泛的近似计算方法，其有算术舍入法和银行家舍入法两种。 所谓算术舍入法，就是我们通常意义上的四舍五入法。其规则是：当舍去位的数值大于等于5时，在舍去该位的同时向前位进一；当舍去位的数值小于5时，则直接舍去该位。 所谓银行家舍入法，其实质是一种四舍六入五留双（又称四舍六入五奇偶）法。其规则是：当舍去位的数值小于5时，直接舍去该位；当舍去位的数值大于等于6时，在舍去该位的同时向前位进一；当舍去位的数值等于5时，如果前位数值为奇，则在舍去该位的同时向前位进一，如果前位数值为偶，则直接舍去该位。 综上所述，两种舍入法所得结果不尽一致，因此 阅读全文
摘要：
有时候，我们需要少量修改或增加已有控件的行为或属性，但又不想新写个控件注册到组件面板上或动态创建来用，可以通过同名控件派生来实现。以下这个简单的例子，为 TPanel 增加了 OnPaint 事件：unit Unit1;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, StdCtrls, ExtCtrls;type// 以相同类名派生一个子类TPanel = class(ExtCtrls.TPanel)private FOnPaint: TNotify 阅读全文
摘要：
由于delphi7编译的程序是非unicode程序（代码页），所有在英文操作系统下会有乱码的问题。解决方法：1. 首先在Lageuage中选"Instal files for East Asian Lanuages"，这步一定要做，否则中文就乱码。2. 区域设置里面的Advanced选默认的非Unicode的程序的的语言解释为Chinese(PRC),Delphi是非Unicode程序，而vb6和.net都是Unicode的程序，所以这步对vb6和.net程序应该是不需要3. 但有些客户不允许进行第2步修改，特别是在跨国企业里面，因此会需要applocale程序进行转换（C:\WINDOWS\ 阅读全文
摘要：
TWebBrowser的流程是这样的:OnBeforeNavigate2 <--开始链接时会触发此事件OnNavigateComplete2 <--成功的链接到此网页(以后才会有下面的事件)OnDownloadBegin <--开始下载OnDownloadComplete <--下载结束OnDocumentComplete <--页面下载完毕对于每个HTML页面,顺序都是如此.如果是Frame或IFrame的文件都会当成HTML页面处理.也就是说如果一个页面中有3个IFrame,那么总共会触发4次BeforeNavigate2事件.对于每个连接且需要显示出来的二进 阅读全文
摘要：
元件除错环境实作范例许多以Delphi为工具的程序开发者，时常需要开发自定的元件类别以符合所需。在元件的开发过程中，由於无法直接由Delphi的集成除错环境中对元件进行除错，必须辗转透过其它方式逐步除错，既麻烦又费时。在本篇中笔者提供一个简易的除错环境，直接利用Delphi的集成除错器为您的元件除错，加速开发元件的时间。Delphi提供了一个强而有力的元件结构VCL，建立了一个FrameWork的... 阅读全文