TDragRec = record
  Pos: TPoint;
  Source: TDragObject;
  Target: Pointer;
  Docking: Boolean;
end;

struct TDragRec {
  TPoint Pos;
  TDragObject Source;
  void * Target;
  Boolean Docking;
};