Jump to content
Sign in to follow this  
TimBehrendt

Simple Script keeps stealing focus

Recommended Posts

TimBehrendt

I am getting crazy, what ever I do, this script steals the focus every time the timer event runs. I tried to get the active window handle and reset it, but this doesnt work reliable :-( Any ideas?

Func desktask()
    Local $aPos = WinGetPos("[CLASS:TFrmDeskTask]")
    if $aPos[0] <> 1680 Then
       Local $hWnd = WinGetHandle("[CLASS:TFrmDeskTask]")
       WinMove($hWnd, "", 1680, 220)
    EndIf
EndFunc

For $I = 1 To 99999999999999999
   Sleep (5000)
     If WinExists("[CLASS:TFrmDeskTask]") then desktask()
 Next

Thank you so much for your help!!

Share this post


Link to post
Share on other sites
mLipok

Welcome to the forum.

Please be more specyfic:

  • Stealing focus from Window ? Control ?
  • Which window ? This one which you move ?
  • "Every time the timers event runs" ? You mean after call this function desktask() ?
  • What is your OS ?

Signature beginning:   Wondering who uses AutoIT and what it can be used for ?
* GHAPI UDF - modest begining - comunication with GitHub REST API *
ADO.au3 UDF     POP3.au3 UDF     XML.au3 UDF    How to use IE.au3  UDF with  AutoIt v3.3.14.x  for other useful stuff click the following button

Spoiler

Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind. 

My contribution (my own projects): * Debenu Quick PDF Library - UDF * Debenu PDF Viewer SDK - UDF * Acrobat Reader - ActiveX Viewer * UDF for PDFCreator v1.x.x * XZip - UDF * AppCompatFlags UDF * CrowdinAPI UDF * _WinMergeCompare2Files() * _JavaExceptionAdd() * _IsBeta() * Writing DPI Awareness App - workaround * _AutoIt_RequiredVersion() * Chilkatsoft.au3 UDF * TeamViewer.au3 UDF * JavaManagement UDF * VIES over SOAP * WinSCP UDF * GHAPI UDF - modest begining - comunication with GitHub REST API *

My contribution to others projects or UDF based on  others projects: * _sql.au3 UDF  * POP3.au3 UDF *  RTF Printer - UDF * XML.au3 UDF * ADO.au3 UDF SMTP Mailer UDF *

Useful links: * Forum Rules * Forum etiquette *  Forum Information and FAQs * How to post code on the forum * AutoIt Online Documentation * AutoIt Online Beta Documentation * SciTE4AutoIt3 getting started * Convert text blocks to AutoIt code * Games made in Autoit * Programming related sites * Polish AutoIt Tutorial * DllCall Code Generator * 

Wiki: Expand your knowledge - AutoIt Wiki * Collection of User Defined Functions * How to use HelpFile * Good coding practices in AutoIt * 

IE Related:  * How to use IE.au3  UDF with  AutoIt v3.3.14.x * Why isn't Autoit able to click a Javascript Dialog? * Clicking javascript button with no ID * IE document >> save as MHT file * IETab Switcher (by LarsJ ) * HTML Entities * _IEquerySelectorAll() (by uncommon) * 

I encourage you to read: * Global Vars * Best Coding Practices * Please explain code used in Help file for several File functions * OOP-like approach in AutoIt * UDF-Spec Questions *  EXAMPLE: How To Catch ConsoleWrite() output to a file or to CMD *

"Homo sum; humani nil a me alienum puto" - Publius Terentius Afer
"Program are meant to be read by humans and only incidentally for computers and execute" - Donald Knuth, "The Art of Computer Programming"
:naughty:  :ranting:, be  :) and       \\//_.

Anticipating Errors :  "Any program that accepts data from a user must include code to validate that data before sending it to the data store. You cannot rely on the data store, ...., or even your programming language to notify you of problems. You must check every byte entered by your users, making sure that data is the correct type for its field and that required fields are not empty."

Signature last update: 2018-03-17

Share this post


Link to post
Share on other sites
mikell

Resetting the active window works for me ...

Func desktask()
    $a = WinGetHandle("[active]")
    Local $aPos = WinGetPos("test1")
    if $aPos[0] <> 1680 Then
       Local $hWnd = WinGetHandle("test1")
       WinMove($hWnd, "", 1680, 220)
    EndIf
    WinActivate($a)
EndFunc
 
For $I = 1 To 99999999999999999
   Sleep (1500)
     If WinExists("test1") then desktask()
Next

Share this post


Link to post
Share on other sites
TimBehrendt

Thank you so much for your help. I am sorry, but your correction steals the focus too.

  • Stealing focus from Window ? Control ?

Window, so the cursor prompt disappears, for example in a messanger window

  • Which window ? This one which you move ?

I move a program gui calles "DeskTask", every other window looses focus in the given time interval

  • "Every time the timers event runs" ? You mean after call this function desktask() ?

Yes

  • What is your OS ?

Win 7 Enterprise 64bit

 

Is there an alternative to the WinMove() that doesnt activate the window?

Edited by TimBehrendt

Share this post


Link to post
Share on other sites
jdelaney

Use ControlGetFocus, to grab the control of the [active] window prior to moving, and then set that ClassNN in ControlFocus after the move.

If it's a browser, you would need to get the .activeelement, or something like that, off the dom object.  Google it.


IEbyXPATH-Grab IE DOM objects by XPATH IEscriptRecord-Makings of an IE script recorder ExcelFromXML-Create Excel docs without excel installed GetAllWindowControls-Output all control data on a given window.

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
Sign in to follow this  

×