更改目录名称的lazarus源代码。使用renamefile函数。