Jump to content

Leaderboard

Popular Content

Showing content with the highest reputation on 10/12/2023 in all areas

  1. willichan

    CornedBeef Hash (UDF)

    A reasonably speedy and overly simplistic hash generator (definately not a cryptographic hash) I had a minor project that I didn't feel like putting in the effort to use any recognized hashing algorithm, so I made this one as a quick and dirty, just "for sh*ts and giggles" algorithm. Useable, but don't take it seriously. Maybe just an example of how you can compartmentalize your UDF and avoid using global variables. CornedBeefHash.au3
    1 point
  2. ...Thanks, but I think I have an issue with AutoComplete Abbrevs after the last changes so stay tuned. .... EDIT: Should be fixed in the latest version (13:06)
    1 point
  3. Danp2

    script stops processing

    Look up "TrayIconDebug" in the help file
    1 point
  4. When I activate this one via LUA by doing editor.AutoCMulti=1, then the standard SciTE AutoComplete does insert the selected text in all multiselects. Not sure yet how one could configure this as standard behavior when wanted. EDIT: Think I found the proper way of doing this so have a play with the latest LUA version in SciTE_changes_Dynamic_Includes_LUA.zip
    1 point
  5. The issue looked like some race condition between scripts, so I have changed the logic somewhat to avoid that in the latest SciTE_changes_Dynamic_Includes_LUA.zip
    1 point
  6. I will try to bang out an example script soon.
    1 point
  7. $Path = @WorkingDir ;$Path = "F:\autoit\" $hExplorer = WinGetHandle( "[REGEXPCLASS:^(Cabinet|Explore)WClass$]" ) $oShell = ObjCreate("Shell.Application" ) $oWindows = $oShell.Windows() for $i = 0 to $oWindows.Count - 1 For $oWindow In $oShell.Windows() if $oWindows.Item($i).HWND = $hExplorer then $Replace = StringReplace($oWindows.Item($i).Locationurl, 'file:///', '') $Replace = StringReplace($Replace, '/', '\') $Replace = _URIDecode($Replace) If $Replace = $Path Then $oWindow = $oWindows.Item($i) For $oItem In $oWindow.Document.SelectedItems() MsgBox(0,"",$oItem.Path()) ConsoleWrite( $oItem.Path() & @CRLF ) Next ExitLoop EndIf ExitLoop EndIf Next Next Func _URIDecode($sData) Local $aData = StringSplit(StringReplace($sData,"+"," ",0,1),"%") $sData = "" For $i = 2 To $aData[0] $aData[1] &= Chr(Dec(StringLeft($aData[$i],2))) & StringTrimLeft($aData[$i],2) Next Return $aData[1] EndFunc there are almost all checks, except for the case when two identical tabs are open in the same folder
    1 point
×
×
  • Create New...