mcclane654 Posted November 14, 2013 Share Posted November 14, 2013 I was wondering if there was any function getting the time from system. I also have another problem. here in Norway we have 3 extra letters on our keyboard. so I was wondering if anyone know what the _IfPressed code would be for æ, ø, å. Link to comment Share on other sites More sharing options...
water Posted November 14, 2013 Share Posted November 14, 2013 There are macros available for date and time. My UDFs and Tutorials: Spoiler UDFs:Active Directory (NEW 2022-02-19 - Version 1.6.1.0) - Download - General Help & Support - Example Scripts - WikiExcelChart (2017-07-21 - Version 0.4.0.1) - Download - General Help & Support - Example ScriptsOutlookEX (2021-11-16 - Version 1.7.0.0) - Download - General Help & Support - Example Scripts - WikiOutlookEX_GUI (2021-04-13 - Version 1.4.0.0) - DownloadOutlook Tools (2019-07-22 - Version 0.6.0.0) - Download - General Help & Support - WikiPowerPoint (2021-08-31 - Version 1.5.0.0) - Download - General Help & Support - Example Scripts - WikiTask Scheduler (NEW 2022-07-28 - Version 1.6.0.1) - Download - General Help & Support - Wiki Standard UDFs:Excel - Example Scripts - WikiWord - Wiki Tutorials:ADO - WikiWebDriver - Wiki Link to comment Share on other sites More sharing options...
islandspapand Posted November 14, 2013 Share Posted November 14, 2013 Hej --Jeg håber det here hjælper dig lidt på vej i hope this helps you on your way #include <Misc.au3> ;~ _IsAnyKeyPressed() ;~ Func _IsAnyKeyPressed($start = 0, $end = 255) ;~ For $i = $start to $end ;~ if (_IsPressed(Hex($i))) Then return $i ;~ Next ;~ return -1 ;~ EndFunc ;~ while(true) ;~ Local $val ;~ $val = _IsAnyKeyPressed() ;~ ConsoleWrite('@@ Debug(' & @ScriptLineNumber & ') : $val = ' & $val & @crlf & '>Error code: ' & @error & @crlf) ;### Debug Console ;~ if ( $val > -1 ) Then ;~ MsgBox(0, "", "You press the " & Chr($val) & " key.") ;~ EndIf ;~ WEnd ConsoleWrite('@@ Debug(' & @ScriptLineNumber & ') : Hex(192) = ' & Hex(192) & @crlf & '>Error code: ' & @error & @crlf) ;### Debug Console æ ConsoleWrite('@@ Debug(' & @ScriptLineNumber & ') : Hex(221) = ' & Hex(221) & @crlf & '>Error code: ' & @error & @crlf) ;### Debug Console å ConsoleWrite('@@ Debug(' & @ScriptLineNumber & ') : Hex(222) = ' & Hex(222) & @crlf & '>Error code: ' & @error & @crlf) ;### Debug Console ø While 1 If _IsPressed("C0") Then ConsoleWrite("Key Pressed æ"&@CR) If _IsPressed("DE") Then ConsoleWrite("Key Pressed ø"&@CR) If _IsPressed("DD") Then ConsoleWrite("Key Pressed å"&@CR) WEnd Link to comment Share on other sites More sharing options...
Recommended Posts
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 accountSign in
Already have an account? Sign in here.
Sign In Now