1. 程式人生 > 其它 >Delphi XE UniGUI ExtJS [5] 滑鼠和Key事件

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

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

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  更新時間: