TC官方合作论坛

标题: 如何实现窗口吸附和靠边隐藏效果? [打印本页]

作者: karial 时间: 2013-5-18 03:45
标题: 如何实现窗口吸附和靠边隐藏效果?
如题，想制作出和QQ类似的窗口效果，结果做后窗口会死掉。。。
//窗口初始化
功能初始化()
窗口句柄=窗口.自身句柄()
窗口.获取大小(窗口句柄,x坐标,y坐标)
系统.获得分辨率(屏幕宽,屏幕高)
功能结束

//窗口吸附
功能定时器0_时钟()
窗口.获取位置(窗口句柄,x坐标,y坐标)
if(x坐标<10)
      窗口.设置位置(窗口句柄,0,y坐标)
endif
if(屏幕宽-窗口宽-10<x坐标)
      窗口.设置位置(窗口句柄,屏幕宽-窗口宽,y坐标)
endif
if(y坐标<10)
      窗口.设置位置(窗口句柄,x坐标,0)
endif
功能结束

//靠边隐藏
功能定时器1_时钟()
if(x坐标<0)
      遍历(tx=x坐标;tx<-窗口宽+1;tx--)
         窗口.设置位置(窗口句柄,0,y坐标)
      遍历结束
endif
if(屏幕宽-窗口宽/2<x坐标)
      遍历(tx=屏幕宽-x坐标;tx>屏幕宽;tx++)
         窗口.设置位置(窗口句柄,tx,y坐标)
      遍历结束
endif
if(y坐标<0)
      遍历(ty=y坐标;ty<-窗口高;ty--)
         窗口.设置位置(窗口句柄,x坐标,ty)
      遍历结束
endif
功能结束

作者: karial 时间: 2013-5-20 16:13
没人回吗？自顶一个先.........

作者: alukaduo09 时间: 2013-5-22 22:28
好像见过有人写过类似的程序

基本原理就是使用的消息路由。设置窗口大小

作者: chenlong4454 时间: 2013-10-5 09:32
- -这样的特效案例TC少之又少

作者: glb3699 时间: 2013-10-9 21:15
楼主代码还未试验过,而且定时器还不懂.
不过我有个疑问.
这段代码是无限循环的罢?为何从开头到结尾都没有一毫秒的延时呢?不延时的话,好像也是会卡死的.

作者: 冥焱皇朝 时间: 2015-1-28 11:11
多谢分享！

欢迎光临 TC官方合作论坛 (http://bbs.52tc.co/)