wxlua-users Mailing List for wxLua

On Jun 15, 2015 12:31 PM, "Дмитрий" <dm...@ya...> wrote:
>
> Hello!
>
> I need to get a colour out of wxPalette (I need to create a wxMask out of
it later), and I can’t figure out how to translate the C++ function GetRGB
into Lua. In C++, the function returns data in pointers, but wxluaref.html
suggest these arguments are not used in Lua:
>
> // %override [bool, char red, char green, char blue]
wxPalette::GetRGB(int pixel) const;
> // C++ Func: bool GetRGB(int pixel, unsigned char* red, unsigned
char* green, unsigned char* blue) const;
> bool GetRGB(int pixel) const;
>
> Which practically means GetRGB is useless, since it just returns an error
code and gives no way to get R, G, and B..?
No, what it means is that it returns four values rather than returning them
through the input pointers.
> Am I missing something? How do I create a wxMask for the palette colour
with index #0?
>
>
> The documentation says that in Windows I can create a wxBitmap with a
palette and use wx.wxMask(bitmap, 0), but I didn’t get this to work
(probably because I’m using png and not bmp?). Also, I don’t really want my
code to run in Windows only.
>
I believe that wxWidgets supports palletized pngs, but I have not tried
this myself.
> I'm not sure if this is the right place for
Yes, though it may take a day for me to respond.
Regards,
 John

Hello!
I need to get a colour out of wxPalette (I need to create a wxMask out of it later), and I can’t figure out how to translate the C++ function GetRGB into Lua. In C++, the function returns data in pointers, but wxluaref.html suggest these arguments are not used in Lua:
 // %override [bool, char red, char green, char blue] wxPalette::GetRGB(int pixel) const;
 // C++ Func: bool GetRGB(int pixel, unsigned char* red, unsigned char* green, unsigned char* blue) const;
 bool GetRGB(int pixel) const; 
Which practically means GetRGB is useless, since it just returns an error code and gives no way to get R, G, and B..?
Am I missing something? How do I create a wxMask for the palette colour with index #0?
The documentation says that in Windows I can create a wxBitmap with a palette and use wx.wxMask(bitmap, 0), but I didn’t get this to work (probably because I’m using png and not bmp?). Also, I don’t really want my code to run in Windows only.
I'm not sure if this is the right place for such questions, if not, please point me where I can ask them. Thanks.
Best regards,
Dmitry Kushnariov

I have modified EvaluateExpr for newer versions of lua.
This makes global variables display properly.
Expression does not want to work and I really have no idea why.
The code is right must be some string conflict problems.
bool wxLuaDebugTarget::EvaluateExpr(int exprRef, const wxString 
&strExpr) // FIXME - check this code
{
 wxString strResult(wxT("Error"));
 int nReference = LUA_NOREF;
 EnterLuaCriticalSection();
 {
 lua_State* L = m_wxlState.GetLuaState();
 int nOldTop = lua_gettop(L);
 if (wxStrpbrk(strExpr.c_str(), wxT(" ~=<>+-*/%(){}[]:;,.\"'")) 
!= NULL)
 {
 // an expression
 wxLuaCharBuffer charbuf(strExpr);
 int nResult = luaL_loadbuffer(L, charbuf.GetData(), 
charbuf.Length(), "debug");
 if (nResult == 0)
 nResult = lua_pcall(L, 0, LUA_MULTRET, 0); // call main
 if (nResult != 0)
 wxlua_pushwxString(L, wxlua_LUA_ERR_msg(nResult));
 else if (lua_gettop(L) == nOldTop)
 lua_pushliteral(L, "OK");
 nReference = m_wxlState.wxluaR_Ref(-1, 
&wxlua_lreg_refs_key);
 lua_settop(L, nOldTop); // throw out all return values
 }
 else
 {
 lua_Debug ar = INIT_LUA_DEBUG;
 int stack_level = 0; // 0 is the current running 
function
 bool variable_found = false;
 while (lua_getstack(L, stack_level++, &ar) != 0)
 {
 int stack_index = 1; // 1 is the first local stack index
 wxString name = lua2wx(lua_getlocal(L, &ar, 
stack_index));
 while (!name.IsEmpty())
 {
 if (strExpr == name)
 {
 nReference = m_wxlState.wxluaR_Ref(-1, 
&wxlua_lreg_refs_key);
 lua_pop(L, 1);
 variable_found = true;
 break;
 }
 lua_pop(L, 1);
 name = lua2wx(lua_getlocal(L, &ar, ++stack_index));
 }
 if (variable_found)
 break;
 }
			lua_settop(L, nOldTop); // the table of globals.
 if (!variable_found)
 {
#if LUA_VERSION_NUM < 502
 lua_pushvalue(L, LUA_GLOBALSINDEX);
 lua_pushnil(L);
 while (lua_next(L, -2) != 0)
 {
 if (lua_type(L, -2) == LUA_TSTRING)
 {
 wxString name = lua2wx(lua_tostring(L, -2));
 if (strExpr == name)
 {
 nReference = m_wxlState.wxluaR_Ref(-1, 
&wxlua_lreg_refs_key); // reference value
 lua_pop(L, 2); // pop key and value
 variable_found = true;
 break;
 }
 }
 lua_pop(L, 1); // removes 'value';
 }
#else
				lua_getglobal(L, strExpr);
				if (lua_type(L, -1) != LUA_TNONE)
				{
 nReference = m_wxlState.wxluaR_Ref(-1, 
&wxlua_lreg_refs_key); // reference value
				}
				lua_pop(L, 1);
#endif
 }
 lua_settop(L, nOldTop); // the table of globals.
 }
 if ((nReference != LUA_NOREF) && 
m_wxlState.wxluaR_GetRef(nReference, &wxlua_lreg_refs_key))
 {
 m_wxlState.wxluaR_Unref(nReference, &wxlua_lreg_refs_key);
 int wxl_type = 0;
 wxString value;
 wxLuaDebugData::GetTypeValue(L, -1, &wxl_type, value);
 strResult.Printf(wxT("%s : %s"), wxluaT_typename(L, 
wxl_type).c_str(), value.c_str());
 lua_pop(L, 1);
 }
 }
 LeaveLuaCriticalSection();
 return NotifyEvaluateExpr(exprRef, strResult);
}
Good luck
Andre