PlantSimulation读取软件根目录并加载Dll
tableFile.delete
TableFile.openDialog
var j:integer := loadLibrary(AA.Filename) //加载Dll 对象 加载库
if (j>0)
print getLoadedLibrary(j)," is loaded."
var r:real := callLibrary(j,"calcSin",PI/6) //调用dll 内部接口
//promptmessage(to_str("sin(PI/6) = ",r))
callLibrary(j,"listAccess",Tablefile)
tablefile.refilldialog //表格数据重新填充
print "Unloading: ",freeLibrary(j) //释放对象或释放库
end
要想获得更多,欢迎加入PlantSimulation QQ技术进阶群:964485532
本博客每日一更,欢迎关注