anchor.diff:            // Currently we will just replace any 'embedded' cursor with our
             // blank (transparent) image otherwise we sometimes get 2 cursors ...
             ImageList_SetDragCursorImage(FImages.Handle, 0, FImageHotSpot.x, FImageHotSpot.y);
  -          with ClientPtToWindowPt(FTarget.Handle, ClientPt) do
  -            ImageList_DragEnter(FTarget.handle, x, y);
  +          if FTarget = nil then begin
  +            with ClientPtToWindowPt(FWinTarget, ClientPt) do
  +              ImageList_DragEnter(FWinTarget, x, y);
  +          end else
  +            with ClientPtToWindowPt(FTarget.Handle, ClientPt) do
  +              ImageList_DragEnter(FTarget.handle, x, y);
           end;
         end;
       end else
  
positive.code: *)
  end;
  
  resourcestring
    sRichEditWarning =
      'It is strongly recommended that you set the AutoRegister'+#13+
  
negative.code: // Copyright         1997-1999 Angus Johnson & Anders Melander
  //                   2000-2010 Anders Melander
  //                   2011-2014 Sven Harazim
  // Changes          Add WinTarget property for running without TWinControl Target
  //                  04.09.2014 by Manfred Suesens DUERR Systems GmbH
  // -----------------------------------------------------------------------------
  
  interface
  