wxOil/sgldrag.cpp

   1 // $Id: sgldrag.cpp 1282 2006-06-09 09:46:49Z alex $
   2 /* @@tag:xara-cn@@ DO NOT MODIFY THIS LINE
   3 ================================XARAHEADERSTART===========================
   4
   5                Xara LX, a vector drawing and manipulation program.
   6                     Copyright (C) 1993-2006 Xara Group Ltd.
   7        Copyright on certain contributions may be held in joint with their
   8               respective authors. See AUTHORS file for details.
   9
  10 LICENSE TO USE AND MODIFY SOFTWARE
  11 ----------------------------------
  12
  13 This file is part of Xara LX.
  14
  15 Xara LX is free software; you can redistribute it and/or modify it
  16 under the terms of the GNU General Public License version 2 as published
  17 by the Free Software Foundation.
  18
  19 Xara LX and its component source files are distributed in the hope
  20 that it will be useful, but WITHOUT ANY WARRANTY; without even the
  21 implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
  22 See the GNU General Public License for more details.
  23
  24 You should have received a copy of the GNU General Public License along
  25 with Xara LX (see the file GPL in the root directory of the
  26 distribution); if not, write to the Free Software Foundation, Inc., 51
  27 Franklin St, Fifth Floor, Boston, MA  02110-1301 USA
  28
  29
  30 ADDITIONAL RIGHTS
  31 -----------------
  32
  33 Conditional upon your continuing compliance with the GNU General Public
  34 License described above, Xara Group Ltd grants to you certain additional
  35 rights.
  36
  37 The additional rights are to use, modify, and distribute the software
  38 together with the wxWidgets library, the wxXtra library, and the "CDraw"
  39 library and any other such library that any version of Xara LX relased
  40 by Xara Group Ltd requires in order to compile and execute, including
  41 the static linking of that library to XaraLX. In the case of the
  42 "CDraw" library, you may satisfy obligation under the GNU General Public
  43 License to provide source code by providing a binary copy of the library
  44 concerned and a copy of the license accompanying it.
  45
  46 Nothing in this section restricts any of the rights you have under
  47 the GNU General Public License.
  48
  49
  50 SCOPE OF LICENSE
  51 ----------------
  52
  53 This license applies to this program (XaraLX) and its constituent source
  54 files only, and does not necessarily apply to other Xara products which may
  55 in part share the same code base, and are subject to their own licensing
  56 terms.
  57
  58 This license does not apply to files in the wxXtra directory, which
  59 are built into a separate library, and are subject to the wxWindows
  60 license contained within that directory in the file "WXXTRA-LICENSE".
  61
  62 This license does not apply to the binary libraries (if any) within
  63 the "libs" directory, which are subject to a separate license contained
  64 within that directory in the file "LIBS-LICENSE".
  65
  66
  67 ARRANGEMENTS FOR CONTRIBUTION OF MODIFICATIONS
  68 ----------------------------------------------
  69
  70 Subject to the terms of the GNU Public License (see above), you are
  71 free to do whatever you like with your modifications. However, you may
  72 (at your option) wish contribute them to Xara's source tree. You can
  73 find details of how to do this at:
  74   http://www.xaraxtreme.org/developers/
  75
  76 Prior to contributing your modifications, you will need to complete our
  77 contributor agreement. This can be found at:
  78   http://www.xaraxtreme.org/developers/contribute/
  79
  80 Please note that Xara will not accept modifications which modify any of
  81 the text between the start and end of this header (marked
  82 XARAHEADERSTART and XARAHEADEREND).
  83
  84
  85 MARKS
  86 -----
  87
  88 Xara, Xara LX, Xara X, Xara X/Xtreme, Xara Xtreme, the Xtreme and Xara
  89 designs are registered or unregistered trademarks, design-marks, and/or
  90 service marks of Xara Group Ltd. All rights in these marks are reserved.
  91
  92
  93       Xara Group Ltd, Gaddesden Place, Hemel Hempstead, HP2 6EX, UK.
  94                         http://www.xara.com/
  95
  96 =================================XARAHEADEREND============================
  97  */
  98 // sgldrag.cpp - Line gallery item dragging
  99
 100 #include "camtypes.h"
 101
 102 #include "sgldrag.h"
 103 #include "dragmgr.h"
 104 #include "dragbmp.h"
 105 //#include "viewrc.h"
 106 //#include "resource.h"
 107 #include "camview.h"
 108 //#include "docview.h" - in camtypes.h [AUTOMATICALLY REMOVED]
 109 //#include "spread.h" - in camtypes.h [AUTOMATICALLY REMOVED]
 110 //#include "attrmgr.h" - in camtypes.h [AUTOMATICALLY REMOVED]
 111 #include "grndbmp.h"
 112 #include "nodepath.h"
 113 #include "lineattr.h"
 114 #include "sgline.h"
 115 #include "osrndrgn.h"
 116
 117 //#include "richard2.h" // string resources
 118
 119 // Implement the dynamic class bits...
 120 CC_IMPLEMENT_DYNCREATE(GalleryLineDragInfo, BitmapDragInformation)
 121 CC_IMPLEMENT_DYNAMIC(SGLineDragTarget, SGListDragTarget);
 122
 123 // This line mustn't go before any CC_IMPLEMENT_... macros
 124 #define new CAM_DEBUG_NEW
 125
 126 // This determines where, if at all, the text description of a dragged line gallery item
 127 // will be displayed.
 128 const LineAttrItem::TextPosition c_eLineAttrDragTextPos = LineAttrItem::NO_LABEL;
 129
 130
 131 /********************************************************************************************
 132
 133 >       SGLineDragTarget::SGLineDragTarget(DialogOp *TheDialog, CGadgetID TheGadget = NULL)
 134
 135         Author:         Will_Cowling (Xara Group Ltd) <camelotdev@xara.com>
 136         Created:        10/4/95
 137         Inputs:         TheDialog - The kernel dialog in which the target exists
 138                                 TheGadget - The gadget within that dialogue which is the target
 139
 140         Purpose:        Constructor
 141
 142 ********************************************************************************************/
 143
 144 SGLineDragTarget::SGLineDragTarget(DialogOp *TheDialog, CGadgetID TheGadget)
 145                                         : SGListDragTarget(TheDialog, TheGadget)
 146 {
 147         ERROR3IF(!TheDialog->IsKindOf(CC_RUNTIME_CLASS(LineGallery)),
 148                         "You can only use SGLineDragTargets with LineGallery dialogues!");
 149 }
 150
 151
 152
 153 /********************************************************************************************
 154
 155         BOOL SGLineDragTarget::ProcessEvent(DragEventType Event, DragInformation *pDragInfo,
 156                                                                                         OilCoord *pMousePos, KeyPress* pKeyPress)
 157
 158         Author:         Will_Cowling (Xara Group Ltd) <camelotdev@xara.com>
 159         Created:        10/4/95
 160         Inputs:         Event - Indicates what has happened
 161                                 pDragInfo - points to drag information describing this drag. This
 162                                 should be a BitmapDragInformation or derivation thereof
 163                                 pMousePos - points to information on the current mouse position, in OIL coords
 164                                 pKeyPress - NULL, or if for a keypress event, keypress information
 165
 166         Returns:        TRUE to claim the event, FALSE to let it through to other targets
 167
 168         Purpose:        Event Handler for SuperGallery listitem drag events. Overrides the
 169                                 base class handler to enable it to sort out the node being dragged
 170                                 for Line drags.
 171
 172 ********************************************************************************************/
 173
 174 BOOL SGLineDragTarget::ProcessEvent(DragEventType Event, DragInformation *pDragInfo,
 175                                                                                 OilCoord *pMousePos, KeyPress* pKeyPress)
 176 {
 177         if (!pDragInfo->IsKindOf(CC_RUNTIME_CLASS(GalleryLineDragInfo)))
 178                 return(FALSE);
 179
 180         SGDisplayNode *DraggedNode = NULL;
 181         BOOL IsSimpleBitmapDrag = TRUE;
 182
 183         if (IS_A(pDragInfo, GalleryLineDragInfo))
 184         {
 185                 DraggedNode = ((GalleryLineDragInfo *)pDragInfo)->GetDraggedLineAttr();
 186         }
 187
 188         if (DraggedNode != NULL)
 189         {
 190                 switch(Event)
 191                 {
 192                         case DRAGEVENT_COMPLETED:
 193                                 HandleDragCompleted((SuperGallery *) TargetDialog,
 194                                                                         DraggedNode, pMousePos, IsSimpleBitmapDrag);
 195                                 return(TRUE);
 196
 197
 198                         case DRAGEVENT_MOUSESTOPPED:
 199                         case DRAGEVENT_MOUSEMOVED:
 200                         case DRAGEVENT_MOUSEIDLE:
 201                                 // Call a subroutine to work out and set our current cursor shape
 202                                 return(DetermineCursorShape((SuperGallery *) TargetDialog,
 203                                                                                         DraggedNode, pMousePos));
 204                         default:
 205                                 break;
 206                 }
 207         }
 208
 209         // Otherwise, we aren't interested in the event, so we don't claim it
 210         return(FALSE);
 211 }
 212
 213 /********************************************************************************************
 214
 215 >       void GalleryLineDragInfo::GalleryLineDragInfo()
 216
 217         Author:         Will_Cowling (Xara Group Ltd) <camelotdev@xara.com>
 218         Created:        10/4/95
 219
 220         Purpose:        Default constructor - do not call this constructor
 221
 222 ********************************************************************************************/
 223
 224 GalleryLineDragInfo::GalleryLineDragInfo()
 225 {
 226         ERROR3("Default GalleryLineDragInfo constructor called");
 227 }
 228
 229
 230
 231 /********************************************************************************************
 232
 233 >       GalleryLineDragInfo::GalleryLineDragInfo(LineAttrItem *pSourceItem,
 234                                                                                         SGMouseInfo *pMouseInfo, SGMiscInfo *pMiscInfo,
 235                                                                                         BOOL IsAdjust = FALSE)
 236
 237         Author:         Will_Cowling (Xara Group Ltd) <camelotdev@xara.com>
 238         Created:        10/4/95
 239
 240         Inputs:         pSourceItem - The gallery item from which the drag originated
 241                                 pMouseInfo      - The mouse info which made the item start the drag
 242                                 pMiscInfo       - The MiscInfo which accompanied the mouse event
 243                                 IsAdjust        - TRUE if this is an adjust (line-Bitmap) drag
 244
 245         Purpose:        Constructor
 246
 247 ********************************************************************************************/
 248
 249 GalleryLineDragInfo::GalleryLineDragInfo(LineAttrItem *pSourceItem,
 250                                                                                         SGMouseInfo *pMouseInfo, SGMiscInfo *pMiscInfo,
 251                                                                                         BOOL IsAdjust)
 252                                           : BitmapDragInformation(NULL, 100,50,0,0,
 253                                                                                                 IsAdjust)
 254 {
 255         SourceItem      = pSourceItem;  // Copy the source item pointer
 256
 257         pAttr           = SourceItem->CreateNewAttribute(IsAdjust);
 258
 259         MouseInfo       = *pMouseInfo;  // Duplicate the structures (they may cease to exist
 260         MiscInfo        = *pMiscInfo;   // soon after the drag is started)
 261 }
 262
 263 /********************************************************************************************
 264
 265 >       GalleryLineDragInfo::~GalleryLineDragInfo()
 266
 267         Author:         Will_Cowling (Xara Group Ltd) <camelotdev@xara.com>
 268         Created:        10/4/95
 269
 270         Purpose:        Destructor. Deletes the dragged bitmap.
 271
 272 ********************************************************************************************/
 273
 274 GalleryLineDragInfo::~GalleryLineDragInfo()
 275 {
 276         if (TheBitmap != NULL)
 277         {
 278                 delete TheBitmap;
 279                 TheBitmap = NULL;
 280         }
 281
 282         if (pAttr != NULL)
 283                 delete pAttr;
 284 }
 285
 286 /********************************************************************************************
 287
 288 >       void GalleryLineDragInfo::OnClick(INT32 Flags,POINT Point)
 289
 290         Author:         Will_Cowling (Xara Group Ltd) <camelotdev@xara.com>
 291         Created:        10/4/95
 292         Inputs:         -
 293         Outputs:        -
 294         Returns:        -
 295         Purpose:        This is called if a drag was attempted but never started because it was a
 296                                 click all along. It calls back the SourceItem SGDisplayLine, to get it
 297                                 to handle the click.
 298         Errors:         -
 299         SeeAlso:        -
 300
 301 ********************************************************************************************/
 302
 303 void GalleryLineDragInfo::OnClick(INT32 Flags ,POINT Point)
 304 {
 305         if (SourceItem != NULL)
 306                 SourceItem->DragWasReallyAClick(&MouseInfo, &MiscInfo);
 307 }
 308
 309 /********************************************************************************************
 310
 311 >       void GalleryLineDragInfo::GetCursorID(DragTarget* pDragTarget)
 312
 313         Author:         Will_Cowling (Xara Group Ltd) <camelotdev@xara.com>
 314         Created:        10/4/95
 315         Purpose:        Set cursor over this target
 316
 317
 318 ********************************************************************************************/
 319
 320 UINT32 GalleryLineDragInfo::GetCursorID(DragTarget* pDragTarget)
 321 {
 322         if (pDragTarget && pDragTarget->IS_KIND_OF(ViewDragTarget))
 323         {
 324                 PageDropInfo PageDropInfo;
 325                 ((ViewDragTarget*)pDragTarget)->GetDropInfo(&PageDropInfo);
 326
 327                 NodeRenderableInk* pObjectHit   = PageDropInfo.pObjectHit;
 328                 ObjectDragTarget TargetHit              = PageDropInfo.TargetHit;
 329
 330                 if (IS_A(pAttr, AttrStartArrow) || IS_A(pAttr, AttrEndArrow))
 331                 {
 332                         if (pObjectHit && pObjectHit->IS_KIND_OF(NodePath))
 333                         {
 334                                 Path* pPath = &((NodePath*)pObjectHit)->InkPath;
 335                                 BOOL IsStart;
 336                                 if (DropStartOrEndArrow(pPath, PageDropInfo.DropPos, &IsStart))
 337                                 {
 338                                         TargetHit = IsStart ? STARTCOL_TARGET : ENDCOL_TARGET;
 339                                 }
 340                         }
 341                 }
 342
 343                 ClickModifiers ClickMods = ClickModifiers::GetClickModifiers();
 344                 BOOL IsInside = ClickMods.Constrain;
 345
 346                 if (!IsInside && pObjectHit && pObjectHit->IsCompound())
 347                 {
 348                         TargetHit = MANY_TARGET;
 349                 }
 350
 351                 switch (TargetHit)
 352                 {
 353                         case FILL_TARGET:
 354                                 return IsInside ? _R(IDC_DROPINSIDEONLINE) : _R(IDC_CANDROPONLINE);
 355                         case LINE_TARGET:
 356                                 return IsInside ? _R(IDC_DROPINSIDEONLINE) : _R(IDC_CANDROPONLINE);
 357                         case STARTCOL_TARGET:
 358                                 return IsInside ? _R(IDC_DROPINSIDEONFILLSTART) : _R(IDC_CANDROPONFILLSTART);
 359                         case ENDCOL_TARGET:
 360                                 return IsInside ? _R(IDC_DROPINSIDEONFILLEND) : _R(IDC_CANDROPONFILLEND);
 361                         case MANY_TARGET:
 362                                 return IsInside ? _R(IDC_DROPINSIDEONLINE) : _R(IDC_CANDROPONLINE);
 363
 364                         case NO_TARGET:
 365                                 return _R(IDC_CANDROPONPAGE);
 366                         default:
 367                                 break;
 368                 };
 369
 370                 return _R(IDC_CANDROPONPAGE);
 371         }
 372
 373         return _R(IDC_CANTDROP);
 374 }
 375
 376 /********************************************************************************************
 377
 378 >       virtual BOOL GalleryLineDragInfo::GetStatusLineText(String_256 * TheText, DragTarget* pDragTarget)
 379
 380         Author:         Will_Cowling (Xara Group Ltd) <camelotdev@xara.com>
 381         Created:        10/4/95
 382         Returns:        Whether String is valid
 383         Purpose:        provide status line text for this target
 384
 385 ********************************************************************************************/
 386
 387 BOOL GalleryLineDragInfo::GetStatusLineText(String_256 * TheText, DragTarget* pDragTarget)
 388 {
 389         ERROR2IF(TheText==NULL,FALSE,"NULL string in GetStatusLineText()");
 390
 391         if (TheBitmap == NULL || TheBitmap->ActualBitmap == NULL)
 392                 return FALSE;
 393
 394         String_256 DragString(_R(IDS_SGLDRAG_DRAG_LINE_ATTR)); // "Dragging line attribute"
 395         DragString += String_8(_R(IDS_SGDFONTS_STAT_COLON_SEP)); //" : ";
 396
 397         if (pDragTarget && pDragTarget->IS_KIND_OF(ViewDragTarget))
 398         {
 399                 PageDropInfo PageDropInfo;
 400                 ((ViewDragTarget*)pDragTarget)->GetDropInfo(&PageDropInfo);
 401
 402                 NodeRenderableInk* pObjectHit   = PageDropInfo.pObjectHit;
 403                 ObjectDragTarget TargetHit              = PageDropInfo.TargetHit;
 404
 405                 String_256 ObjectDesc = _R(IDS_SGLDRAG_THIS_OBJECT); // " this object";
 406
 407                 if (pObjectHit)
 408                 {
 409                         ObjectDesc = pObjectHit->Describe(FALSE);
 410                 }
 411
 412                 ClickModifiers ClickMods = ClickModifiers::GetClickModifiers();
 413                 BOOL IsInside = ClickMods.Constrain;
 414
 415                 if (!IsInside && pObjectHit && pObjectHit->IsCompound())
 416                 {
 417                         TargetHit = MANY_TARGET;
 418                 }
 419
 420                 switch (TargetHit)
 421                 {
 422                         case FILL_TARGET:
 423                         case LINE_TARGET:
 424                         case STARTCOL_TARGET:
 425                         case ENDCOL_TARGET:
 426                                 DragString += String_64(_R(IDS_SGLDRAG_DROP_TO_APPLY)); // "Drop to apply this attribute to this ";
 427                                 DragString += ObjectDesc;
 428                                 if (IsInside)
 429                                         DragString += String_64(_R(IDS_SGLDRAG_SPACE_ALONE)); // " alone";
 430                                 break;
 431
 432                         case MANY_TARGET:
 433                                 DragString += String_64(_R(IDS_SGLDRAG_DROP_TO_APPLY)); // "Drop to apply this attribute to this ";
 434                                 DragString += ObjectDesc;
 435                                 DragString += String_64(_R(IDS_SGLDRAG_CONTROL_DROP_INSIDE)); // "; Press 'Control' to drop 'Inside'";
 436                                 break;
 437
 438                         case NO_TARGET:
 439                                 DragString += String_64(_R(IDS_SGLDRAG_DROP_CURRENT_ATTRIBUTE)); // "Drop to set the Current Attribute";
 440                                 break;
 441                         default:
 442                                 break;
 443                 };
 444
 445                 *TheText = DragString;
 446                 return TRUE;
 447         }
 448
 449         return FALSE;
 450 }
 451
 452 /********************************************************************************************
 453
 454 >       BOOL GalleryBitmapDragInfo::OnPageDrop(ViewDragTarget* pDragTarget)
 455
 456         Author:         Will_Cowling (Xara Group Ltd) <camelotdev@xara.com>
 457         Created:        10/4/95
 458         Inputs:         -
 459         Outputs:        -
 460         Returns:        -
 461         Purpose:        Called when a Line Attr is dropped onto the page.
 462         Errors:         -
 463         SeeAlso:        -
 464
 465 ********************************************************************************************/
 466
 467 BOOL GalleryLineDragInfo::OnPageDrop(ViewDragTarget* pDragTarget)
 468 {
 469         PageDropInfo PageDropInfo;
 470         ((ViewDragTarget*)pDragTarget)->GetDropInfo(&PageDropInfo);
 471         NodeRenderableInk* pObjectHit = PageDropInfo.pObjectHit;
 472
 473         NodeAttribute* Attrib = SourceItem->CreateNewAttribute(IsAnAdjustDrag());
 474
 475         if (Attrib == NULL)
 476                 return FALSE;
 477
 478         if (pObjectHit && (IS_A(Attrib, AttrStartArrow) || IS_A(Attrib, AttrEndArrow)))
 479         {
 480                 if (!pObjectHit->IS_KIND_OF(NodePath))
 481                 {
 482                         delete Attrib;
 483                         return FALSE;
 484                 }
 485
 486                 Path* pPath = &((NodePath*)pObjectHit)->InkPath;
 487                 BOOL IsStart;
 488
 489                 if (!DropStartOrEndArrow(pPath, PageDropInfo.DropPos, &IsStart))
 490                 {
 491                         delete Attrib;
 492                         return FALSE;
 493                 }
 494
 495                 Attrib = MakeStartOrEndArrow(Attrib, IsStart);
 496         }
 497
 498         if (pObjectHit)
 499         {
 500                 // Hit a Line Object, so apply attribute to it
 501                 AttributeManager::ApplyAttribToNode(pObjectHit, Attrib);
 502         }
 503         else
 504         {
 505                 // Didn't hit anything, so just set the current attribute
 506                 AttributeManager::AttributeSelected(Attrib);
 507         }
 508
 509         return TRUE;
 510 }
 511
 512
 513 /********************************************************************************************
 514
 515 >       INT32 GalleryLineDragInfo::GetDragTransparency()
 516
 517         Author:         Will_Cowling (Xara Group Ltd) <camelotdev@xara.com>
 518         Created:        10/4/95
 519         Returns:        -
 520         Purpose:        Specifies how transparent a drag should be.
 521                                 A value of 0, will cause a normal solid blit.
 522                                 Any other value (between 0 and 100), will cause a masked blit.
 523         SeeAlso:        -
 524
 525 ********************************************************************************************/
 526
 527 INT32 GalleryLineDragInfo::GetDragTransparency()
 528 {
 529 //      if (IS_A(pAttr, AttrStartArrow) || IS_A(pAttr, AttrEndArrow))
 530 //              return 50;
 531
 532         return 50;
 533 }
 534
 535 /********************************************************************************************
 536
 537 >       KernelBitmap* GalleryLineDragInfo::GetSolidDragMask()
 538
 539         Author:         Will_Cowling (Xara Group Ltd) <camelotdev@xara.com>
 540         Created:        10/4/95
 541         Returns:        -
 542         Purpose:        Makes a 1bpp KernelBitmap mask for the solid drag.
 543         SeeAlso:        -
 544
 545 ********************************************************************************************/
 546
 547 KernelBitmap* GalleryLineDragInfo::GetSolidDragMask()
 548 {
 549         // Note we abuse this call (like our base class abuses this call) to create the bitmap
 550         // itself. We don't use DragMask itself anymore (i.e. it stays NULL)
 551         if (!DragMask && !TheBitmap)
 552         {
 553                 DocView *View = DocView::GetCurrent();
 554                 if (View == NULL)
 555                 {
 556                         return NULL;
 557                 }
 558
 559                 Spread *pSpread = View->FindEnclosingSpread(OilCoord(0,0));
 560                 if (pSpread == NULL)
 561                 {
 562                         return NULL;
 563                 }
 564
 565                 // Find the size of the rendered item.
 566                 DocRect ClipRegion(0,0, 750*100, 750*50);
 567 //              ClipRegion.lo.x = ClipRegion.lo.y = 0;
 568 //              SourceItem->GetSize(c_eLineAttrDragTextPos, &ClipRegion.hi.x, &ClipRegion.hi.y);
 569                 Matrix ConvertMatrix;
 570                 FIXED16 ViewScale = 1;
 571
 572                 wxScreenDC DisplayDC;
 573                 double dpi = (double) OSRenderRegion::GetFixedDCPPI(DisplayDC).GetWidth();
 574
 575                 GRenderBitmap* pMaskRegion      = new GRenderBitmap(ClipRegion, ConvertMatrix, ViewScale,
 576                                                                                                                 32, dpi);
 577
 578                 pMaskRegion->SetDoCompression(TRUE); // misnamed call to indicate we want transparency
 579                 pMaskRegion->AttachDevice(View, &DisplayDC, pSpread);
 580
 581                 // Make a Mask Bitmap
 582                 pMaskRegion->StartRender();
 583                 SourceItem->Render(pMaskRegion, ClipRegion, c_eLineAttrDragTextPos);
 584                 pMaskRegion->StopRender();
 585
 586                 OILBitmap* pOilMaskBmp = pMaskRegion->ExtractBitmap();
 587                 TheBitmap = new KernelBitmap(pOilMaskBmp, TRUE);
 588
 589                 delete pMaskRegion;
 590         }
 591
 592         return BitmapDragInformation::GetSolidDragMask();
 593 }
 594
 595 /********************************************************************************************
 596
 597 >       BOOL GalleryLineDragInfo::DropStartOrEndArrow(Path* pPathHit, DocCoord DropPos,
 598                                                                                           BOOL* IsStart)
 599
 600         Author:         Will_Cowling (Xara Group Ltd) <camelotdev@xara.com>
 601         Created:        10/4/95
 602         Returns:        -
 603         Purpose:        Checks to see whether the arrow was dropped nearer to the start or end of
 604                                 a path.
 605         SeeAlso:        -
 606
 607 ********************************************************************************************/
 608
 609 BOOL GalleryLineDragInfo::DropStartOrEndArrow(Path* pPathHit, DocCoord DropPos,
 610                                                                                           BOOL* IsStart)
 611 {
 612         double NearestDist = -1;
 613         BOOL GotNearest = FALSE;
 614         BOOL NearestIsStart = FALSE;
 615
 616         DocCoord* Coords = pPathHit->GetCoordArray();
 617         PathVerb* Verbs  = pPathHit->GetVerbArray();
 618         INT32 NumCoords   = pPathHit->GetNumCoords();
 619
 620         DocCoord ArrowCentre;
 621         DocCoord ArrowDirection;
 622
 623         INT32 PathIndex = 0;
 624
 625         // Find the first position of an ArrowHead
 626         BOOL GotPos = ArrowRec::GetFirstArrowPos(TRUE,
 627                                                                                          Coords, Verbs, NumCoords,
 628                                                                                          &PathIndex, &ArrowCentre, &ArrowDirection);
 629         while (GotPos)
 630         {
 631                 double Dist = ArrowCentre.Distance(DropPos);
 632
 633                 if (NearestDist == -1 || Dist < NearestDist)
 634                 {
 635                         NearestDist = Dist;
 636                         GotNearest = TRUE;
 637                         NearestIsStart = TRUE;
 638                 }
 639
 640                 // Find the next Arrow position (if there are any more subpaths)
 641                 GotPos = ArrowRec::GetNextArrowPos(TRUE,
 642                                                                                    Coords, Verbs, NumCoords,
 643                                                                            &PathIndex, &ArrowCentre, &ArrowDirection);
 644         }
 645
 646         // Now test all the end positions
 647         PathIndex = 0;
 648
 649         // Find the first position of an ArrowHead
 650         GotPos = ArrowRec::GetFirstArrowPos(FALSE,
 651                                                                                  Coords, Verbs, NumCoords,
 652                                                                                  &PathIndex, &ArrowCentre, &ArrowDirection);
 653         while (GotPos)
 654         {
 655                 double Dist = ArrowCentre.Distance(DropPos);
 656
 657                 if (NearestDist == -1 || Dist < NearestDist)
 658                 {
 659                         NearestDist = Dist;
 660                         GotNearest = TRUE;
 661                         NearestIsStart = FALSE;
 662                 }
 663
 664                 // Find the next Arrow position (if there are any more subpaths)
 665                 GotPos = ArrowRec::GetNextArrowPos(FALSE,
 666                                                                                    Coords, Verbs, NumCoords,
 667                                                                            &PathIndex, &ArrowCentre, &ArrowDirection);
 668         }
 669
 670         if (GotNearest)
 671                 *IsStart = NearestIsStart;
 672
 673         return GotNearest;
 674 }
 675
 676 /********************************************************************************************
 677
 678 >       NodeAttribute* GalleryLineDragInfo::MakeStartOrEndArrow(NodeAttribute* pArrowAttr, BOOL Start)
 679
 680         Author:         Will_Cowling (Xara Group Ltd) <camelotdev@xara.com>
 681         Created:        10/4/95
 682         Returns:        -
 683         Purpose:        Makes a Start or End arrow depending on where the arrow was dropped.
 684         SeeAlso:        -
 685
 686 ********************************************************************************************/
 687
 688 NodeAttribute* GalleryLineDragInfo::MakeStartOrEndArrow(NodeAttribute* pArrowAttr, BOOL Start)
 689 {
 690         ArrowRec Arrow;
 691         NodeAttribute* NewAttr;
 692
 693         if (IS_A(pArrowAttr, AttrStartArrow))
 694         {
 695                 Arrow = ((AttrStartArrow*)pArrowAttr)->Value.StartArrow;
 696         }
 697         else
 698         {
 699                 Arrow = ((AttrEndArrow*)pArrowAttr)->Value.EndArrow;
 700         }
 701
 702         if (Start)
 703         {
 704                 NewAttr = new AttrStartArrow();
 705                 ((AttrStartArrow*)NewAttr)->Value.StartArrow = Arrow;
 706         }
 707         else
 708         {
 709                 NewAttr = new AttrEndArrow();
 710                 ((AttrEndArrow*)NewAttr)->Value.EndArrow = Arrow;
 711         }
 712
 713         delete pArrowAttr;
 714         return NewAttr;
 715 }