Delphi with Lua5.1.3
下載地址:
http://download.csdn.net/source/2478241
Delphi:
usesLua, LuaLib;typeTMyLua = class(TLua)publishedfunction HelloWorld(LuaState: TLuaState): Integer;end;function TMyLua.HelloWorld: Integer; varArgCount: Integer;I: integer; beginwriteln('Delphi: Hello World');ArgCount := Lua_GetTop(LuaState);writeln('Arguments: ', ArgCount);for I := 1 to ArgCount dowriteln('Arg1', I, ': ', Lua_ToInteger(LuaState, I));// Clear stackLua_Pop(LuaState, Lua_GetTop(LuaState));// Push return valuesLua_PushInteger(LuaState, 101);Lua_PushInteger(LuaState, 102);Result := 2; end;varMyLua: TLua;beginMyLua := TMyLua.Create;MyLua.DoFile('Helloworld.lua');MyLua.Free; end;
helloworld.lua:
print("LuaDelphi Test");
p1,p2 = HelloWorld(1,2,3)
print "Results:";
print (p1);
print (p2);
總結(jié)
以上是生活随笔為你收集整理的Delphi with Lua5.1.3的全部內(nèi)容,希望文章能夠幫你解決所遇到的問題。
- 上一篇: 【问题解决】安装Oracle数据库,中途
- 下一篇: 电商移动Web实战项目(1)