怎样让静态文本框透明解决思路

怎样让静态文本框透明
我要把静态文本放在图片上，背景透明怎么办？不用下面这个笨方法，耗资源

定义实例变量：
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

------解决方案--------------------
应该没有太好的方法了吧

试试放在数据窗口中吧，图片也放在数据窗口中，这样text 就可以自己透明了
------解决方案--------------------

SQL code


透明文本的实现
（独孤求败二零零四年一月十三日整理于深圳市南山区）
PB中的静态文本控件可以设置各种不同的背景色，但没有办法设置为透明色，这在某些特殊界面设计要求时显得心有余而力不足。本文提供一种实现透明文本的简单方法，并不需要借助API。方法如下：
1、    建立一个工作空间（workspace），取名为：transparent_st。
2、    建立一个应用（application），取名为：transparent_st。
3、    建立一个可视用户对象，uo_transparent_st，类型为statictext，定义下列变量：
   boolean ib_painting
4、    编写uo_transparent_st的Constructor事件脚本：
   //536870912 透明色
   This.backcolor =  2^29 
5、    定义uo_transparent_st的用户自定义事件，ue_paint（Event ID：pbm_paint）
    IF IsValid(This) THEN
      if ib_painting THEN Return 0
      ib_painting = True
      This.Visible = False
      Do While Yield()
      Loop
      This.Visible = True
      ib_painting = False
END IF
Return 0
6、    运行后的效果图如下：

------解决方案--------------------
呵呵，楼上朋友太急了，楼主发的代码和你的一样，他是不想要这种办法的～～

如果想效率效果都好，建议使用数据窗口来实现，图片加文本框，我现在都是这样做的，

怎样让 静态文本框透明解决思路

相关推荐

怎样让静态文本框透明解决思路