Drag & Drop files?

BlitzMax Forums/MaxGUI Module/Drag & Drop files?

Grisu

(Posted 2009) [#1]

Hi!

Is it possible to drag & drop files on a maxgui app window or panel or listbox (cross-platform solution)?

Thanks
Grisu

d-bug

(Posted 2009) [#2]

Create the window with WINDOW_ACCEPTFILES flag.

Grisu

(Posted 2009) [#3]

Could you please give a simple example code?

"EVENT_WINDOWACCEPT A file was dropped onto a Window with the WINDOW_ACCEPTFILES style. The Event Extra object holds the filepath."

Why not add a simple example to the docs for this... :(

Htbaa

(Posted 2009) [#4]

Why? You catch the event and the extra object is a string containing the filepath. Which you can then use to do certain operations on.

degac

(Posted 2009) [#5]

' WINDOW_ACCEPTFILES

Import MaxGui.Drivers
SuperStrict 

Local window:TGadget
Local lst_files:tgadget


window=CreateWindow("My Window",100,100,400,300,,WINDOW_TITLEBAR|WINDOW_CENTER|WINDOW_ACCEPTFILES)
lst_files=CreateListBox(5,10,385,200,window)

CreateLabel "Drag one or more files on this window",10,220,385,30,window

Local temp:String

While True
	WaitEvent 
	Print CurrentEvent.ToString()
	Select EventID()
		
		Case EVENT_WINDOWACCEPT
			temp=String(EventExtra())
			If temp<>"" ' or something like ---> if extractext(upper(temp))="EXE"
				AddGadgetItem lst_files,temp
			End If
		Case EVENT_WINDOWCLOSE
			End
	End Select
Wend

I've added this example to the online documentation...

Grisu

(Posted 2009) [#6]

Thanks a lot!

Naughty Alien

(Posted 2009) [#7]

..very nice..thanks man..

Scaremonger

(Posted 2009) [#8]

Just what I was looking for. Cheers.