1,111
社区成员
发帖
与我相关
我的任务
分享初学者：PB9中的标签控件背景色怎么变成透明呢？
大家好，我在 PB9 中 用的 staticText 标签控件，怎么能让它的背景色变为透明呢？谢谢你们了。
...全文
请发表友善的回复…
发表回复
WorldMobile 2004-12-21
- 打赏
- 举报
lzheng2001(１加１＝０) ，就得用2^29，
2^29是PB里自定义的透明颜色
在数据窗口里你可以看到transparent，虽然窗口里的对象没有transparent
但你也可以这么用，然后在pbm_paint里刷新一下即可
2^29是PB里自定义的透明颜色
在数据窗口里你可以看到transparent，虽然窗口里的对象没有transparent
但你也可以这么用，然后在pbm_paint里刷新一下即可
TTLOVEYOU3344 2004-12-21
- 打赏
- 举报
<DW Control Name>.Object.<Columnname>.Background.Mode='<0 - Opaque, 1 - Transparent>'
handi 2004-12-21
- 打赏
- 举报
建议斑竹把FAQ中比较好得部分 摘录一下, 发到EMAG_PB
wu_07 2004-12-21
- 打赏
- 举报
还有另外一种方法：
http://www.tiantiansoft.com/bbs/dispbbs.asp?BoardID=70&ID=1755
http://www.tiantiansoft.com/bbs/dispbbs.asp?BoardID=70&ID=1755
lzheng2001 2004-12-21
- 打赏
- 举报
为什么要用2^29?用其它行吗?
吹雪风 2004-12-21
- 打赏
- 举报
就是在PAINT事件中不停的刷新,背景色是:2^29,这种方法消耗资源较大,还是在数据窗口中做透明文字的好些.
lzheng2001 2004-12-21
- 打赏
- 举报
上面代码看过很多次了,就是不明白是什么原理,楼上的高手能否解释一下?
WorldMobile 2004-12-21
- 打赏
- 举报
定义窗口实例变量：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
（当然也可把静态文本框做成用户自定义对象，此时实例变量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
（当然也可把静态文本框做成用户自定义对象，此时实例变量Boolean ib_painting为文本框的实例变量）
progrose 2004-12-21
- 打赏
- 举报
需要借助APi了， 不过你可以用数据窗口代替。用数据窗口中的text直接设置就可以了
