Special effect for the mouse cursor.

[pixelsearch]

@AllenAA thanks for the test. I also got another confirmation in PM that it works with XP but not with w7 x64 . I'll be able to try it with Win11 in a few days. If it works with Win11 (with some change) then I'll report here.
Meanwhile I'm gonna study the other solutions presented in this thread. Have a great evening

[argumentum]

<File moved>

Edited August 23, 2023 by argumentum

[argumentum]

The source will run/compile in v3.3.16.1 and v3.2.12.1
The one compiled is on v3.2.12.1 as it don't need anything from the newer versions ( Run it on Win2000 if you need to ).

Added a few more things and uploaded it to the files area to save user forum space.

 

Edited August 23, 2023 by argumentum

[Emerogork]

ioa747, still cannot get the code to work. No error reported, no nothin...
Meanwhile, code written by nine, looks good.

 

[ioa747]

2 hours ago, Emerogork said:

ioa747, still cannot get the code to work.

have you  put the  ring1 png,  ring2.png  files in the same folder as the script, before run it, or compile it ?

                

Edited August 23, 2023 by ioa747

[Emerogork]

ioa747, still cannot get the code to work. No error reported, no nothin...
Meanwhile, code written by nine, looks good.

 

[Emerogork]

I want to experiment and change the thickness of the ring.
I believe the two lines of code are:
Local $hRgn = _WinAPI_CreateRoundRectRgn(0, 0, $aPos[2], $aPos[3], $aPos[2], $aPos[3])
Local $hRgn2 = _WinAPI_CreateRoundRectRgn(5, 5, $aPos[2]-6, $aPos[3]-6, $aPos[2]-6, $aPos[3]-6)

What ever I guess for settings only seem to make it worse.
Can someone explain?
I looked for it on Google but only get theory and no examples.

[argumentum]

25 minutes ago, Emerogork said:

Can someone explain?

... I just did in the post above. Look at the code, then copy and paste what you need. It has what you'd like to get done, already coded.

[Nine]

4 hours ago, Emerogork said:

Can someone explain?

It needs to be the same number in the line (ex. for 10 pixels thick) :

Local $hRgn2 = _WinAPI_CreateRoundRectRgn(10, 10, $aPos[2]-10, $aPos[3]-10, $aPos[2]-10, $aPos[3]-10)

 

[Emerogork]

Is good......

[Emerogork]

Can I now, by using similar code, have the text-insertion-point act the same way, when I move the arrow keys or type code, can I have the insertion show its location?

[Nine]

That would be very tricky, because not all apps have caret.  Also, some apps scroll the window H/V when using arrow keys.  It would be possible for a very specific application, but for system-wide, I would say good luck.

[MattHiggs]

Hey @argumentum.  Very impressive script!!!  I downloaded this from the "downloads" section of the forum, and I can think of many projects I would like to use it in.  I have, however, noticed some issues.  The circle surrounding the mouse pointer does not appear will appear under certain some parts of the Windows GUI, as you can see below:

Is there a way to get your script to work so that the circle will appear above all other parts of the GUI?  THanks.

Edited December 20, 2023 by MattHiggs

[argumentum]

I'll have to see how to make the parent of grater Z order than it is.
Right now I have so many fires to put out that I don't have time to look at it, nor I have a solution in mind.
Give me a week and I'll revisit the code.

[ioa747]

try out

in line 189 below
$aPos = Mouse GetPos()
add the line
WinSetOnTop ($hGui, "", 1)

Edited December 21, 2023 by ioa747

[argumentum]

..the constant WinSetOnTop() does not do it for things like Task manager when "always on top" or the calendar or "Action center".
He's looking to show even on top of these. Again, I have no clue how to get this done.

[argumentum]

https://www.autoitscript.com/forum/topic/68907-possible-to-draw-line-on-screen/?do=findComment&comment=506296

I guess it could be done in GDI+. But I'd need to borrow a few brain cells from @UEZ for that

[Andreik]

This can be done easy without many changes. Just download and include _uiaccess.au3 from here and add this line after GUI is created.

#include <WinAPI.au3>
#include <Constants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <Misc.au3>
#include "_uiaccess.au3"        ; <<< ------ Include this
...
...
...
Global $hGui = GUICreate("TheCircleOfMouse", $iCircleSize, $iCircleSize, 0, 0, $WS_POPUP, $WS_EX_LAYERED + $WS_EX_TRANSPARENT + $WS_EX_TOPMOST + $WS_EX_TOOLWINDOW, WinGetHandle("[CLASS:Shell_TrayWnd;]"))
GUISetBkColor($ColorDefault) ;       * <-- set the color
GUISetState()
WinSetOnTop($hGui, '', 1)       ; <<< ------ Add this line

PS: @argumentum I blame you for poor coding. What's this bunch of functions in the first part of the script? Finally on line 110 I found the main GUI.

[argumentum]

4 hours ago, Andreik said:

I blame you for poor coding

well, ....I blame you

Thanks for the code  

[argumentum]

4 hours ago, Andreik said:

What's this bunch of functions in the first part of the script?

The idea was to run in Win2000 too if you felt like it. For that you'd have to run with v3.2 so, I included the needed functions from the UDFs into the script.
I don't have time to figure if it'll work everywhere with this new include but I'll release it as is. I'll do more testing when I get time.