summaryrefslogtreecommitdiff
path: root/src/corelib/x11/fpg_x11.pas
diff options
context:
space:
mode:
Diffstat (limited to 'src/corelib/x11/fpg_x11.pas')
-rw-r--r--src/corelib/x11/fpg_x11.pas3
1 files changed, 3 insertions, 0 deletions
diff --git a/src/corelib/x11/fpg_x11.pas b/src/corelib/x11/fpg_x11.pas
index 1bebb2cf..d776a7e1 100644
--- a/src/corelib/x11/fpg_x11.pas
+++ b/src/corelib/x11/fpg_x11.pas
@@ -3371,6 +3371,9 @@ end;
destructor TfpgX11Drag.Destroy;
begin
FSource.MouseCursor := mcDefault;
+ XDeleteProperty(xapplication.Display, FSource.WinHandle, xapplication.XdndAware);
+ XDeleteProperty(xapplication.Display, FSource.WinHandle, xapplication.XdndTypeList);
+ SetLength(FMimeTypesArray, 0);
inherited Destroy;
end;