diff options
Diffstat (limited to 'src/corelib/gdi/fpg_gdi.pas')
| -rw-r--r-- | src/corelib/gdi/fpg_gdi.pas | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/corelib/gdi/fpg_gdi.pas b/src/corelib/gdi/fpg_gdi.pas index e85d81e3..6f95d8a8 100644 --- a/src/corelib/gdi/fpg_gdi.pas +++ b/src/corelib/gdi/fpg_gdi.pas @@ -2845,7 +2845,9 @@ begin lIsTranslated := False; {$Note OLE DND: We are only handling strings at the moment, this needs to be extended to other types too } itm := FMimeData[i]; + {$IFDEF DND_DEBUG} writeln(' Processing mime-type: ', itm.Format); + {$ENDIF} { description of data we are sending } New(F); |