我的Lua��函��C��创徏iup菜单

侠客襉K�� — Wed, 04 Nov 2009 09:14:00 GMT

写在前面:
下面的这�D�代码可以直接在LuaForWindows的Scite中运�?�q�个函数的是仿照LuaForWindows自带教程中的那个创徏iup菜单的函数写�?改进的一个地�Ҏ��可以用一个消息处理回调函数来响应多个菜单��?然后再统一dispatch,个�h认�ؓ写法上比直接把进行实际处理的函数写在菜单定义表前面美观一�?
说来惭愧,��改写的�q�个��函�?也是调试了一大会才弄好的,刚接触Lua的时�?��是不熟�l�啊...(废话? !)

require 'cdlua'
require 'iuplua'
require 'iupluacd'

function event_handler_g (self)
iup.Message(self.title,'dispatch message')
end

function event_handler1 (self)
      iup.Message(self.title,'event 1 dispatch message')
end
function event_handler2 (self)
      iup.Message(self.title,'event 2 dispatch message')
end
function event_handler3 (self)
      iup.Message(self.title,'event 3 dispatch message')
end

my_menu_test =
{
nil,'M1',{event_handler_g,'M11','M12','M13',{event_handler3,'M21','M22',},},'M2',{event_handler_g,'M22','M23',},
}

function my_create_menu2(menu_define_table)

local items={}

      for k,v in pairs(menu_define_table) do
          if type(v) == 'function' or type(v)=='nil' then
--~             event_handler=v
              ___my_library__global__event_handler=v
          end

          if type(v) =='string' then
--~             local item=iup.item{title=v,action=event_handler}
              local item=iup.item{title=v,action=___my_library__global__event_handler}
              table.insert(items,item)
          end

          if type(v) =='table' then
              m1_menu_title=table.remove(items)
              local item=iup.submenu {my_create_menu2(v),title=tostring(m1_menu_title.title)}
              table.insert(items,item)
          end
      end--end of for
      return iup.menu(items)
end

my_main_frame=iup.frame
      {
          iup.canvas
          {
              cursor='CROSS',
              scrollbar='VERTICAL',
              posy=0.0,
              ymax=0.8,
          }
      }

dlg = iup.dialog
{
      my_main_frame,
      size="HALFxHALF",
      title="finally I got the expected result",
      menu=my_create_menu2(my_menu_test),
}

dlg:showxy(iup.CENTER,iup.CENTER)

if (not iup.MainLoopLevel or iup.MainLoopLevel()==0) then
iup.MainLoop()
end

后记,已经发布在了我的�_�脓�?不过它上面说是根据时间访问来删除旧帖子的,我怕时间久了这点记忆再没有�?/p>

侠客襉K�� 2009-11-04 17:14 发表评论

xp下WS_EX_COMPOSITED问题�ȝ��

侠客襉K�� — Sat, 10 Oct 2009 09:53:00 GMT

#if(_WIN32_WINNT>=0x0501)
#defineWS_EX_COMPOSITED 0x02000000L
#endif/* _WIN32_WINNT >= 0x0501 */

准备把语�a�写的�_��一�?�q�样节省作者和读者的旉��.

相关资料:�q�里不再摘录,误��行查看msdn

问题描述:在窗口��用了WS_EX_COMPOSITED 风格�?�l�图��׃��变得不正�怺�,原因是xp�Ҏ��的双�~�冲�l�图机制(可能后箋版本Windows没有,参�?span style="background: black; color: #fefffe">WS_EX_COMPOSITED 风格的定�?在msdn�?的bug(应该��是一个系�l�的bug)

问题1:GetDC�pȝ��图API不可�?表现为画出来的内容会被立卛_��新掉,�q�个应该不算bug,

解决�Ҏ��:

把所有的�l�图操作攑ֈ�WM_ERASEBKGND�?/span>WM_PAINT消息处理函数�?�q�个应该满��大多数情况下的要�?�Ҏ��情况可以使用加bool标志的方法在�q�两个函数里面绘�?然后在需要��用GetDC的地方设�|�bool标志

问题2:即��在上�q�的两个消息handler里面,GDI+�l�图操作�q�是无法正常工作,而同一个消息处理函数里面的GDI函数��可以工�?�q�个问题msdn论坛上有人问�q?也给��Z��解决�Ҏ��,我试了一下果然ok,�q�个问题应该是GDI+函数内部的问�?具体原因不明

解决�Ҏ��:

使用内存dc�l�图.创徏内存兼容dc,然后把这个内存兼容dc传给GDI+,�l�图完成�?bitblt到原dc

��x��,xp下的�pȝ��双缓冲窗口可以正常工作了,也��用GDI+来绘图了.

本文��Z��客西风原�?请尊重别人劳动成�?如果转蝲引用请保留作者出�?谢谢合作.

侠客襉K�� 2009-10-10 17:53 发表评论

怡红院av一区二区三区,欧美日韩久久不卡,欧美激情一区二区三区不卡

我的Lua���函��C��创徏iup菜单

xp下WS_EX_COMPOSITED问题�ȝ��

我的Lua��函��C��创徏iup菜单