This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
.ir { | |
border: 0; | |
font: 0/0 a; | |
text-shadow: none; | |
color: transparent; | |
background-color: #transparent; | |
} |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
; Author UP_NORTH | |
Func RestartScript() | |
If @Compiled = 1 Then | |
Run( FileGetShortName(@ScriptFullPath)) | |
Else | |
Run( FileGetShortName(@AutoItExe) & " " & FileGetShortName(@ScriptFullPath)) | |
EndIf | |
Exit | |
EndFunc |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
; IMPORTANT MAKE A COPY OF SCRIPT BEFORE DELETION | |
; Deletes the running script | |
; Author Larry | |
Func SuiCide() | |
$SC_File = @TEMPDIR & "\suicide.bat" | |
FileDelete($SC_File) | |
$SC_batch = 'loop:' & @CRLF & 'del "' & @SCRIPTFULLPATH & '"' & @CRLF & _ | |
'ping -n 1 -w 250 zxywqxz_q' & @CRLF & 'if exist "' & @SCRIPTFULLPATH & _ | |
'" goto loop' & @CRLF & 'del suicide.bat' & @CRLF |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
<div style="margin:10px; margin-top:5px"> | |
<div style="margin-bottom:2px"> | |
<b>Spoiler</b>: <input class="button" type="button" value="Mutat" onclick="rejt(this)"> | |
</div> | |
<div style="margin: 0px; padding: 6px; border: 1px inset;"> | |
<div class="spoiler" style="visibility: hidden;"> | |
{param} | |
</div> | |
</div> | |
</div> |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#Include <GuiToolBar.au3> | |
$hSysTray = ControlGetHandle('[Class:Shell_TrayWnd]', '', '[Class:ToolbarWindow32;Instance:1]') | |
For $i = 1 To _GUICtrlToolbar_ButtonCount($hSystray) | |
$sCurrent = _GUICtrlToolbar_GetButtonText($hSystray,$i) | |
;~ ConsoleWrite($i & ": " & $sCurrent & @CRLF) | |
If $sCurrent = $sToolTip Then | |
_GUICtrlToolbar_ClickButton($hSystray, $i, "left") | |
ExitLoop |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
; For explanation, see this forum topic: http://www.autoitscript.com/forum/topic/147424-disable-or-remove-close-minimize-maximize-buttons-on-any-window-in-runtime/ | |
#include <WinAPI.au3> | |
#include <Constants.au3> | |
#include <WindowsConstants.au3> | |
$h = WinGetHandle("Untitled - Note") | |
$iOldStyle = _WinAPI_GetWindowLong($h, $GWL_STYLE) | |
ConsoleWrite("+ old style: " & $iOldStyle & @CR) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Func EditScript() | |
ShellExecuteWait(@ProgramFilesDir & '\AutoIt3\SciTE\SciTE.exe', @ScriptFullPath, @ScriptDir) | |
RestartScript() | |
EndFunc |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#include <WinAPI.au3> | |
#include <WindowsConstants.au3> | |
$iPrevState = LockTaskBar(1) | |
Func LockTaskBar($iLock) | |
41If @OSVersion <> "WIN_7" Then | |
MsgBox(16,"Onyl on Windows 7", "The taskbar can only be locked this way in Windows 7 !") | |
Return | |
EndIf |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Func SetAlwaysOnTop($hWnd) | |
_WinAPI_SetWindowPos($hWnd, $HWND_TOP+$HWND_TOPMOST, 0, 0, 0, 0, BitOr($SWP_NOMOVE, $SWP_NOSIZE)) | |
EndFunc |
OlderNewer