Tracing (changing to non-ready drive)

Source commit: ad33b8ba9a3c3ef88010b39b8c66fb3902029bf0

source/packages/filemng/DriveView.pas

@@ -980,7 +980,9 @@ begin
     end;
 
     if Result and (csDestroying in ComponentState) then
+    begin
       Result := False;
+    end;
 
     if Result and
        (not FCanChange) and
@@ -993,7 +995,9 @@ begin
       Result := False;
     end
       else
-    DropTarget := nil;
+    begin
+      DropTarget := nil;
+    end;
   end;
 end; {CanChange}