Search found 1446 matches

by Rohwedder
Today, 03:10
Forum: Ask For Help
Topic: Possible keep the text formatting in script that copy selected text + append URL from Chrome/Firefox? Topic is solved
Replies: 2
Views: 56

Re: Possible keep the text formatting in script that copy selected text + append URL from Chrome/Firefox? Topic is solved

Hallo, try this (paste with F3): ;http://www.donationcoder.com/forum/index.php?topic=26164.0 ; Allow partial titlebar text matches. SetTitleMatchMode, 2 ;Create a window title group to match on for our hotkey. GroupAdd, myBrowsers, Mozilla Firefox GroupAdd, myBrowsers, Google Chrome #IfWinActive, ah...
by Rohwedder
Yesterday, 07:53
Forum: Ich brauche Hilfe
Topic: nichtnumerischer Rundungsrest
Replies: 4
Views: 93

Re: nichtnumerischer Rundungsrest

Nein,
ich hatte nach etwas wie A_Max32Integer für 0xffffffff bzw. A_Max64Integer für 0x7fffffffffffffff gesucht und kam so auf das Thema. Positiv überraschte mich, daß Autohotkey mit 1.E308 überhaupt noch etwas anfangen konnte, umso negativer die Sache mit dem Ȉ.
by Rohwedder
Yesterday, 05:47
Forum: Ich brauche Hilfe
Topic: nichtnumerischer Rundungsrest
Replies: 4
Views: 93

Re: nichtnumerischer Rundungsrest

Hallo, bei beiden läuft 1.1.30.01 64bit unicode. beim W7: 10979063629440455417404923096773118463368106829031575854049114915371633289784946888990612496697211725156115902837431400883283070091981460460312Ȉ beim W7 wird offenbar weniger abgeschnitten! Beim weiterrechnen auf dem W7 (meinem Hauprechner) k...
by Rohwedder
Yesterday, 04:50
Forum: Ich brauche Hilfe
Topic: nichtnumerischer Rundungsrest
Replies: 4
Views: 93

nichtnumerischer Rundungsrest

Hallo, ich habe einen Rechner mit Windows 7 und einen mit Windows 10, beide 64bit. Wenn ich ihnen dieses Skript serviere: #Persistent N := SubStr(1.E308+0,18) If N is Number MsgBox, this is a Number: %N% Else MsgBox, this is not a Number: %N% Return meldet nur der W7, not a Numbe r da bei ihm N mit ...
by Rohwedder
18 Nov 2018, 13:32
Forum: Ask For Help
Topic: How to force a script execution even if it contains error lines?
Replies: 2
Views: 96

Re: How to force a script execution even if it contains error lines?

Hallo,
AFAIK "Try" only guards against runtime errors not against loadtime errors.
Just comment out the error:

Code: Select all

msgbox, Correct 1	;should be executed
/*

MessageBox, Error non-sense line	;from here, script exit!

*/
msgbox, Correct 2
by Rohwedder
18 Nov 2018, 04:12
Forum: Ask For Help
Topic: Push Winkey to show autohidden taskbar
Replies: 9
Views: 563

Re: Push Winkey to show autohidden taskbar

Hallo,
switch the taskbar to permanent display and try this:

Code: Select all

#Persistent
SetTimer, LWin, 250
LWin:
CoordMode, Mouse
MouseGetPos,, MY
If GetKeyState("LWin","P") Or MY > A_ScreenHeight - 40
	WinShow, ahk_class Shell_TrayWnd
Else
	WinHide, ahk_class Shell_TrayWnd
Return
by Rohwedder
17 Nov 2018, 07:22
Forum: Ich brauche Hilfe
Topic: VBA: Text nach unten schieben
Replies: 6
Views: 124

Re: VBA: Text nach unten schieben

Hallo, vielen Dank für die Hilfen. Dies hier ist letztendlich daraus geworden: #IfWinActive ahk_class OpusApp ;Word +WheelUp:: ;Markierung absenken/anheben +WheelDown:: Try Word := ComObjActive("Word.Application") IF !Word Return FontPosition := Word.Selection.Font.Position IF FontPosition > 100000 ...
by Rohwedder
17 Nov 2018, 04:24
Forum: Ich brauche Hilfe
Topic: Automatische Großschreibung nach bestimmtem Ausdruck
Replies: 1
Views: 53

Re: Automatische Großschreibung nach bestimmtem Ausdruck

Hallo,
versuch mal:

Code: Select all

::stu::(Student){Shift Down}
::doz::(Dozent){Shift Down}
by Rohwedder
17 Nov 2018, 04:09
Forum: Ask For Help
Topic: Prevent additional keys triggering hotkey action
Replies: 5
Views: 63

Re: Prevent additional keys triggering hotkey action

Hallo,
not fully tested, try:

Code: Select all

~Alt & LWin::AltWin := True
!<#x::
ToolTip,Hotkey LWin + Alt + X
KeyWait, x
ToolTip
Return
#IF AltWin
~*LWin Up::AltWin := False
*!x::
	ToolTip,Hotkey Alt + LWin + X
