Click and Mouse Up delayed events

- To test whether the click at 1:1 works or not. Mouse UP should be done before moving back
2026-09-29 20:22:35 +02:00 · 2026-09-29 20:22:35 +02:00 · f321a6ebea
commit f321a6ebea
parent 5e0537cb20
3 changed files with 46 additions and 44 deletions
--- a/BatteryHealth.Artwork/Windows/AppIcon.icns
+++ b/BatteryHealth.Artwork/Windows/AppIcon.icns
--- a/main.pas
+++ b/main.pas
@ -97,6 +97,8 @@ begin
           // Simulate mouse button press and release
           mouse_event(MOUSEEVENTF_LEFTDOWN, 0, 1, 1, 0);
 	        Sleep(150);
+           mouse_event(MOUSEEVENTF_LEFTUP, 0, 1, 1, 0);
+ 	        Sleep(50);
           mouse_event(MOUSEEVENTF_LEFTUP, 0, 1, 1, 0);
           // Get back to position
           mouse.CursorPos := currentPos ;