pb:得到程序运行时的路径

//得到程序运行时的路径 //在global external functions声明： Function uLong GetModuleFileNameA(long hinstModule, Ref String lpszPath, uLong cchPath) Library ″kernel32.dll″ //程序路径保存在变量ls_AppPath中 string ls_AppPath int li_ret ls_AppPath = Space(128) li_ret = GetModuleFileNameA(Handle(GetApplication()),ls_apppath,128) //要编译成可执行文件.exe才可用，否则得到的是Powerbuilder的pb.exe的路径。

---------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

//得到程序运行时的路径

//在global external functions

声明： Function uLong GetModuleFileNameA(long hinstModule, Ref String lpszPath, uLong cchPath) Library ″kernel32.dll″

//程序路径保存在变量ls_AppPath中

string ls_AppPath int li_ret ls_AppPath = Space(128)

li_ret = GetModuleFileNameA(Handle(GetApplication()),ls_apppath,128)

//要编译成可执行文件.exe才可用，否则得到的是Powerbuilder的pb.exe的路径。