From 09085b614bddf51566c54ce87202a53c4dfd5acd Mon Sep 17 00:00:00 2001
From: FellippeHeitor <fellippeheitor@gmail.com>
Date: Wed, 1 Aug 2018 02:02:07 -0300
Subject: [PATCH] New attempt at adding drag/drop to the IDE.

---
 source/ide/ide_methods.bas | 30 +++++++++++++++---------------
 source/qb64.bas            |  4 ++--
 2 files changed, 17 insertions(+), 17 deletions(-)

diff --git a/source/ide/ide_methods.bas b/source/ide/ide_methods.bas
index 803149eec..1d0be5b9b 100644
--- a/source/ide/ide_methods.bas
+++ b/source/ide/ide_methods.bas
@@ -1275,14 +1275,14 @@ FUNCTION ide2 (ignore)
             END IF
         END IF
 
-        'IF _TOTALDROPPEDFILES > 0 THEN
-        '    IF _FILEEXISTS(_DROPPEDFILE$(1)) THEN
-        '        IdeOpenFile$ = _DROPPEDFILE$(1)
-        '        _FINISHDROP
-        '        GOTO ctrlOpen
-        '    END IF
-        '    _FINISHDROP
-        'END IF
+        IF _TOTALDROPPEDFILES > 0 THEN
+            IF _FILEEXISTS(_DROPPEDFILE$(1)) THEN
+                IdeOpenFile$ = _DROPPEDFILE$(1)
+                _FINISHDROP
+                GOTO ctrlOpen
+            END IF
+            _FINISHDROP
+        END IF
 
         'Hover/click (QuickNav)
         IF IdeSystem = 1 AND QuickNavTotal > 0 THEN
@@ -7450,13 +7450,13 @@ FUNCTION ideopen$
             alt = KALT: IF alt <> oldalt THEN change = 1
             oldalt = alt
 
-            'IF _TOTALDROPPEDFILES > 0 THEN
-            '    idetxt(o(1).txt) = _DROPPEDFILE$(1)
-            '    o(1).v1 = LEN(idetxt(o(1).txt))
-            '    focus = 1
-            '    _FINISHDROP
-            '    change = 1
-            'END IF
+            IF _TOTALDROPPEDFILES > 0 THEN
+                idetxt(o(1).txt) = _DROPPEDFILE$(1)
+                o(1).v1 = LEN(idetxt(o(1).txt))
+                focus = 1
+                _FINISHDROP
+                change = 1
+            END IF
 
             _LIMIT 100
         LOOP UNTIL change
diff --git a/source/qb64.bas b/source/qb64.bas
index c627c1b7d..28d18081b 100644
--- a/source/qb64.bas
+++ b/source/qb64.bas
@@ -921,8 +921,8 @@ gl_scan_header
 '-----------------------QB64 COMPILER ONCE ONLY SETUP CODE ENDS HERE---------------------------------------
 
 IF NoIDEMode THEN IDE_AutoPosition = 0: GOTO noide
-'DIM FileDropEnabled AS _BYTE
-'IF FileDropEnabled = 0 THEN FileDropEnabled = -1: _ACCEPTFILEDROP
+DIM FileDropEnabled AS _BYTE
+IF FileDropEnabled = 0 THEN FileDropEnabled = -1: _ACCEPTFILEDROP
 
 IF IDE_AutoPosition AND NOT IDE_BypassAutoPosition THEN _SCREENMOVE IDE_LeftPosition, IDE_TopPosition
 idemode = 1