Delphi 6 函数介绍