How to get the cursor position on the screen

[cyhong]

is The cursor position is not the mouse position

[cyhong]

I now use this method, I hope there is a more convenient way

   if Sender is TUniComboBox then
   begin
     y := (Sender as TUniComboBox).Top;
     x := (Sender as TUniComboBox).Left;
     iscolor := (Sender as TUniComboBox).Color;

[Farshad Mohajeri]

Hi,

Obtaining cursor position can not be easy in a web app. You should not need it at all. Why do you need it in the first place?

[cyhong]

When I save data need check edit status,find some edit error then setfocus and popup tips(tips need the position)

[Sherzod]

Hi,

 

Can you make a small test case for what you want ?!

[cyhong]

thanks

Project2.rar

[Sherzod]

Hi,

 

Can you try this?!:

 'paddingX: '+IntToStr(x+Self.Left)+','+  
 'paddingY: '+IntToStr(y+Self.Top)+','+

[cyhong]

self.top left is 0,I tried before

[Sherzod]

Hi,

 

You can also try to use this:

_JSName: string;

  ...
  if (sender is TuniEdit) then
  begin
    if (sender as TuniEdit).Color=rgb(255,240,245) then
    begin
      //x:= (sender as TuniEdit).Left;
      //y:= (sender as TuniEdit).Top;
      errorstr := 'can not black';
      show_tips:= true;
      _JSName := (sender as TuniEdit).JSName;
    end;
  end;
  ...

  ...
  'paddingX: '+_JSName+'.getX(),'+  
  'paddingY: '+_JSName+'.getY(),'+     
  ...

Best regards.

[cyhong]

thanks Delphi Developer

can be obtained through ExtEvents->Focus ？

[Sherzod]

Hi,

 

can be obtained through ExtEvents->Focus ？

function focus(sender, e, eOpts)
{
    var me = sender;

    Ext.create('widget.uxNotification', {
        manager: 'fullscreen',
        title: 'title',
        html: 'errorstr',
        position: 'tl',
        spacing: 0,
        closable: false,
        paddingX: me.getX(),
        paddingY: me.getY(),
        useXAxis: false,
        stickOnClick: false,
        stickWhileHover: false,
        autoClose: true,
        autoCloseDelay: 5000,
        hideDuration: 0,
        iconCls: 'ux-notification-icon-information',
        slideInDuration: 500,
        slideBackDuration: 500,
        slideInAnimation: 'elasticIn',
        slideBackAnimation: 'bounceOut',
        alwaysOnTop: true
    }).show();
}

[cyhong]

thanks Delphi Developer

It's fine