launcher app

[legend 16]

Hi, I made this little launcher, so I don't get a cluttered desktop. The thing is, I don't know how to make the guicreate follow it, when you resize it, and also I added support for drag & drop, but that will of course only allow 1 file to be dragged and dropped, maybe someone know how to make it able to move more dropped files?

expandcollapse popup

#NoTrayIcon
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Icon=icon.ico
#AutoIt3Wrapper_UseUpx=n
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include 
#include 
#include 

HotKeySet("{F9}", "notontop")
HotKeySet("{F10}", "ontop")


If UBound(ProcessList(@ScriptName)) > 2 Then Exit

if not fileexists(@appdatadir & "\launcher\") then
dircreate(@appdatadir & "\launcher\")
endif

If $CmdLine[0] <> 0 then FileMove($CmdLine[1], @appdatadir & "\launcher")

$oIE = ObjCreate("Shell.Explorer.2")
_Uskin_LoadDLL()
_USkin_Init(@ScriptDir & "\includes\Skin.msstyles")
$title = GUICreate("Launcher", 600, 400, 6, 590, BitOR($GUI_SS_DEFAULT_GUI,$WS_SIZEBOX,$WS_THICKFRAME))
$GUIActiveX = GUICtrlCreateObj($oIE, 0, 0, 600, 400)

Opt("WinTitleMatchMode", 2)
WinSetTrans($title, "", 220)

GUISetState()

$oIE.navigate(@appdatadir & "\launcher\")

While 1
$msg = GUIGetMsg()
Switch $msg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd

func notontop()
WinSetOnTop($title, "", 0)
TrayTip("", "F9 - Changed to NOT on top", 5)
EndFunc

func ontop()
WinSetOnTop($title, "", 1)
TrayTip("", "F10 - Changed to ON on top", 5)
sleep(5000)
EndFunc

[Mat 368]

To make the control get resized with the window, use:

$GUIActiveX = GUICtrlCreateObj($oIE, 0, 0, 600, 400)
GUICtrlSetResizing(-1, $GUI_DOCKBORDERS)

I can drag and drop multiple files without any issue.

[legend 16]

Hi Mat, works nicely you can drag and drop a file over to the compiled exe file, but only 1 file will be moved to the folder, you can mark multiple file, and drag them over, well you can,

but only one is being moved