如何通过Lua调用Delphi函数并高效获取其返回结果？

本文共计330个文字，预计阅读时间需要2分钟。

在Delphi中创建了一个能与Lua协同使用的函数。已创建一个过程（或无返回值的过程），功能完善。问题是，现在想从Delphi到Lua获取该函数的结果（而非程序）。

我在Delphi中创建了一个能够与Lua一起使用的函数.
我已经设法创建一个过程(或一个没有取得结果的函数),它完美无缺.
问题是,现在我想从Delphi到Lua获得该函数的结果(不再是程序).
我已经阅读了一些代码,但无法使其正常工作.

我的功能看起来像这样：

function TLuaScripter.getsetting(LuaState: TLuaState):TluaState; var path,stri: string; i:integer; begin //getsetting('Targeting/TargetingEnabled') path := Lua_ToString(LuaState, 1); //we get the string 'Targeting/..." Lua_Pop(LuaState,1); //we put it in stack (so we can clean it) stri:= tree.GETsetting(path); //this function gets, for example "No" lua_pushlstring(LuaState,Pansichar(ansistring(stri)),length(stri)); //I pass it to the lua stack //showmessage(Lua_ToString(LuaState,1));--> this shows the result I need in a msgbox result:= LuaState; end;

所以现在如果我在我的Lua控制台中使用

getsetting('Targeting/TargetingEnabled')

我能够在msgbox中获得结果(取消注释“Showmessage …”),但该函数不会返回Lua中的任何内容！如果我写

print(getsetting('Targeting/TargetingEnabled'))

我在Lua得到一个零值.

这将是完美的.我们刚刚将结果添加为整数和“result：= 1”

function TLuaScripter.getsetting(LuaState: TLuaState): integer; var path,stri: string; i: integer; begin //getsetting('Targeting/TargetingEnabled') path := Lua_ToString(LuaState, 1); stri:= tree.GETsetting(path); lua_pushlstring(LuaState,Pansichar(ansistring(stri)),length(stri)); result:= 1; end;