Leaderboard
Popular Content
Showing content with the highest reputation on 04/04/2023 in all areas
-
SciTE PlusBar
argumentum and one other reacted to ioa747 for a topic
The first time it runs the SciTE PlusBar the Configuration window appears which, in addition to the adjustments it makes regarding the position of PlusBar, every time it appear, it checks if there is a relevant shortcut, in this case SciTE_PlusBar.execute.lnk in the folder SciTE_PlusBar_1.0.0.25\SciTE\ and if not there then make one Which shortcut (SciTE_PlusBar.execute.lnk) I have copied on the desktop, I use it to call the SciTE You can also call Configuration from the main menu by clicking on the gear Back to first post2 points -
Thought I'd share this snippet I created based off jdelaney's post Calculates date in the past based off of only work days (ie: a week of just workdays). Any feedback welcome $start_date = "2023/03/27" $weekdays_ago = 2 $date = DateDiff_WeekDaysOnly($start_date, $weekdays_ago) Func DateDiff_WeekDaysOnly($start_date, $weekdays_ago) $weekdays = 0 $days_reduce = 0 While $weekdays <> $weekdays_ago $days_reduce -= 1 $running_date = _DateAdd("d", $days_reduce, $start_date) $aTemp = StringSplit($running_date, "/") $iDate = _DateToDayOfWeek($aTemp[1], $aTemp[2], $aTemp[3]) If $iDate <> 1 And $iDate <> 7 Then $weekdays += 1 EndIf WEnd $date_desired = _DateAdd("d", $days_reduce, $start_date) Return $date_desired EndFunc ;==>DateDiff_WeekDaysOnly1 point
-
Jos, Once the grandchildren have moved on to the other grandparents tomorrow I will also give it a go. M231 point
-
1 point
-
DateDiff_WorkDaysOnly
SOLVE-SMART reacted to Sascha for a topic
Maybe this something for the "Autoit Snippets" thread?1 point -
ShellExecute maximized
SOLVE-SMART reacted to ioa747 for a topic
in edge adress bar paste edge://settings/system and deactivate the Startup boost then try again ShellExecute("https://www.autoitscript.com/forum/topic/210016-shellexecute-maximized/", "", "", "", @SW_MAXIMIZE)1 point -
GuiBuilderPlus [updated March 24, 2024]
TheSaint reacted to kurtykurtyboy for a topic
Neat feature alert! Check the first post for the latest update v1.0.0-beta5. You can now add code/events to buttons, labels, etc.. by using the right-click context menu or double-clicking on the control. This works for both Msg mode as well as OnEvent mode. The extra code is added dynamically only for those controls who have event code assigned, so you won't have tons of extra and unneeded bloat in the generated code. ADDED: Add events to controls (right-click menu or double click) ADDED: Add options to code preview window for convenience FIXED: Could not 'undo' drawing of new control Example of a MsgBox assigned to $Button_1 in Msg mode: And here is the generated code for OnEvent mode: I'm thinking about possibly adding a default code input, such as ConsoleWrite("Event: Button_1" & @CRLF) since most people would be using this for prototyping and not full-on coding.1 point -
i had it like that originally. I just changed it to manual values so i can test with different dates thx1 point
-
try this from Main.au3 ShellExecute("runas", "/trustlevel:0x20000 test.exe")1 point
-
Detect Read Barcode
Abdelrahman reacted to juzis28 for a topic
Thanks anyway. Got it finally working. Used RawInput.au3 and input filtration "all but keyboard". Inside of _OnInput() i do some filtering for unacepted chars and proper string (accepted only those with letters A and K ald later certain stirng lenght is filtered out). Func _OnInput($hwnd, $iMsg, $iwParam, $ilParam) Local $tRI_KD, $pRI_KD, $iRI_KB Local $tRIDI_HID, $pRIDI_HID, $iRIDI_HID Local $iSize $tRI_KD = DllStructCreate($tagRAWINPUT_KEYBOARD) $pRI_KD = DllStructGetPtr($tRI_KD) $iRI_KB = DllStructGetSize($tRI_KD) $tRIDI_HID = DllStructCreate($tagRIDDEVICEINFO_HID) $pRIDI_HID = DllStructGetPtr($tRIDI_HID) $iRIDI_HID = DllStructGetSize($tRIDI_HID) DllStructSetData($tRIDI_HID, 'cbSize', $iRIDI_HID) _GetRawInputData($ilParam, $RID_INPUT, $pRI_KD, $iRI_KB, $iRIH) If Not @error Then $hdevice = DllStructGetData($tri_kd, "hDevice") $vkey = DllStructGetData($tri_kd, "VKey") If $KEYBOARD_ID = "" Then $KEYBOARD_ID = 0x000B003F ; default keyboard ID on my PC EndIf EndIf _GetRawInputDeviceInfo($hDevice, $RIDI_DEVICEINFO, $pRIDI_HID, $iRIDI_HID) If Not @error Then $hDevice2 = DllStructGetData($tRI_KD, 'hDevice') $dwVendorId = DllStructGetData($tRIDI_HID, 'dwVendorId') $dwProductId = DllStructGetData($tRIDI_HID, 'dwProductId') $dwType = DllStructGetData($tRI_KD, 'dwType') EndIf If DllStructGetData($tRI_KD, 'hDevice') <> $KEYBOARD_ID Then ;~ $vKey = DllStructGetData($tRI_KD, 'VKey');F3 = 114 ;~ ConsoleWrite(Chr($vKey)) If $on Then $t=$t& Chr($vKey) ;~ ConsoleWrite($t&@CR) $on=0 Else $on=1 EndIf EndIf $tRI_KD = 0 $t = StringRegExpReplace ( $t, "(?i)[^0-9AK\.]", "" ) ; K number If StringLen($t) = 10 Then If StringInStr($t, "K") Then _insert_barcode() EndIf ; ; A number ElseIf StringLen($t) = 8 Then If StringInStr($t, "A") Then _insert_barcode() EndIf EndIf Return $GUI_RUNDEFMSG EndFuncI still do not know how to prevent dublication of strings, i use some loop in function _insert_barcode()... Code dirty... but it works... Func _insert_barcode() Local $state_GUI6 = WinGetState($hGUI6) $state = WinGetState($hGUI7) $iLoop_Count += 1 If $iLoop_Count = 1 Then GUICtrlSetData($input_barcode, $t) $state_GUI6 = WinGetState($hGUI6) ConsoleWrite("$state GUI6..." & $state_GUI6 & @CRLF) If BitOR($state_GUI6 = 7, $state_GUI6 = 15) Then ;~ _listview_gui_close_to_barcode() GUICtrlSetData($input_barcode, $t) EndIf GUICtrlSetState($input_barcode, $GUI_FOCUS) $state = WinGetState($hGUI7) ConsoleWrite("$state GUI7..." & $state & @CRLF) If BitOR($state = 7, $state = 23) Then ; background (7) or minimized (23) If StringLen($t) <> 0 Then ConsoleWrite("StringLen($t): " & StringLen($t) & @CRLF) ConsoleWrite("$iLoop_Count: " & $iLoop_Count & @CRLF) ConsoleWrite("$t: " & $t & @CRLF) ControlClick($name7, "", "[CLASS:Button; TEXT:OK]") EndIf ; should check for state to send click If $state_GUI6 = 5 And BitOR($state = 7, $state = 23) Then ControlClick($name7, "", "[CLASS:Button; TEXT:OK]") EndIf ElseIf $state = 15 Then ; foreground, focused GUICtrlSetData($input_barcode, $t) ; no need for click, accepted by scanner Else ConsoleWrite("$t empty. No Click here..." & @CRLF) EndIf EndIf $iLoop_Count = 0 $t = "" EndFunc1 point -
Run cmd command
SOLVE-SMART reacted to Vinicius2023 for a topic
#RequireAdmin RunWait("cmd '/c' PBIDesktopRS_x64.msi /passive", @ScriptDir) Is the above code correct friends?0 points