pb 中，如何才执行文件所在目录的全路径？

pb 中，怎么才执行文件所在目录的全路径？？
就是要获得当前可执行文件所在目录的全路径，要怎么获取？？

例：aa.exe在c:\aa\aaa\的目录下
要获得c:\aa\aaa\这个路径.

pb有什么函数可直接获取吗？

还是要怎么办？还望高手指点...谢谢

------解决方案--------------------
GetCurrentDirectory ( )