Hallo, the old man needs heilp !
Mit der Tastenkombination
Shift+alt+druck
wird unter Windows der die kontrastreiche Darstellung aktiviert. Das wollte ich mit folgender Befehlsfolge per Script ausführen
send {LShift down}{Alt down}{PrintScreen}
send {LShift up}{Alt up}
da tut sich aber nix. Was mache ich falsch ??
bye
Tastenkombi Shift+Ait+Druck
Re: Tastenkombi Shift+Ait+Druck
Hallo,
hier klappts damit:
hier klappts damit:
Code: Select all
q:: ;toggle high contrast
;jeeswg: https://www.autohotkey.com/boards/viewtopic.php?t=41224
vSize := A_PtrSize=8?16:12
VarSetCapacity(HIGHCONTRAST, vSize, 0)
NumPut(vSize, &HIGHCONTRAST, 0, "UInt") ;cbSize
;SPI_GETHIGHCONTRAST := 0x42
DllCall("user32\SystemParametersInfo", UInt,0x42, UInt,vSize, Ptr,&HIGHCONTRAST, UInt,0)
vFlags := NumGet(&HIGHCONTRAST, 4, "UInt") ;dwFlags
;JEE_Progress(vFlags, 1000)
if (vFlags & 1) ;HCF_HIGHCONTRASTON := 0x1
vFlags -= 1
else
vFlags += 1
;JEE_Progress(vFlags, 1000)
VarSetCapacity(HIGHCONTRAST, vSize, 0)
NumPut(vSize, &HIGHCONTRAST, 0, "UInt") ;cbSize
NumPut(vFlags, &HIGHCONTRAST, 4, "UInt") ;dwFlags
;SPI_SETHIGHCONTRAST := 0x43
DllCall("user32\SystemParametersInfo", UInt,0x43, UInt,vSize, Ptr,&HIGHCONTRAST, UInt,0)
return
Re: Tastenkombi Shift+Ait+Druck
Hallo Rohwedder !
Leider nicht, beim Ersten Aufruf keine Reaktion, beim zweiten Aufruf (beenden der kontrastreichen Darstellung) Fehlermeldung
an older instance is still runnig... see #singleinstance
bye
]hier klappts damit
Leider nicht, beim Ersten Aufruf keine Reaktion, beim zweiten Aufruf (beenden der kontrastreichen Darstellung) Fehlermeldung
an older instance is still runnig... see #singleinstance
bye
- Attachments
-
- grafik.png (89.99 KiB) Viewed 348 times
Re: Tastenkombi Shift+Ait+Druck
Die erste Zeile: q:: ;toggle high contrast bedeutet, das Skript wartet darauf, daß du die Q-Taste betätigst.
Also, das Skript nur einmal aufrufen (=starten) und dann mit der Q-Taste den kontrastreichen Darstellung ein/aus schalten.
Wenn du diesen Q-Hotkey nicht willst, einfach die erste Zeile löschen.
Also, das Skript nur einmal aufrufen (=starten) und dann mit der Q-Taste den kontrastreichen Darstellung ein/aus schalten.
Wenn du diesen Q-Hotkey nicht willst, einfach die erste Zeile löschen.
Re: Tastenkombi Shift+Ait+Druck
Hey Rohwedder !
Zuerst einmal vielen Dank für deine Mühe. Das mit der Taste Q habe ich als völliger VBA-Analphabet natürlich nicht gecheckt.
Nachdem ich dann die zeiele gelöscht habe, klaptt´s perfekt.
Nochmals besten Dank und bis demnnäxt
Zuerst einmal vielen Dank für deine Mühe. Das mit der Taste Q habe ich als völliger VBA-Analphabet natürlich nicht gecheckt.
Nachdem ich dann die zeiele gelöscht habe, klaptt´s perfekt.
Nochmals besten Dank und bis demnnäxt