highend wrote:can't find way to set windows position
WinMove()
WinMove ($hwnd, "", 100, 100, 500, 300, 1)
I try, Not work
I using Editplus
Now can test Script and show Menu like FolderMenu3 EX smothly
Waiting column separator and (optional) Maximum Width columns from Don

- Sample autoit.gif (607.33 KiB) Viewed 4081 times
Sample User Button 1: For Test Seleted Or Whole Script Button
$(Copy) : Copy seleted to clipbord argument in editplus,
if noting selected, editplus copy whole word in current page to clipbord
Command : E:\!Prog\Au3\AutoIt3.exe
Argument : $(Copy) E:\!Prog\Au3\SciTE\_Tools\_OtherTools\_EditPlus-RunXyplorerScript.au3
Code: Select all
$script = "::"&ClipGet()
ClipPut("")
$wm_copydata = 74
$hwnd = WinGetHandle("[CLASS:ThunderRT6FormDC]")
WinSetState ($hwnd, "",@SW_MINIMIZE)
WinSetOnTop($hwnd, "", 1)
WinSetOnTop($hwnd, "", 0)
$dwdata = 4194305
$isize = StringLen($script)
$pmem = DllStructCreate("wchar[" & $isize & "]")
DllStructSetData($pmem, 1, $script)
$pcds = DllStructCreate("dword;dword;ptr")
DllStructSetData($pcds, 1, $dwdata)
DllStructSetData($pcds, 2, ($isize * 2))
DllStructSetData($pcds, 3, DllStructGetPtr($pmem))
DllCall("user32.dll", "lresult", "SendMessageW", "hwnd", $hwnd, "uint", $wm_copydata, "wparam", 0, "lparam", DllStructGetPtr($pcds))
Compile Versions
If Using Compile exe
Command : E:\Your\Path\EditPlus-RunXyplorerSelectedScript.exe
Argument : $(Copy)
Sample User Button 2, Run xys Script Button, like show Menu like FolderMenu3 EX
Command : E:\!Prog\Au3\AutoIt3.exe
Command : E:\!Prog\Au3\SciTE\_Tools\_OtherTools\_EditPlus-RunXyplorerScript2.au3
change path for $sFilePath to your script
Code: Select all
#include <FileConstants.au3>
#include <MsgBoxConstants.au3>
Local Const $sFilePath = "E:\!XYplorerData\Data[7]\Scripts\iMenu\X1iMenu0.xys"
Local $hFileOpen = FileOpen($sFilePath, $FO_READ)
If $hFileOpen = -1 Then
MsgBox($MB_SYSTEMMODAL, "", "An error occurred when reading the file.")
Exit
EndIf
$script = "::"&FileRead($hFileOpen)
FileClose($hFileOpen)
$wm_copydata = 74
$hwnd = WinGetHandle("[CLASS:ThunderRT6FormDC]")
WinSetState ($hwnd, "",@SW_MINIMIZE)
WinSetOnTop($hwnd, "", 1)
WinSetOnTop($hwnd, "", 0)
$dwdata = 4194305
$isize = StringLen($script)
$pmem = DllStructCreate("wchar[" & $isize & "]")
DllStructSetData($pmem, 1, $script)
$pcds = DllStructCreate("dword;dword;ptr")
DllStructSetData($pcds, 1, $dwdata)
DllStructSetData($pcds, 2, ($isize * 2))
DllStructSetData($pcds, 3, DllStructGetPtr($pmem))
DllCall("user32.dll", "lresult", "SendMessageW", "hwnd", $hwnd, "uint", $wm_copydata, "wparam", 0, "lparam", DllStructGetPtr($pcds))