Source position: system.uitypes.pp line 437
type TDragMessage = (
dmDragEnter,
dmDragLeave,
dmDragMove,
dmDragDrop,
dmDragCancel,
dmFindTarget
);