ExpressQuantumGrid.Suite.v6.30 在Delphi 7中的安装
ExpressQuantumGrid.Suite.v6.30 在Delphi 7中的安装
大名鼎鼎的Grid控件，没有找到打好包的，以下是手动安装步骤
=====================
1、必须配套安装如下7组控件，已经安装过的则跳过
XP Theme Manager
ExpressGDI+ Library
ExpressLibrary
ExpressExport Library
ExpressDataController
ExpressEditors Library 5
ExpressPageControl 2
2、在Delphi 7中，选择菜单File | Close All（最好这样）；
3、（可选步骤）选择菜单Tools | Environment Options...，在Environment Variables页中，点击"New..."按钮，在Variable Name右边输入框中输入cxQGrid（或任意其他名字，但后面的设置要与此一致），在Variable Value右边输入框中输入控件的绝对路径（如：C:\Program Files\Borland\Delphi7\Projects\ExpressQuantumGrid.Suite.v6.30\），按"OK"；
4、点击"Library"切换到Library页，在Library path后面加上：
$(cxQGrid)\XP Theme Manager\Sources;
$(cxQGrid)\ExpressGDI+ Library\Sources;
$(cxQGrid)\ExpressLibrary\Sources;
$(cxQGrid)\ExpressExport Library\Sources;
$(cxQGrid)\ExpressDataController\Sources;
$(cxQGrid)\ExpressEditors Library 5\Sources;
$(cxQGrid)\ExpressPageControl 2\Sources;
$(cxQGrid)\ExpressQuantumGrid 5\Sources;
如果没有执行第3步，即没有在Delphi中设置cxQGrid环境变量，则把上面的$(cxQGrid)改为绝对路径，如：C:\Program Files\Borland\Delphi7\Projects\ExpressQuantumGrid.Suite.v6.30
5、依次编译和安装下面各包：
---安装XP Theme Manager---
\XP Theme Manager\Packages\dxThemeD7.dpk 仅编译
---安装ExpressGDI+ Library---
\ExpressGDI+ Library\Packages\dxGDIPlusD7.dpk 仅编译
---安装ExpressLibrary---
\ExpressLibrary\Packages\cxLibraryVCLD7.dpk 仅编译
\ExpressLibrary\Packages\dclcxLibraryVCLD7.dpk 编译和安装
---安装ExpressExport Library---
\ExpressExport Library\Packages\cxExportVCLD7.dpk 仅编译
---安装ExpressDataController---
\ExpressDataController\Packages\cxDataD7.dpk 仅编译
\ExpressDataController\Packages\cxADOAdaptersD7.dpk 仅编译
\ExpressDataController\Packages\cxBDEAdaptersD7.dpk 仅编译
\ExpressDataController\Packages\cxIBXAdaptersD7.dpk 仅编译
---安装ExpressEditors Library 5---
\ExpressEdi
相关文档：
1.Round（四舍六入五留双）
功能说明：对一个实数进行四舍五入。(按照银行家算法)
例：
var
i, j: Integer;
begin
i := Round(1.5); // i等于2
j := Round(2.5); // j等于2
end;
在Delphi中使用Round函数得到的答案有时与我们所预期的会不太一样：采用的是四舍六入五留双。即当舍或入位大于或小于五� ......
虽是原创，但是是参考过别人的作品，然后自己重新写的，目的是要给初学者一个更容易明白。
用DELPHI创建DLL文件，封装窗体的实现方法实例：
即一个程序不再是单一的一个EXE文件了，而是由一个EXE文件加N个DLL文件组成，这样做的原因是方便以后的维护与更新，也是跨平台开发的重要一步。
1， 打开DELPHI，新建一个Dl ......
Day 开头的函数
●
Unit
DateUtils
function DateOf(const Avalue: TDateTime): TDateTime;
描述
使用 DateOf 函数用来把一个 TDateTime 类型的变量转变成一个
只带有日期的 TDateTime 类型变量。
例如：
showmessage(DateTimetostr(dateof(now())));
你得到的是 2003/03/19
而 showmessage(Dat ......
文章来源：IT工程信息网 http://www.systhinker.com/html/09/n-12309.html
之前用Access作一个应用，但找不到货币转换成大写人民币的功能（当然可以通过excel 转换，但不在一个应用上，放弃）。以为比较简单，自己试写，谁知用了两个晚上，才基本实现，但没有小数点（元）以下货币的转换。也没有兆的判断。而且对字� ......
一) 使用动态创建的方法
首先创建 Excel 对象，使用ComObj:
var ExcelApp: Variant;
ExcelApp := CreateOleObject( 'Excel.Application' ......
