【第八章8.10】窗口控件 -- 超链接控件

// 导入 win.ui 库，用于创建图形界面
import win.ui;  
/*DSG{{*/
// 创建一个名为 winform 的窗口对象，并设置其属性
var winform = win.form(text="超链接控件测试";right=713;bottom=504)  
// 向窗口中添加控件
winform.add(
    // 添加一个超链接控件，并设置其属性
    lnkWebsite={cls="syslink";text="使用syslink控件教程";left=84;top=30;right=279;bottom=97;transparent=1;z=1};  
    // 添加一个 plus 控件，并设置其属性
    plus={cls="plus";left=37;top=99;right=633;bottom=426;notify=1;repeat="center";z=2}  
)
/*}}*/

// 导入 process 库，用于打开链接
import process;  
// 设置超链接控件的文本，并包含超链接
winform.lnkWebsite.text = `<a href="http://bbs.aardio.com/forum.php?mod=viewthread&tid=13220&extra=&from=portal">使用syslink控件教程</a>`  
// 为超链接控件的点击事件添加处理函数，打开点击的超链接
winform.lnkWebsite.onHyperlinkClick = function(nmSysLink,url,id){  
    process.openUrl(url) // 打开超链接    
}

// 导入 inet.http 库
import inet.http;  
// 设置 plus 控件的背景图片
winform.plus.background = "https://download.aardio.com/v10.files/demo/syslink.gif"  

// 设置 plus 控件的皮肤
winform.plus.skin(
    background = {  
        hover = "/res/images/btn-hover.png";  // 鼠标悬停时的背景图片
        focus = "/res/images/btn-focus.jpg";  // 获得焦点时的背景图片
        active = "/res/images/btn-active.png";  // 激活时的背景图片
        disabled = "/res/images/btn-disabled.png";  // 禁用时的背景图片
    }
)
// 为 plus 控件的命令事件添加空处理函数
winform.plus.oncommand = function(id,event){  
}

// 显示窗口
winform.show()  
// 启动界面线程消息循环
win.loopMessage();