StrPas

strpas：将pchar转换为string字符串，delphi5开发人员指南上有对这个函数的说明：该函数是为了兼容而存在，在delphi5只需要直接赋值就可以。不过偶尔我还会使用这个函数，直到我看到了他的源码。。。

StrPas的源码在SysUtils.pas单元里，找到这个函数：

function StrPas(const Str: PChar): string;
begin
  Result := Str;
end;

·#￥￥%￥%…… 是不是很意外？