评分

简单实现文本框鼠标悬停提示。

7个月前更新

4975

在官方论坛给有个事例https://bbs.aardio.com/forum.php?mod=viewthread&tid=6480&page=1#pid33473，但是比较复杂，换个思路，发现个简单的方法。详见代码。有两个小问题需要注意：1、最后一行代码可以精简删除，2、有点小缺陷，需要先把鼠标移动到文本框，再移出来才有提示信息。不过不影响使用。代码还可以完善。

import win.ui;
/*DSG{{*/
var winform = win.form(text="aardio form";right=759;bottom=469;parent=...)
winform.add(
edit={cls="edit";text="这里填写的是手机号!";left=202;top=170;right=396;bottom=196;edge=1;multiline=1;z=1}
)
/*}}*/

winform.edit.wndproc = function(hwnd,message,wParam,lParam){
        if(message=512){//鼠标进入控件区域
                        var text1 = winform.edit.text
                        winform.edit.showInfoTip("简单的提示窗",text1,true)	
        }
}

winform.show();
win.loopMessage();
return winform;

评分

欢迎为Ta评分

只看作者

最新最热

- 用户946958380
  感谢分享！
  7个月前重庆回复

阿甘

超级版主1

“小缺陷”是因为窗体一直在响应 message = 512，当鼠标离开edit时才停止响应，所以此时才会显示出提示窗。这样修改：


import win.ui;
/*DSG{{*/
var winform = win.form(text="aardio form";right=759;bottom=469;parent=...)
winform.add(
edit={cls="edit";text="这里填写的是手机号!";left=202;top=170;right=396;bottom=196;edge=1;multiline=1;z=1}
)
/*}}*/

var tooltipShown = false;
winform.edit.wndproc = function(hwnd,message,wParam,lParam){
	if(message==512){//鼠标进入控件区域
		if(!tooltipShown){
			var text1 = winform.edit.text;
			winform.edit.showInfoTip("简单的提示窗",text1,true);
			tooltipShown = true;
		}
	}
}

winform.show();
win.loopMessage();
return winform;

7个月前重庆回复

- 無涯1
  var tooltipShown =0; winform.edit.wndproc = function(hwnd,message,wParam,lParam){ if(message==512){//鼠标进入控件区域 if(tooltipShown==0){ var text1 = winform.edit.text; winform.edit.showInfoTip("简单的提示窗",text1,true); tooltipShown = 1; } } }
  4个月前@阿甘回复

- rmajly作者0
  不过有点小缺陷，需要先把鼠标移动到文本框，再移出来才有提示信息。代码还需要完善。
  7个月前安徽回复
- rmajly作者0
  最后一行“return winform;“可以删除精简掉
  7个月前安徽回复