来个大神中控台

roockkkk

求大神 这样的中控怎么写

bestkakkoii

放个表格控件上去，再用function写你需要的功能, 把要显示的资讯用 "表格设置内容" 输出至表格

还可以利用表格点击事件触发或消息路由触发相应功能，用表格焦点区分要调用的功能
举个例子:
消息路由收到消息515(左键双击)则调用function A

1. 项目名称_pretranslatemessage(hwnd, message, wParam, lParam, time, x, y)
   
2.         select(message)
   
3.         case 515
   
4.             function A()
   
5. 
   
6.         end
   
7.     return false
   
8. end

复制代码

1. //就边就用隐藏窗口做例子hwnd1~10就是游戏窗口句柄//在某个地方放入dm[i]= com("dm.dmsoft")
   
2. //还有var dm = array()
   
3. //就假设你中控有10行(不含表格标题那行)
   
4. var hide = array()
   
5. function A()
   
6.     var 行,列   
   
7.     var hwnd = array()
   
8.     gridgetfocusitem("表格名称", 行, 列) //得到当前表格焦点位置
   
9.     var i = 行
   
10.     if(r_col == 2 && hwnd[i] > 10 && hide[i] != 1)  //双击第"三"列第 i 行 hide == 0 则触发隐藏游戏窗
    
11.         windowsettop(hwnd[i], false)
    
12.         dm[i].SetWindowState(hwnd[i], 3)
    
13.         windowhide(hwnd[i])
    
14.         hide = 1
    
15.     elseif(r_col == 2 && hwnd[i] > 10 && hide[i] != 0) //双击第"三"列第 i 行 hide != 0 则触发显示游戏窗
    
16.         windowshow(hwnd[i])
    
17.         windowrestore(hwnd[i])
    
18.         windowactivate(hwnd[i])
    
19.         hide = 0
    
20.     end
    
21. end

复制代码

我不是大神也是个小新手