赠分行动---技术请教

lgm 2002-08-29 08:45:27
1、PB中使用ole控件:“shockware flash”,请问如何在代码中控制该控件执行的文件,还有其播放、停止、或暂停的控制,请说的详细点,最好写出命令行!

2、pb中如何实现静态文本控件背景透明,就象VB的那样!

问题解决,立刻给分,决不拖延!!!!!!!
谢谢!
...全文
50 7 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
7 条回复
切换为时间正序
请发表友善的回复…
发表回复
xiongxiao 2002-08-29
  • 打赏
  • 举报
回复
上面的ib_painting_name 这个变量名写错了,不好意思,就为ib_painting
xiongxiao 2002-08-29
  • 打赏
  • 举报
回复
还有你要在文本控件中定义一个事件:
先定义实例变量: boolean ib_painting///记住如有多个文本控件,就要定义多个,需要一个对一个.要不你可看看会有什么情况,可是很搞笑的···
EVENT ID: pbm_paint

然后写上
if IsValid(This) then
if ib_painting_name then Return 0
ib_painting_name = True
Visible = False
Do While Yield()
Loop
Visible = True
ib_painting_name = False
end if
Return 0
sun_cathay 2002-08-29
  • 打赏
  • 举报
回复
晓雄的透明简单
wzljzh 2002-08-29
  • 打赏
  • 举报
回复
第一步:在窗口上Declare Instance Variables:
    private:
    boolean ib_painting = false

  第二步:在st_1的事件constructor上编写下列代码:
call super::constructor
this.BackColor = 2^29

  第二步:在StaticText上增加下列事件:
    EVENT name: ue_paint
    EVENT ID: pbm_paint。

  第三步:对自定事件ue_paint编写下列代码:
IF ib_Painting THEN RETURN 0
ib_Painting = TRUE
p_1.Visible = TRUE //假设静态文本遮住了图片p_1
mle_1.Visible = TRUE //假设静态文本同时也遮住了多行编辑框mle_1
//如果此静态文本还盖住了其他控件
//在此增加这些控件代码: control.Visible = TRUE
THIS.Visible = FALSE
YIELD()
THIS.Visible = TRUE
ib_painting=FALSE
END IF
RETURN 0
转贴!!!
xiongxiao 2002-08-29
  • 打赏
  • 举报
回复
问题1不敢做答,我也试过,在BROWSE按钮中看到的东东不一定就能用
第2个:你在静态文本控件的constructor事件中写上:BackColor = 2^29即可.
Icon 2002-08-29
  • 打赏
  • 举报
回复
1、插入ole时,点击Browse按钮,其方法和属性一览无遗。

2、st背景透明参考此帖:
http://www.csdn.net/expert/topic/640/640565.xml?temp=.7492487
lgm 2002-08-29
  • 打赏
  • 举报
回复
谢谢大家的帮助,问题已经解决!
这个贴我要结啦,送分给大家!
不过请大家继续看看小弟的下一道问题!"高分求助!"
*^_^*

1,108

社区成员

发帖
与我相关
我的任务
社区描述
PowerBuilder 相关问题讨论
社区管理员
  • 基础类社区
  • WorldMobile
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