在PB中获得当前应用程序执行时所在的目录和Exe名称。使用API函数GetModuleFileNameA。