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

阿三

源码::::

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

q1327631194

ssssssss

hu863063648

很有创意{:soso_e100:}

rainshine

看一下。

netboy

kankan

rainshine

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

rainshine

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

空间 界面
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

哎呦，不错哦

cylhb

支持分享。

z1481281370

不错！支持一个