PB中文字标签背景透明实现方法
定义窗口实例变量:Boolean ib_painting
st_1 的 Constructor 事件,程序:
BackColor = 2^29
st_1 用 Event ID:pbm_paint
自定义用户事件:ue_paint ,
程序:
if IsValid(This) then
if ib_painting then Return 0
ib_painting = True
Visible = False
Do While Yield()
Loop
Visible = True
ib_painting = False
end if
Return 0
做一个继承了静态文本框的自定义用户对象,设置好后,在窗口上放这个自定义用户对象,不要放静态文本框。
附件是打包好的自定义用户对象PB9版本的。可以导入后直接调用。
Thank you very much. 感谢大佬分享 试试你的这个
页:
[1]