KeyWait, x
ToolTip
Return	
#If
by Rohwedder
17 Nov 2018, 02:58
Forum: Ask For Help
Topic: Prevent additional keys triggering hotkey action
Replies: 5
Views: 63

Re: Prevent additional keys triggering hotkey action

Hallo,
what's the problem?

Code: Select all

!<#x::ToolTip,Hotkey Alt + LWin + X
by Rohwedder
16 Nov 2018, 05:17
Forum: Ich brauche Hilfe
Topic: Deutsche Hilfe für AHK 1.1 und 2.0-a
Replies: 172
Views: 44215

Re: Deutsche Hilfe für AHK 1.1 und 2.0-a

Hallo,
nur interessehalber,
warum kennt die Hilfe im Index SubStr(), findet diesen Suchbegriff jedoch nicht mit Search?
Mit Search wird nur SubStr gefunden, obwohl in der Kapitelüberschrift SubStr() vorkommt.
Gilt auch für alle anderen Funktionen.
by Rohwedder
16 Nov 2018, 04:42
Forum: Ask For Help
Topic: How to restore RButton's native behavior (drag)
Replies: 4
Views: 65

Re: How to restore RButton's native behavior (drag)

Hallo,
second part, untested:

Code: Select all

#If !WinActive("ahk_exe TeamViewer.exe") 
	&& GetKeyState("MButton", "P") && GetKeyState("LButton", "P")
RButton::DllCall("PowrProf\SetSuspendState", "int", 0, "int", 0, "int", 0)
by Rohwedder
16 Nov 2018, 02:56
Forum: Ask For Help
Topic: How to restore RButton's native behavior (drag)
Replies: 4
Views: 65

Re: How to restore RButton's native behavior (drag)

Hallo, try: ~RButton & WheelUp::Send {Esc}{Volume_Up 2} ~RButton & WheelDown::Send {Esc}{Volume_Down 2} #IfWinNotActive ahk_exe TeamViewer.exe RButton:: If (GetKeyState("MButton", "P")) && (GetKeyState("LButton", "P")) { DllCall("PowrProf\SetSuspendState", "int", 0, "int", 0, "int", 0) } else { Send...
by Rohwedder
16 Nov 2018, 02:21
Forum: Ich brauche Hilfe
Topic: VBA: Text nach unten schieben
Replies: 6
Views: 124

Re: VBA: Text nach unten schieben

Hallo, bei mir heute zunächst auch (gestern nie!). Dann häufte sich der Fehler: Error: 0x800401E3 - Vorgang nicht verfügbar. ---> 003: Word := ComObjActive("Word.Application") und nachdem ich dies mit Try versehen hatte, dann: Error: 0x800706BA - Der RPC-Server ist nicht verfügbar. Specifically: Sel...
by Rohwedder
15 Nov 2018, 15:38
Forum: Ich brauche Hilfe
Topic: VBA: Text nach unten schieben
Replies: 6
Views: 124

VBA: Text nach unten schieben

Hallo, erster Versuch mit VBA unter Autohotkey: #IfWinActive ahk_class OpusApp q:: Word := ComObjActive("Word.Application") If !Word { MsgBox, Word ist leer Return } ToolTip,% Word.ActiveDocument.FullName Sleep, 1000 ToolTip ;https://msdn.microsoft.com/de-de/vba/word-vba/articles/font-position-prope...
by Rohwedder
14 Nov 2018, 06:51
Forum: Ask For Help
Topic: Prevent additional keys triggering hotkey action
Replies: 5
Views: 63

Re: Prevent additional keys triggering hotkey action

Hallo,
try:

Code: Select all

Alt & ~Lwin Up::
If A_PriorKey = LWin
	MsgBox,,, action!,1
Return
by Rohwedder
14 Nov 2018, 02:12
Forum: Gaming
Topic: toggle to hold.... sort of
Replies: 4
Views: 126

Re: toggle to hold.... sort of

Hallo,
untested, try:

Code: Select all

$a:: ;User holds "a"
Send, a ;Script taps "a" and character crouches
KeyWait, a ;Script waits until the user releases "a"
Send, {Space} ;Script taps "Space" and character stands up
Return
by Rohwedder
13 Nov 2018, 10:11
Forum: Ask For Help
Topic: Make a script active when window open? Topic is solved
Replies: 6
Views: 89

Re: Make a script active when window open? Topic is solved

Hallo,
try:

Code: Select all

#IfWinActive, ahk_class Notepad
^h::
send, hello
return
by Rohwedder
13 Nov 2018, 04:15
Forum: Ich brauche Hilfe
Topic: word array in einem Loop
Replies: 3
Views: 75

Re: word array in einem Loop

Hallo,
ungetestet, ersetze mal

Code: Select all

word_array_new = word_array%Nummer%
mit:

Code: Select all

word_array_new := word_array%Nummer%

Go to advanced search