diff --git a/lcl/interfaces/qt/qtwidgets.pas b/lcl/interfaces/qt/qtwidgets.pas
index 74072d3561..52023e2ee8 100644
--- a/lcl/interfaces/qt/qtwidgets.pas
+++ b/lcl/interfaces/qt/qtwidgets.pas
@@ -2357,7 +2357,7 @@ begin
     for i := 0 to QStringList_size(QStrList) - 1 do
     begin
       QStringList_at(QStrList, @WStr, i);
-      GotFiles := WStr = 'text/uri-list';
+      GotFiles := WStr = 'text/plain';
       if GotFiles then
         break;
     end;