Delphi XE UniGUI ExtJS [5] 鼠标和Key事件

Delphi XE UniGUI ExtJS [5] 鼠标和Key事件

?

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37

function mousedown(sender, x, y, eOpts) {    if (sender.getEl().dom.innerHTML == '<img src="files/p1.jpg">')    //getEl() -->  Ext.Element   类似js的：document.getElementById().innerHTML    {       sender.getEl().dom.innerHTML = '<img src="files/p2.jpg" />';    }    else if (sender.getEl().dom.innerHTML == '<img src="files/p2.jpg">' )    {       sender.getEl().dom.innerHTML = '<img src="files/p1.jpg" />';    }    else    {       sender.getEl().dom.innerHTML = '<img src="files/p2.jpg" />';    } }     //ClientEvents JS Key 事件 示例： function keydown(sender, e, eOpts) {   if (e == 113)   {    UniForms.UniEdit2.setValue(sender.getValue);   } } function change(sender, newValue, oldValue, eOpts) {    UniForms.UniEdit4.setValue(newValue); }   function keyup(sender, e, eOpts) {   if (e.keyCode == 113)   {      UniForms.UniEdit4.setValue(sender.getValue());   } }

　　

 

 

创建时间：2021.06.18　　更新时间：