bool是LongBool类型。
Delphi中定义了四种布尔类型：Boolean，ByteBool，WordBool和LongBool。后面三种布尔类型是为了与其他语言兼容而引入的，一般情况下建议使用Boolean类型。
这四种类型的布尔值占用内存的数量如下：
Boolean 1 Byte
ByteBool 1 Byte
WordBool 2 Bytes（1 Word）
LongBool 4 Bytes（2 Words）
对于ByteBool，WordBool和LongBool三种类型True常量的值为非零，False为零，可以用Ord函数验证；
而对于Boolean类型，True常量的值为1，False为零。在期望Boolean值的上下文中，编译器会将ByteBool，WordBool和LongBool三种类型的非零值转换为True。
然而，在Delphi中布尔表达式和Integer/Real是不兼容的。下面的表格对比了Boolean与ByteBool/WordBool/LongBool在异同：
Boolean
 False < True
Ord(False) = 0
Ord(True) = 1
Succ(False) = True
Pred(True) = False
BoolToStr(True) = -1 //这个函数很变态
BoolToStr(False) = 0
ByteBool, WordBool, LongBool
False <> True
Ord(False) = 0
Ord(True) <> 0
Succ(False) = True
Pred(False) = True
BoolToStr这个函数最莫名其妙了，明明说True的值是1，而它却告诉我 ......

文章来源：IT工程信息网  http://www.systhinker.com/html/09/n-12309.html
之前用Access作一个应用，但找不到货币转换成大写人民币的功能（当然可以通过excel 转换，但不在一个应用上，放弃）。以为比较简单，自己试写，谁知用了两个晚上，才基本实现，但没有小数点（元）以下货币的转换。也没有兆的判断。而且对字符的合法性也没有检验。今天有时间，将其完善一下。（可能还会有考虑不周的地方）
思路：
1、判断是否带有小数点的金额，如果是，就找出小数点所在数据。该位字符不进行转换。
2、小数点前的作为整数位，进行转换。整数位的每一位都有表示金额的级别：拾、佰、仟。而且还有万、亿的级别。
3、小数点后的作为角、分、厘处理。
4、如果有连续的零，只显示一个零。如50006,显示为伍万零陆。如果是发生在拾、佰、仟位，该零还要去掉。
view source
< id="highlighter_197338_clipboard" title="copy to clipboard" classid="clsid:d27cdb6e-ae6d-11cf-96b8-444553540000" width="16" height="16" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=9,0,0,0" type="application/x-shockwave-flash">
print?
00 ......

所在单元： DateUtils
Day 开头的函数
1、DayOf()
描述： 使用 DateOf 函数用来把一个 TDateTime 类型的变量转变成一个 只带有日期的 TDateTime 类型变量。 例如： showmessage(DateTimetostr(dateof(now()))); 你得到的是 2003/03/19 而 showmessage(DateTimetostr((now()))); 得到的是
2、DateTimeTostr()
描述： DateTimeToString 函数将 TDateTime 类型的参数 DateTime 转换成一个 字符串，使用给定的全局变量 ShortDateFormat 的格式，时间部分按照 给定的全局变量 LongTimeFormat 的格式。 其中 DateTime 为零的部分将不会显示出来。 例如： ShortDateFormat:=’yyyy mm dd’; showmessage(DateTimetostr((now()))); 你将得到：2003
3、DateTimeToString
描述： DateTimeToString 方法将TDateTime类型的参数DateTime 按照由参数Format提供的格式 转化成字符串，并保存在Result中。 对于Format的格式类型，请看 Date-Time format strings 的帮助。 例如： DateTimeToString(result,’yyyy mm dd’,now()); 那么 result的结果为：2003
4、DateTimeToSystemTime ()
描述： 有时为了调用API函数来使用系统时间，你可以使用 DateTimeToSystemTi ......

一)   使用动态创建的方法   
  
  首先创建   Excel   对象，使用ComObj: 
  var   ExcelApp:   Variant; 
  ExcelApp   :=   CreateOleObject(   'Excel.Application'   ); 
  
  1)   显示当前窗口： 
  ExcelApp.Visible   :=   True; 
  
  2)   更改   Excel   标题栏： 
  ExcelApp.Caption   :=   '应用程序调用   Microsoft   Excel'; 
  
  3)   添加新工作簿： 
  ExcelApp.WorkBooks.Add; 
  
  4)   打开已存在的工作簿： 
  ExcelApp.WorkBooks.Open(   'C:\Excel\Demo.xls'   ); 
  
  5)   设置第2个工作表为活动工作表： 
  ExcelApp.WorkSheet ......

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 Libr ......

毕竟Win32程序的开发，Delphi还是有顽强的生命力的。
操作步骤如下：
1.建立 res 文件
建立一个文本文件，名字可以自己起，我这里叫：UAC.manifest，内容：
<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0">
<trustInfo xmlns="urn:schemas-microsoft-com:asm.v3">
<security>
<requestedPrivileges>
<requestedExecutionLevel level="requireAdministrator"/>
</requestedPrivileges>
</security>
</trustInfo>
</assembly>
建立文本文件，名为 UAC.rc，内容：
1 24 UAC.manifest
编译成 uac.res 文件，运行：
brcc32 uac.rc -fouac.res
2.在代码中引入
打开项目文件，加入
{$R uac.res}
3.编译程序
这时程序就支持 VISTA 了，在运行的时候，会弹出 WINDOWS 的提示框，询问用户是否允许以管理员身份运行。
 通过我自己实践，在Delphi7下面是可以的，但是在Delphi2009下面测试没有通过。 ......