我想在我的 Delphi 应用程序中启用 Lua 脚本 (Lua 5.1)。为此,我使用 Thomas Lavergne 的头文件。
现在我尝试按照以下示例注册用户数据类型:http://www.lua.org/pil/28.2.html
在“新数组函数”中,它使用命令*luaL_getmetatable*。
static int newarray (lua_State *L) {
int n = luaL_checkint(L, 1);
size_t nbytes = sizeof(NumArray) + (n - 1)*sizeof(double);
NumArray *a = (NumArray *)lua_newuserdata(L, nbytes);
luaL_getmetatable(L, "LuaBook.array");
lua_setmetatable(L, -2);
a->size = n;
return 1; /* new userdatum is already on the stack */
}
不幸的是,*luaL_getmetatable* 函数在我的头文件中被标记为旧并被注释掉。我尝试再次激活它,但正如预期的那样,我会收到错误,因为找不到 dll 入口点。
这是该示例的 Delphi 翻译(使用另一种非数组数据类型)
Type
tMyType = tWhatever;
pMyType = ^tMyType;
{...}
Function newusertype(aState : pLua_State) : LongInt; cdecl;
Var
NewData : pMyType;
Begin
Result := 0;
NewData := lua_newuserdata(aState, SizeOf(tMyType ));
NewData^ := GetInitValue;
luaL_getMetaTable(aState, 'myexcample.mytype'); // Error/unknown function
lua_setmetatable(aState, -2);
Result := 1;
End;
现在我正在寻找 luaL_getMetaTable 的替代品。我还没有找到任何相关信息。事实上,我还没有找到任何关于 luaL_getMetaTable 已过时的信息,但它似乎是:(。
最佳答案
使用lua_newmetatable(aState, 'myexample.mytype')
。问题是(如果您只想在元表已经存在的情况下继续)您需要评估它是否返回 0!如果它返回 0,那么它想要创建元表...在这种情况下,您可以lua_pop(aState, 1)
。
只要记住lua_newmetatable
是一个返回整数的函数(实际上应该是 bool 值)。
否则你可以等几个星期,让我发布 Lua4Delphi 版本 2,这使得所有这一切都变得 super 简单(专业版本实际上使用 Lua 自动注册 Delphi 类型和实例)
关于delphi - 替换 luaL_getMetaTable,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/8324301/