File drag and drop

[skyboy]

i have an edit control, and i'd like to be able to drag a file to it and drop it, after that a function takes the file name and path (without adding to/replacing the content of the edit control) and passes it to another program and reads the output to a variable. but according to the documentation i can't do this, it will always be appended(maybe replaced? i don't quite understand "The edit/input control will be set with the filename.") to the text already in the control

[martin]

i have an edit control, and i'd like to be able to drag a file to it and drop it, after that a function takes the file name and path (without adding to/replacing the content of the edit control) and passes it to another program and reads the output to a variable. but according to the documentation i can't do this, it will always be appended(maybe replaced? i don't quite understand "The edit/input control will be set with the filename.") to the text already in the control

This is a modification to an example posted by LazyCat which might help you.

expandcollapse popup

; *** Start added by AutoIt3Wrapper ***
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
; *** End added by AutoIt3Wrapper ***
#AutoIt3Wrapper_Add_Constants=n
;***************************************************
; by Lazycat
;***************************************************
#include <GUIConstants.au3>

Global $WM_DROPFILES = 0x233
Global $gaDropFiles[1], $str = ""

### Koda GUI section start ###
$hGUI = GUICreate("Test", 400, 200, 219, 178, -1, BitOR($WS_EX_ACCEPTFILES, $WS_EX_TOPMOST))
$hEdit = GUICtrlCreateEdit("", 5, 5, 390, 190)
GUICtrlSetState (-1, $GUI_DROPACCEPTED)
GUISetState(@SW_SHOW)
### Koda GUI section end ###

GUIRegisterMsg ($WM_DROPFILES, "WM_DROPFILES_FUNC")

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $GUI_EVENT_DROPPED
    $str = ""
    For $i = 0 To UBound($gaDropFiles) - 1
    $str &= "|" & $gaDropFiles[$i]
         Next
         GUICtrlSetData($hEdit,"Adding more" & @CRLF,1)
    GUICtrlSetData($hEdit, $str & @CRLF,1)
    EndSwitch
WEnd

Func WM_DROPFILES_FUNC($hWnd, $msgID, $wParam, $lParam)
    ConsoleWrite("aaaaaaaaaa" & @CRLF)
    Local $nSize, $pFileName
    Local $nAmt = DllCall("shell32.dll", "int", "DragQueryFile", "hwnd", $wParam, "int", 0xFFFFFFFF, "ptr", 0, "int", 255)
    For $i = 0 To $nAmt[0] - 1
    $nSize = DllCall("shell32.dll", "int", "DragQueryFile", "hwnd", $wParam, "int", $i, "ptr", 0, "int", 0)
    $nSize = $nSize[0] + 1
    $pFileName = DllStructCreate("char[" & $nSize & "]")
    DllCall("shell32.dll", "int", "DragQueryFile", "hwnd", $wParam, "int", $i, "ptr", DllStructGetPtr($pFileName), "int", $nSize)
    ReDim $gaDropFiles[$i+1]
    $gaDropFiles[$i] = DllStructGetData($pFileName, 1)
    $pFileName = 0
    Next
EndFunc

[Melba23]

skyboy,

This should help you for the first part:

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Include <GuiEdit.au3>

$hGUI = GUICreate("Dropped Files", 500, 400, Default, Default, Default, $WS_EX_ACCEPTFILES)

$hEdit = GUICtrlCreateEdit("", 10, 10, 480, 380)
GUICtrlSetState(-1, $GUI_DROPACCEPTED)
$hEdit_Handle = GUICtrlGetHandle(-1)

GUISetState(@SW_SHOW)

GUICtrlSetData($hEdit, "This is existing text")

While 1
    Switch GUIGetMsg()
        Case $GUI_EVENT_CLOSE
            Exit
        Case $GUI_EVENT_DROPPED
            $file = @GUI_DragFile
            ConsoleWrite($file & @CRLF)
            Sleep(2000) ; This only here you you can see the drop has taken place
            _GUICtrlEdit_ReplaceSel($hEdit_Handle, "")

    EndSwitch
WEnd

Search for inter-script communication for the second - Yashied has produced my personal favourite.

M23

[skyboy]

Melba, while your solution would work, it's something i wanted to avoid, and i will look for that inter-script communication, though for an unrelated project (this is going to use Run to read the output of a console application). and your solution was what i was looking for, martin though with a slight modification; returning false at the end of WM_DROPFILES_FUNC prevents the file name from showing up in the edit control

[hamohd70]

skyboy,

This should help you for the first part:

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Include <GuiEdit.au3>

$hGUI = GUICreate("Dropped Files", 500, 400, Default, Default, Default, $WS_EX_ACCEPTFILES)

$hEdit = GUICtrlCreateEdit("", 10, 10, 480, 380)
GUICtrlSetState(-1, $GUI_DROPACCEPTED)
$hEdit_Handle = GUICtrlGetHandle(-1)

GUISetState(@SW_SHOW)

GUICtrlSetData($hEdit, "This is existing text")

While 1
    Switch GUIGetMsg()
        Case $GUI_EVENT_CLOSE
            Exit
        Case $GUI_EVENT_DROPPED
            $file = @GUI_DragFile
            ConsoleWrite($file & @CRLF)
            Sleep(2000) ; This only here you you can see the drop has taken place
            _GUICtrlEdit_ReplaceSel($hEdit_Handle, "")

    EndSwitch
WEnd

Search for inter-script communication for the second - Yashied has produced my personal favourite.

M23

 

 

Thanks for the code. works great!

[guinness]

Please don't open old threads just to say thanks. It pollutes the general help and support section. No need to reply to this message.