Update ShelfPane.xaml.cs

Author: d2dyno1

src/Files.App/UserControls/Pane/ShelfPane.xaml.cs

@@ -77,20 +77,18 @@ private void ListView_DragItemsStarting(object sender, DragItemsStartingEventArg
             if (apidl is null)
                 return;
 
-            if (!Shell32.SHCreateDataObject(null, apidl, null, out var ppDataObject).Succeeded)
-	            return;
+            if (!Shell32.SHGetDesktopFolder(out var pDesktop).Succeeded)
+				return;
 
-            e.Data.Properties["Files_ActionBinder"] = "Files_ShelfBinder";
+            if (!Shell32.SHGetIDListFromObject(pDesktop, out var pDesktopPidl).Succeeded)
+				return;
 
-			// TODO: Format is set correctly, but no items are present
-			ppDataObject.SetData(StandardDataFormats.StorageItems, apidl);
+            e.Data.Properties["Files_ActionBinder"] = "Files_ShelfBinder";
+			if (!Shell32.SHCreateDataObject(pDesktopPidl, apidl, null, out var ppDataObject).Succeeded)
+				return;
 
 			var dataObjectProvider = e.Data.As<Shell32.IDataObjectProvider>();
 			dataObjectProvider.SetDataObject(ppDataObject);
-
-
-            //var obj = new ShellDataObject();
-            //ppDataObject.SetData(StandardDataFormats.StorageItems, obj);
 		}
 
 		public IList<ShelfItem>? ItemsSource