一个关于PB的幼稚问题

west76 2000-05-09 04:46:00
我在窗口的双击事件中写了如下代码:
integer li_x,li_y
p_1.x=0
p_1.y=0
li_x=p_1.x
li_y=p_1.y

Do While li_x < (this.Width - p_1.width)
p_2.draw(li_x ,li_y)
li_x=li_x+1
p_1.draw(li_x,li_y)

Loop
Do While li_y < (this.Height /2)
li_y=li_y+1
p_1.draw(li_x,li_y)
p_2.draw(li_x,li_y - 1)
Loop

Do While li_x > p_1.x
li_x=li_x - 1
p_1.draw(li_x,li_y)
p_2.draw(li_x+1,li_y)
Loop
Do While li_y > p_1.y
li_y=li_y - 1
p_1.draw(li_x,li_y)
p_2.draw(li_x,li_y+1)
Loop
以实现图片1在窗口中向右,向下、向左、向上移动一圈。并用图片2覆盖前面的图片,来消除痕迹。可是最终还是消不掉。请大侠指点。
...全文
181 5 打赏 收藏 转发到动态 举报
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
sutao 2000-06-01
  • 打赏
  • 举报
回复
需要重绘
hyh1978 2000-06-01
  • 打赏
  • 举报
回复
重绘函数可以
haoel 2000-06-01
  • 打赏
  • 举报
回复
请以后贴代码的同志注意了,希望你们能搞点程序注释语句上去。这种程序,看得头痛!
alanpower 2000-05-10
  • 打赏
  • 举报
回复
用个重绘的函数试试
fuyuan 2000-05-10
  • 打赏
  • 举报
回复
用PB7吧,可以直接用动画的,不用自己写程序了

1,075

社区成员

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

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