AHK Maus aktiviert Fenster für TC x64

German support forum

Moderators: Hacker, Stefan2, white

Post Reply
User avatar
knightrider
Senior Member
Senior Member
Posts: 292
Joined: 2011-09-14, 13:23 UTC
Location: Baden-Württemberg

AHK Maus aktiviert Fenster für TC x64

Post by *knightrider »

mit dem AHK:

http://www.ghisler.ch/wikide/index.php/AutoHotkey:_Mauszeiger_aktiviert_Fenster_%28XMouse%29

aktiviert die maus das aktuelle fenster. leider funktioniert dies ausschließlich
mit TC x86.

wie muss das script geändert werden, damit es auch im TC x64 läuft?


thx

knightrider

#247054#
Windows 10 Pro x64
TC 10.50 Final x32x64

"Nosce te ipsum"
User avatar
HolgerK
Power Member
Power Member
Posts: 5411
Joined: 2006-01-26, 22:15 UTC
Location: Europe, Aachen

Post by *HolgerK »

Etwas vereinfacht:

Code: Select all

...
If     NOT( GetKeyState("LButton", "P") OR GetKeyState("RButton", "P") )
   AND (  ( InStr(HoveredControl, "TMyListBox") AND InStr(Focus, "TMyListBox") )
       OR ( InStr(HoveredControl, "LCLListBox") AND InStr(Focus, "LCLListBox") ) )
  ControlFocus, %HoveredControl%
Return
...
HTH
Holger
User avatar
knightrider
Senior Member
Senior Member
Posts: 292
Joined: 2011-09-14, 13:23 UTC
Location: Baden-Württemberg

Post by *knightrider »

HolgerK wrote:Etwas vereinfacht:

Code: Select all

...
If     NOT( GetKeyState("LButton", "P") OR GetKeyState("RButton", "P") )
   AND (  ( InStr(HoveredControl, "TMyListBox") AND InStr(Focus, "TMyListBox") )
       OR ( InStr(HoveredControl, "LCLListBox") AND InStr(Focus, "LCLListBox") ) )
  ControlFocus, %HoveredControl%
Return
...
HTH
Holger
hallo holger,

funktioniert leider nicht. (ich compiliere die .ahk datei um eine .exe zu bekommen.)

#247054#
Windows 10 Pro x64
TC 10.50 Final x32x64

"Nosce te ipsum"
User avatar
Horst.Epp
Power Member
Power Member
Posts: 6988
Joined: 2003-02-06, 17:36 UTC
Location: Germany

Post by *Horst.Epp »

knightrider wrote:
HolgerK wrote:Etwas vereinfacht:

Code: Select all

...
If     NOT( GetKeyState("LButton", "P") OR GetKeyState("RButton", "P") )
   AND (  ( InStr(HoveredControl, "TMyListBox") AND InStr(Focus, "TMyListBox") )
       OR ( InStr(HoveredControl, "LCLListBox") AND InStr(Focus, "LCLListBox") ) )
  ControlFocus, %HoveredControl%
Return
...
HTH
Holger
hallo holger,

funktioniert leider nicht. (ich compiliere die .ahk datei um eine .exe zu bekommen.)
Funktioniert hier nach Compilieren ohne Probleme.
Compiled mit Autohotkey_L Unicode x64 version 1.1.8.0
User avatar
knightrider
Senior Member
Senior Member
Posts: 292
Joined: 2011-09-14, 13:23 UTC
Location: Baden-Württemberg

Post by *knightrider »

also iwie hab ich hier nen knoten drin.
ich nutze AutoHotKey_Lw64. dabei ist ein compiler mit namen Ahk2Exe_L.

http://img6.imagebanana.com/img/z2zazqn8/autohotkey.png

wenn ich den benutze, erstellt es mir KEINE exe sondern eine datei ohne endung.

http://img6.imagebanana.com/img/dhx1xma8/dateiohneendung.png

also iwas mach ich glaube ich falsch...
:(

lg knightrider

#247054#
Windows 10 Pro x64
TC 10.50 Final x32x64

"Nosce te ipsum"
User avatar
Horst.Epp
Power Member
Power Member
Posts: 6988
Joined: 2003-02-06, 17:36 UTC
Location: Germany

Post by *Horst.Epp »

knightrider wrote:also iwie hab ich hier nen knoten drin.
ich nutze AutoHotKey_Lw64. dabei ist ein compiler mit namen Ahk2Exe_L.

http://img6.imagebanana.com/img/z2zazqn8/autohotkey.png

wenn ich den benutze, erstellt es mir KEINE exe sondern eine datei ohne endung.

http://img6.imagebanana.com/img/dhx1xma8/dateiohneendung.png

also iwas mach ich glaube ich falsch...
:(

lg knightrider
Ich kompiliere aus meinem Editor (PSpad) heraus.
Die Command line Definition dazu im Editor sieht so aus:
cmd /c c:\tools\AutoHotkey\Compiler\Ahk2Exe.exe /in "%File%" /out "%Dir%%Name%.exe" > "%Dir%%Name%.log"

Wie man sieht heist der Compiler Ahk2Exe.exe und so steht er auch im AutoHotkey_L_Install.exe drin.
User avatar
knightrider
Senior Member
Senior Member
Posts: 292
Joined: 2011-09-14, 13:23 UTC
Location: Baden-Württemberg

Post by *knightrider »

klappt nicht - egal

lg knightrider

#247054#
Windows 10 Pro x64
TC 10.50 Final x32x64

"Nosce te ipsum"
User avatar
HolgerK
Power Member
Power Member
Posts: 5411
Joined: 2006-01-26, 22:15 UTC
Location: Europe, Aachen

Post by *HolgerK »

2knightrider
Hast du das von mir gepostete Segment alleine übersetzt, oder das Segment anstelle der entsprechenden If-Abfrage in den Originalscript eingesetzt?

Gruß
Holger
User avatar
knightrider
Senior Member
Senior Member
Posts: 292
Joined: 2011-09-14, 13:23 UTC
Location: Baden-Württemberg

Post by *knightrider »

ähm alleine übersetzt.
aber jetzt kapier ich auch warum du
....

....

geschrieben hast.

teste das nochmals


lg knightrider

asche auf mein haupt....
habe die entsprechende passage von dir genommen und im ausgangs-script den absatz ersetzt und siehe da alles funktioniert.

tut mir leid dass ich mich soo doof angestellt habe aber ich bin halt kein programmierer.

vielen dank nochmals für deine / eure mühen.

lg

knightrider

#247054#
Windows 10 Pro x64
TC 10.50 Final x32x64

"Nosce te ipsum"
Post Reply