//滑尺控件提示 import win.ui; /*DSG{{*/ var winform = win.form(text="aardio form";right=759;bottom=469) winform.add( trackbar={cls="trackbar";left=282;top=286;right=536;bottom=316;max=100;min=0;z=1} ) /*}}*/ /** import win.ui.tooltip; var hwndTooltipCtrl = winform.trackbar.sendMessage(0x41E/*_TBM_GETTOOLTIPS*/,0,0); var tooltipCtrl = win.ui.tooltip(winform,hwndTooltipCtrl); winform.trackbar.oncommand = function(id,event,pos){ var toolInfo = tooltipCtrl.getCurrentTool(); if(toolInfo)toolInfo.setText( tostring(pos / 10) ); } **/ winform.trackbar.oncommand = function(id,event,pos){ winform.trackbar.tooltip = pos / 10; } //自绘- 强行移除获得焦点后显示的虚线框 winform.trackbar.onnotify = function(id,code,ptr){ if( code == 0xFFFFFFF4/*_NM_CUSTOMDRAW*/ ){ var lvcd = winform.trackbar.getNotifyCustomDraw(code,ptr); if( lvcd.dwDrawStage == 1/*_CDDS_PREPAINT*/ ){ lvcd.uItemState = lvcd.uItemState & ~0x10/*_CDIS_FOCUS*/; lvcd.update(); } } } winform.show(); win.loopMessage();