老版本代码改新版本

年迈的虎牙丶

1. 空间 被动跟随
   
2. 
   
3. 跟随句柄=0
   
4. 
   
5. 功能 开始_点击()
   
6.         控件.有效("开始",假)
   
7.         定时器.注册("定时器0",10)
   
8. 功能结束
   
9. 
   
10. 功能 定时器0_时钟()
    
11.         x,y
    
12.         if(被动跟随.countmypos(x,y)!=0)
    
13.                 窗口.设置位置(窗口.自身句柄(),x,y)
    
14.         else
    
15.                 辅助.退出()
    
16.                 //timer.kill("定时器0")
    
17.                 //控件.有效("开始",真)
    
18.         endif
    
19. 功能结束
    
20. 
    
21. 
    
22. 
    
23. //功能 初始化()
    
24. //如果(跟随)
    
25. //x
    
26. //system.getscreen(x,0)
    
27. //m_x,m_y
    
28. //width=子窗口.countmypos(m_x,m_y)
    
29. //m_width
    
30. //window.getwindowsize(窗口句柄,m_width,0)
    
31. //if(m_x+m_width>x)
    
32. //window.setwindowpos(窗口跟随.窗口句柄,x-width-m_width,m_y)
    
33. //子窗口.countmypos(m_x,m_y)
    
34. //endif
    
35. //window.setwindowpos(窗口句柄,m_x,m_y)
    
36. //如果结束
    
37. //功能结束
    
38. 
    
39. function countmypos(&x,&y)
    
40.         w
    
41.         window.getwindowsize(跟随句柄,w,0)
    
42.         window.getwindowpos(跟随句柄,x,y)
    
43.         x+=w
    
44.         return w
    
45. endfunction
    
46. 
    
47. 功能 退出_点击()
    
48.         辅助.退出()
    
49. 功能结束
    
50. 
    
51. 功能 编辑框0_失去焦点()
    
52.         跟随句柄=类型.转整型(编辑框.获得文本("编辑框0"))
    
53.         标签.设置文本("类名",窗口.类名(跟随句柄))
    
54.         标签.设置文本("标题",窗口.得到标题(跟随句柄))
    
55. 功能结束
    
56. 
    
57. 功能 编辑框0_内容改变()
    
58.         被动跟随.编辑框0_失去焦点()
    
59. 功能结束
    
60. 
    
61. 空间结束

复制代码

谁会把这个源码包版本的  改成  7.0能用的啊   求助~~~~~~~~~~~~~~~~新手

年迈的虎牙丶

红包5元 愿意的来

年迈的虎牙丶

61个看   这论坛···············