tc动态界面,闪烁文字和首尾相连的滚动文字效果!

阿三 · 发表于 2013-12-10 17:45:57

源码::::

游客，如果您要查看本帖隐藏内容请回复

q1327631194 · 发表于 2013-12-10 17:55:29

ssssssss

hu863063648 · 发表于 2013-12-10 18:11:40

很有创意

rainshine · 发表于 2013-12-10 18:15:03

看一下。

netboy · 发表于 2013-12-10 18:18:21

kankan

rainshine · 发表于 2013-12-10 18:21:25

源码太乱了。。。变量名看得我晕了、。。。

rainshine · 发表于 2013-12-10 18:38:15

研究了一会，简简单单修改了一点。

空间界面
a,c,b,posA,posB,宽

功能初始化()
gg="tc简单软件开发工具"
sz="tc官网-tyuyan.com"
定时器.注册("定时器0",1)
窗口.获取大小(window.getmyhwnd(),宽,0)
标签.设置文本("标签3",sz)
标签.设置文本("标签4",sz)
标签.设置文本("标签5",sz)
标签.设置文本("标签6",sz)
posA=宽,posB=宽
控件.设置位置("标签1",posA,150,0,0,1)
控件.设置位置("标签2",posA,150,0,0,1)
标签.设置文本("标签1",gg)
标签.设置文本("标签2",gg)
功能结束

功能定时器0_时钟()
c++
如果(c==10)
      c=0
      如果(b==0)
         控件.可见("标签3",真)
         控件.可见("标签4",真)
         控件.可见("标签5",假)
         控件.可见("标签6",假)
         b=1
      否则
         控件.可见("标签5",真)
         控件.可见("标签6",真)
         控件.可见("标签3",假)
         控件.可见("标签4",假)
         b=0
      如果结束
如果结束
posA--
控件.设置位置("标签1",posA,150,0,0,1)
如果(posA<0)
      a=0
      控件.设置位置("标签2",posB,150,0,0,1)
      posB=posB-1
如果结束
如果(a==1)
      控件.设置位置("标签2",posB,150,0,0,1)
      posB=posB-1
如果结束
如果(posA>宽)
      posA=宽
      a=1
如果结束
如果(posB>宽)
      posB=宽
如果结束
功能结束

空间结束

whoyeyang · 发表于 2013-12-10 19:36:52

哎呦，不错哦

cylhb · 发表于 2013-12-10 19:41:04

支持分享。

z1481281370 · 发表于 2013-12-10 20:51:23

不错！支持一个

帐号		自动登录	找回密码
密码			立即注册

[界面] tc动态界面,闪烁文字和首尾相连的滚动文字效果!

本帖子中包含更多资源

站长推荐 /2