Add Lua Gdi32 clipping support

mkdasher · Jun 2, 2023 · 9468af0 · 9468af0
1 parent d367f0b
commit 9468af0
Showing 1 changed file with 15 additions and 0 deletions.
diff --git a/lua/LuaConsole.cpp b/lua/LuaConsole.cpp
@@ -2531,6 +2531,19 @@ int DrawLine(lua_State *L) {
 	::LineTo(lua_dc, luaL_checknumber(L, 3), luaL_checknumber(L, 4));
 	return 0;
 }
+int SetClip(lua_State* L) {
+	auto lua = GetLuaClass(L);
+	auto rgn = CreateRectRgn(luaL_checkinteger(L, 1), luaL_checkinteger(L, 2), luaL_checkinteger(L, 1) + luaL_checkinteger(L, 3), luaL_checkinteger(L, 2) + luaL_checkinteger(L, 4));
+	SelectClipRgn(lua_dc, rgn);
+	DeleteObject(rgn);
+	return 0;
+}
+int ResetClip(lua_State* L) {
+	Lua* lua = GetLuaClass(L);
+	SelectClipRgn(lua_dc, NULL);
+	return 0;
+}
+
 int GetGUIInfo(lua_State *L) {
 	InitializeLuaDC(mainHWND);
 	lua_newtable(L);
@@ -3478,6 +3491,8 @@ const luaL_Reg wguiFuncs[] = {
 	{"line", DrawLine},
 	{"info", GetGUIInfo},
 	{"resize", ResizeWindow},
+	{"setclip", SetClip},
+	{"resetclip", ResetClip},
 	{NULL, NULL}
 };