没有合适的资源?快使用搜索试试~ 我知道了~
PB透明文本的实现 statictext
共5个文件
pbt:1个
jpg:1个
pbl:1个
5星 · 超过95%的资源 需积分: 49 147 下载量 168 浏览量
2010-05-31
08:09:31
上传
评论 1
收藏 57KB RAR 举报
温馨提示
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
资源推荐
资源详情
资源评论
收起资源包目录
transparent_st.rar (5个子文件)
transparent_st.pbt 128B
transparent_st.pbl 22KB
效果图.JPG 15KB
test.gif 38KB
transparent_st.pbw 182B
共 5 条
- 1
newease
- 粉丝: 253
- 资源: 106
上传资源 快速赚钱
- 我的内容管理 展开
- 我的资源 快来上传第一个资源
- 我的收益 登录查看自己的收益
- 我的积分 登录查看自己的积分
- 我的C币 登录后查看C币余额
- 我的收藏
- 我的下载
- 下载帮助
最新资源
资源上传下载、课程学习等过程中有任何疑问或建议,欢迎提出宝贵意见哦~我们会及时处理!
点击此处反馈
安全验证
文档复制为VIP权益,开通VIP直接复制
信息提交成功
- 1
- 2
- 3
前往页