//得到程序运行时的路径 //在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的路径。