[GUI] Drag&Drop files -> Get filename

[FrankSchneidewind]

Hi all,

I got a quick question regarding Drag&Drop with GUIs. I made a little script that does something with files and I need a way to get the name/path of the file when I drag&drop it into the GUI. Is there a quick way to do this?

Tyvm in advance!

Neo

[Melba23]

FrankSchneidewind,

How about this?

M23

[FrankSchneidewind]

  On 8/25/2016 at 3:14 PM, Melba23 said:

FrankSchneidewind,

How about this?

M23

Expand  

 

Thanks this helped alot.

My form looks like this now:

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
;#include <GUIConstants.au3>
#include <ProgressConstants.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <FileConstants.au3>
#include <File.au3>
#include <INet.au3>
#include <String.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("DVD Videosoft Updater", 306, 110, 390, 222)
GUICtrlSetState(-1, $GUI_DROPACCEPTED)
$status = GUICtrlCreateLabel("Nothing to do right now", 136, 8, 152, 17)
GUICtrlSetState($status, $GUI_DROPACCEPTED)
$useOwnINI = GUICtrlCreateCheckbox("Use own links.ini", 8, 8, 97, 17)
GUICtrlSetState(-1, $GUI_DROPACCEPTED)
$download_start = GUICtrlCreateButton("Download", 8, 32, 107, 25)
GUICtrlSetState(-1, $GUI_DROPACCEPTED)
$progressbar = GUICtrlCreateProgress(136, 32, 150, 25)
GUICtrlSetState(-1, $GUI_DROPACCEPTED)
$Label2 = GUICtrlCreateLabel("Drag && Drop!", 80, 80, 145, 17, $SS_CENTER)
GUICtrlSetState(-1, $GUI_DROPACCEPTED)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $GUI_EVENT_DROPPED
            Global $droppedfile = @GUI_DragFile
            MsgBox(0,"",$droppedfile)
    EndSwitch
 WEnd

I still can't drop files in there - the "no dop" mouse-icon appears every time i try to drop a file...

Any idea what could be the reason for this?

Thanks!

[Melba23]

FrankSchneidewind,

Looks as if you forgot a vital style:

$Form1 = GUICreate(... $WS_EX_ACCEPTFILES)

M23

[FrankSchneidewind]

  On 8/25/2016 at 5:23 PM, Melba23 said:

FrankSchneidewind,

Looks as if you forgot a vital style:

$Form1 = GUICreate(... $WS_EX_ACCEPTFILES)

M23

Expand  

Still doesn't work and now the exit and minimize buttons are gone :/ 

Edited August 25, 2016 by FrankSchneidewind

[Melba23]

FrankSchneidewind,

I bet you put it in the "normal style" rather than the "extended style" position - this is how it should look:

$Form1 = GUICreate("DVD Videosoft Updater", 306, 110, 390, 222, Default, $WS_EX_ACCEPTFILES)

M23

[FrankSchneidewind]

  On 8/25/2016 at 6:00 PM, Melba23 said:

FrankSchneidewind,

I bet you put it in the "normal style" rather than the "extended style" position - this is how it should look:

$Form1 = GUICreate("DVD Videosoft Updater", 306, 110, 390, 222, Default, $WS_EX_ACCEPTFILES)

M23

Expand  

Thanks, it's working now!

[Melba23]

FrankSchneidewind,

Glad to hear it.

M23