unigui组件中client javascript delphi组件之间的操作

UniLabel组件:

function OnClick(sender, e)
{
MainForm.UniLabel1.setText('Click!');
}

function Onmousemove(sender, x, y)
{
MainForm.UniLabel1.setPosition(x, y);
}

 

unibutton组件:

function OnMouseout(sender, e)
{
sender.setText('Out');
}

uniedit组件

function form.Onmousemove(sender, x, y)
{
MainForm.UniEdit1.setValue(x+' : '+y);

ss=MainForm.UniEdit1.getValue();
}

posted @ 2014-07-02 21:42  findumars  Views(1096)  Comments(0Edit  收藏  举报