PB12.0调试没有有关问题,发布成可执行文件后运行崩溃
PB12.0调试没有问题,发布成可执行文件后运行崩溃
------解决方案--------------------
看了没有,你的public function boolean getcurrentdirectorya (integer sa,ref string lppathname) library "kernel32.dll" alias for "GetCurrentDirectoryA;Ansi"
的lppathname是 ref引用类型的。但是你的gvar.appdir没有分配空间。当然会报错啊。
string ls_temp_appdir
ls_temp_appdir = space(256)
gefun.getcurrentdirectorya(255,appdir )
获得之后再赋值啊。
------解决方案--------------------
试试直接用PB的GetCurrentDirectory函数(pb10以上版本里都有),如果你的PB版本里没有这个函数,那么引用api函数之前,需要分配空间(用space函数),否则很容易出错
------解决方案--------------------
看了没有,你的public function boolean getcurrentdirectorya (integer sa,ref string lppathname) library "kernel32.dll" alias for "GetCurrentDirectoryA;Ansi"
的lppathname是 ref引用类型的。但是你的gvar.appdir没有分配空间。当然会报错啊。
string ls_temp_appdir
ls_temp_appdir = space(256)
gefun.getcurrentdirectorya(255,appdir )
获得之后再赋值啊。
------解决方案--------------------
试试直接用PB的GetCurrentDirectory函数(pb10以上版本里都有),如果你的PB版本里没有这个函数,那么引用api函数之前,需要分配空间(用space函数),否则很容易出错