Browse Source

Added file drop functions.

Brucey 5 years ago
parent
commit
7530bdf7dc
2 changed files with 32 additions and 0 deletions
  1. 4 0
      lib.mod/common.bmx
  2. 28 0
      lib.mod/lib.bmx

+ 4 - 0
lib.mod/common.bmx

@@ -418,6 +418,10 @@ Extern
 	Function bmx_raylib_GenImageFontAtlas:RImage(chars:RCharInfo Ptr, recs:RRectangle Ptr Ptr, charsCount:Int, FontSize:Int, padding:Int, packMethod:Int)="GenImageFontAtlas"
 	Function bmx_raylib_UnloadFont(font:RFont)="UnloadFont"
 
+	Function bmx_raylib_IsFileDropped:Int()="IsFileDropped"
+	Function bmx_raylib_GetDroppedFiles:Byte Ptr Ptr(count:Int Var)="GetDroppedFiles"
+	Function bmx_raylib_ClearDroppedFiles()="ClearDroppedFiles"
+
 End Extern
 
 

+ 28 - 0
lib.mod/lib.bmx

@@ -2587,3 +2587,31 @@ End Rem
 Function UnloadFont(font:RFont)
 	bmx_raylib_UnloadFont(font)
 End Function
+
+Rem
+bbdoc: Checks if a file has been dropped into window.
+End Rem
+Function IsFileDropped:Int()
+	Return bmx_raylib_IsFileDropped()
+End Function
+
+Rem
+bbdoc: Gets dropped files names.
+End Rem
+Function GetDroppedFiles:String[]()
+	Local count:Int
+	Local fptr:Byte Ptr Ptr = bmx_raylib_GetDroppedFiles(count)
+	If count = 0 Then
+		Return Null
+	End If
+	
+	Local files:String[count]
+	For Local i:Int = 0 Until count
+		files[i] = String.FromUTF8String(fptr[i])
+	Next
+	
+	bmx_raylib_ClearDroppedFiles()
+	
+	Return files
+End Function
+