大虾们帮我看下这个程序哪有问题

yvsm

我想实现最小话到托盘，以及关闭程序时询问，我是新手，今天第一次写aardio
帮我看下面代码哪有问题

1. import config;
   
2. import web.form;
   
3. import win.util.tray;
   
4. import win.ui.menu;
   
5. import mouse;
   
6. 
   
7. tray = win.util.tray(mainForm,"/res/Icon.ico") //创建托盘图标，如果不能显示图标，可能是图标问题，要复合图标
   
8. tray.message = 0x400+9981/*_WM_TRAYMESSAGE*/
   
9. tray.tip = "这里是提示" //设置鼠标提示  
   
10. 
    
11. 
    
12. 
    
13. /*DSG{{*/
    
14. mainForm = ..win.form( topmost=1;bottom=724;scroll=1;text="VDUCN在线客服 beta 1.0";border="dialog frame";parent=...;image=$"\res\login.gif";help=1;right=315;frame=1;acceptfiles=1;cls="VDUCN_KEFU" )
    
15. mainForm.add(  )
    
16. /*}}*/
    
17. 
    
18. //创建web窗体
    
19. mainWb = web.form( mainForm
    
20. ,0x4/*_UIFLAG_NO3DBORDER*/ | 0x8/*_UIFLAG_SCROLL_NO*/  //禁用边框,禁用滚动
    
21. );
    
22. 
    
23. mainWb.showMenu=function(x,y,id,ele){
    
24.         /*定义此事件函数则禁用默认的右键弹出菜单*/
    
25.         return false;
    
26. }
    
27. mainWb.TitleChange=function( text ) {
    
28.         /*网页标题改变时触发*/
    
29.         mainForm.text = mainWb.document.title;
    
30. }
    
31. 
    
32. //打开目标网站
    
33. mainWb.go("http://kf.vducn.com/kefu/login.php")
    
34. 
    
35. mainForm.onClose = function(hwnd,message,wParam,lParam){
    
36.     tray.delete(); //关闭窗口同时删掉托盘，避免关闭窗口后要鼠标移到托盘图标才消失
    
37. }
    
38. 
    
39. //下面是添加托盘右键菜单
    
40. 
    
41. mainForm.popmenu=win.ui.popmenu(mainForm);
    
42. mainForm.popmenu.add('打开',function(id){ //添加了一个打开主界面的菜单
    
43.     mainForm.show();
    
44. })
    
45. mainForm.popmenu.add('退出',function(id){ //添加了一个退出程序的菜单
    
46.    mainForm.close()
    
47. })
    
48. 
    
49. //下面是获取鼠标消息弹出上面的右键菜单
    
50. mainForm.wndproc = function(hwnd,message,wparam,lparam){
    
51.     select(message) {//判断消息类型
    
52.         case( 0x400+9981/*_WM_TRAYMESSAGE*/ ) { //托盘图标消息
    
53.               
    
54.             if(lparam = 0x203/*_WM_LBUTTONDBLCLK)*/){  //鼠标双击
    
55.                 mainForm.show(true);
    
56.             }elseif(lparam =0x205/*_WM_RBUTTONUP*/){ //鼠标右键
    
57. 
    
58.                 import mouse;
    
59.                     x,y = mouse.getPos();
    
60.                             win.setForeground(mainForm.hwnd)
    
61.                            mainForm.popmenu.popup(x,y,true)
    
62.             }
    
63.             
    
64. 
    
65.         }
    
66.         case( 0x112/*_WM_SYSCOMMAND*/ ){ //系统命令消息
    
67.             if( wparam == 0xF020/*_SC_MINIMIZE*/ ){ //用户点击了最小化按钮
    
68.                 mainForm.show(false); //隐藏窗口
    
69.                 return true;//阻击默认消息传递，取消最小化过程
    
70.               }
    
71.         }
    
72. 
    
73.         
    
74. 
    
75.      }
    
76.         
    
77. }
    
78. 
    
79. 
    
80. mainForm.show(); //显示窗体
    
81. mainWb.wait("");//等待指定网址
    
82. 
    
83. 
    
84. 
    
85. 
    
86. //进入消息循环
    
87. win.loopMessage();
    
88. 
    

复制代码

roger

把问题精简一下，把你有疑问的那几句代码整理出来，弄成可运行的代码，例如图标可以暂时不要指定，
你的代码缺少图片别人根本无法运行，代码一股脑全复制下来别人也不一定有时间一句句的看。

简单的，你还没有创建 mainForm，就在使用 mainForm，这就好像一个孩子还没从肚子里生出来，你就命令他吃饭唱歌跳个舞啥的......这肯定是行不通的，这些低级逻辑错误自己再仔细的检查一下。

yvsm

roger 发表于 2013-8-4 13:58
把问题精简一下，把你有疑问的那几句代码整理出来，弄成可运行的代码，例如图标可以暂时不要指定，
你的代 ...

找到原因了，谢谢提醒