dj.lexus (Автор тем)

lua_CFunction CloseHandle;

//Создаём источник данных

lua_getglobal(L, "CreateDataSource");
lua_pushstring(L, class_code); //class_code
lua_pushstring(L, sec_code); //sec_code
lua_pushinteger(L, interval); //interval
lua_call(L, 3, 2);

if(lua_istable(L,1))
{
   lua_pushnil(L);
   while (lua_next(L, 1) != 0)
   {
      if(strcmp(lua_tostring(L, -2), "Close") == 0) //Проверяем название поля
      {
         CloseHandle = lua_tocfunction(L, -1);
      }

      lua_pop(L, 1);
   }
}

bool err = lua_isstring(L,2);

//Закрываем источник данных

if(CloseHandle)
{
   lua_pushcfunction(L, CloseHandle);
   lua_call (L, 0, 1);
   if(lua_isboolean(L, 1))
   {
      result = lua_toboolean(L, 1)
   }
}
return result;