basctl/source/dlged/dlgedfunc.cxx

   1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
   2 /*
   3  * This file is part of the LibreOffice project.
   4  *
   5  * This Source Code Form is subject to the terms of the Mozilla Public
   6  * License, v. 2.0. If a copy of the MPL was not distributed with this
   7  * file, You can obtain one at http://mozilla.org/MPL/2.0/.
   8  *
   9  * This file incorporates work covered by the following license notice:
  10  *
  11  *   Licensed to the Apache Software Foundation (ASF) under one or more
  12  *   contributor license agreements. See the NOTICE file distributed
  13  *   with this work for additional information regarding copyright
  14  *   ownership. The ASF licenses this file to you under the Apache
  15  *   License, Version 2.0 (the "License"); you may not use this file
  16  *   except in compliance with the License. You may obtain a copy of
  17  *   the License at http://www.apache.org/licenses/LICENSE-2.0 .
  18  */
  19
  20 #include <vcl/scrbar.hxx>
  21 #include <svx/svdview.hxx>
  22 #include <dlgedfunc.hxx>
  23 #include <dlged.hxx>
  24 #include <dlgedview.hxx>
  25 #include <vcl/seleng.hxx>
  26
  27 namespace basctl
  28 {
  29
  30 IMPL_LINK_NOARG( DlgEdFunc, ScrollTimeout, Timer *, void )
  31 {
  32     vcl::Window& rWindow = rParent.GetWindow();
  33     Point aPos = rWindow.ScreenToOutputPixel( rWindow.GetPointerPosPixel() );
  34     aPos = rWindow.PixelToLogic( aPos );
  35     ForceScroll( aPos );
  36 }
  37
  38 void DlgEdFunc::ForceScroll( const Point& rPos )
  39 {
  40     aScrollTimer.Stop();
  41
  42     vcl::Window& rWindow  = rParent.GetWindow();
  43
  44     static Point aDefPoint;
  45     tools::Rectangle aOutRect( aDefPoint, rWindow.GetOutputSizePixel() );
  46     aOutRect = rWindow.PixelToLogic( aOutRect );
  47
  48     ScrollBar* pHScroll = rParent.GetHScroll();
  49     ScrollBar* pVScroll = rParent.GetVScroll();
  50     long nDeltaX = pHScroll->GetLineSize();
  51     long nDeltaY = pVScroll->GetLineSize();
  52
  53     if( !aOutRect.IsInside( rPos ) )
  54     {
  55         if( rPos.X() < aOutRect.Left() )
  56             nDeltaX = -nDeltaX;
  57         else if( rPos.X() <= aOutRect.Right() )
  58             nDeltaX = 0;
  59
  60         if( rPos.Y() < aOutRect.Top() )
  61             nDeltaY = -nDeltaY;
  62         else if( rPos.Y() <= aOutRect.Bottom() )
  63             nDeltaY = 0;
  64
  65         if( nDeltaX )
  66             pHScroll->SetThumbPos( pHScroll->GetThumbPos() + nDeltaX );
  67         if( nDeltaY )
  68             pVScroll->SetThumbPos( pVScroll->GetThumbPos() + nDeltaY );
  69
  70         if( nDeltaX )
  71             rParent.DoScroll();
  72         if( nDeltaY )
  73             rParent.DoScroll();
  74     }
  75
  76     aScrollTimer.Start();
  77 }
  78
  79 DlgEdFunc::DlgEdFunc (DlgEditor& rParent_) :
  80     rParent(rParent_)
  81 {
  82     aScrollTimer.SetInvokeHandler( LINK( this, DlgEdFunc, ScrollTimeout ) );
  83     aScrollTimer.SetTimeout( SELENG_AUTOREPEAT_INTERVAL );
  84 }
  85
  86 DlgEdFunc::~DlgEdFunc()
  87 {
  88 }
  89
  90 void DlgEdFunc::MouseButtonDown( const MouseEvent& )
  91 {
  92 }
  93
  94 bool DlgEdFunc::MouseButtonUp( const MouseEvent& )
  95 {
  96     aScrollTimer.Stop();
  97     return true;
  98 }
  99
 100 void DlgEdFunc::MouseMove( const MouseEvent& )
 101 {
 102 }
 103
 104 bool DlgEdFunc::KeyInput( const KeyEvent& rKEvt )
 105 {
 106     bool bReturn = false;
 107
 108     SdrView& rView = rParent.GetView();
 109     vcl::Window& rWindow = rParent.GetWindow();
 110
 111     vcl::KeyCode aCode = rKEvt.GetKeyCode();
 112     sal_uInt16 nCode = aCode.GetCode();
 113
 114     switch ( nCode )
 115     {
 116         case KEY_ESCAPE:
 117         {
 118             if ( rView.IsAction() )
 119             {
 120                 rView.BrkAction();
 121                 bReturn = true;
 122             }
 123             else if ( rView.AreObjectsMarked() )
 124             {
 125                 const SdrHdlList& rHdlList = rView.GetHdlList();
 126                 SdrHdl* pHdl = rHdlList.GetFocusHdl();
 127                 if ( pHdl )
 128                     const_cast<SdrHdlList&>(rHdlList).ResetFocusHdl();
 129                 else
 130                     rView.UnmarkAll();
 131
 132                 bReturn = true;
 133             }
 134         }
 135         break;
 136         case KEY_TAB:
 137         {
 138             if ( !aCode.IsMod1() && !aCode.IsMod2() )
 139             {
 140                 // mark next object
 141                 if ( !rView.MarkNextObj( !aCode.IsShift() ) )
 142                 {
 143                     // if no next object, mark first/last
 144                     rView.UnmarkAllObj();
 145                     rView.MarkNextObj( !aCode.IsShift() );
 146                 }
 147
 148                 if ( rView.AreObjectsMarked() )
 149                     rView.MakeVisible( rView.GetAllMarkedRect(), rWindow );
 150
 151                 bReturn = true;
 152             }
 153             else if ( aCode.IsMod1() )
 154             {
 155                 // selected handle
 156                 const SdrHdlList& rHdlList = rView.GetHdlList();
 157                 const_cast<SdrHdlList&>(rHdlList).TravelFocusHdl( !aCode.IsShift() );
 158
 159                 // guarantee visibility of focused handle
 160                 if (SdrHdl* pHdl = rHdlList.GetFocusHdl())
 161                 {
 162                     Point aHdlPosition( pHdl->GetPos() );
 163                     tools::Rectangle aVisRect( aHdlPosition - Point( 100, 100 ), Size( 200, 200 ) );
 164                     rView.MakeVisible( aVisRect, rWindow );
 165                 }
 166
 167                 bReturn = true;
 168             }
 169         }
 170         break;
 171         case KEY_UP:
 172         case KEY_DOWN:
 173         case KEY_LEFT:
 174         case KEY_RIGHT:
 175         {
 176             long nX = 0;
 177             long nY = 0;
 178
 179             if ( nCode == KEY_UP )
 180             {
 181                 // scroll up
 182                 nX =  0;
 183                 nY = -1;
 184             }
 185             else if ( nCode == KEY_DOWN )
 186             {
 187                 // scroll down
 188                 nX =  0;
 189                 nY =  1;
 190             }
 191             else if ( nCode == KEY_LEFT )
 192             {
 193                 // scroll left
 194                 nX = -1;
 195                 nY =  0;
 196             }
 197             else if ( nCode == KEY_RIGHT )
 198             {
 199                 // scroll right
 200                 nX =  1;
 201                 nY =  0;
 202             }
 203
 204             if ( rView.AreObjectsMarked() && !aCode.IsMod1() )
 205             {
 206                 if ( aCode.IsMod2() )
 207                 {
 208                     // move in 1 pixel distance
 209                     Size aPixelSize = rWindow.PixelToLogic(Size(1, 1));
 210                     nX *= aPixelSize.Width();
 211                     nY *= aPixelSize.Height();
 212                 }
 213                 else
 214                 {
 215                     // move in 1 mm distance
 216                     nX *= 100;
 217                     nY *= 100;
 218                 }
 219
 220                 const SdrHdlList& rHdlList = rView.GetHdlList();
 221                 SdrHdl* pHdl = rHdlList.GetFocusHdl();
 222
 223                 if ( pHdl == nullptr )
 224                 {
 225                     // no handle selected
 226                     if ( rView.IsMoveAllowed() )
 227                     {
 228                         // restrict movement to work area
 229                         const tools::Rectangle& rWorkArea = rView.GetWorkArea();
 230
 231                         if ( !rWorkArea.IsEmpty() )
 232                         {
 233                             tools::Rectangle aMarkRect( rView.GetMarkedObjRect() );
 234                             aMarkRect.Move( nX, nY );
 235
 236                             if ( !rWorkArea.IsInside( aMarkRect ) )
 237                             {
 238                                 if ( aMarkRect.Left() < rWorkArea.Left() )
 239                                     nX += rWorkArea.Left() - aMarkRect.Left();
 240
 241                                 if ( aMarkRect.Right() > rWorkArea.Right() )
 242                                     nX -= aMarkRect.Right() - rWorkArea.Right();
 243
 244                                 if ( aMarkRect.Top() < rWorkArea.Top() )
 245                                     nY += rWorkArea.Top() - aMarkRect.Top();
 246
 247                                 if ( aMarkRect.Bottom() > rWorkArea.Bottom() )
 248                                     nY -= aMarkRect.Bottom() - rWorkArea.Bottom();
 249                             }
 250                         }
 251
 252                         if ( nX != 0 || nY != 0 )
 253                         {
 254                             rView.MoveAllMarked( Size( nX, nY ) );
 255                             rView.MakeVisible( rView.GetAllMarkedRect(), rWindow );
 256                         }
 257                     }
 258                 }
 259                 else
 260                 {
 261                     // move the handle
 262                     if ( pHdl && ( nX || nY ) )
 263                     {
 264                         Point aStartPoint( pHdl->GetPos() );
 265                         Point aEndPoint( pHdl->GetPos() + Point( nX, nY ) );
 266                         const SdrDragStat& rDragStat = rView.GetDragStat();
 267
 268                         // start dragging
 269                         rView.BegDragObj( aStartPoint, nullptr, pHdl, 0 );
 270
 271                         if ( rView.IsDragObj() )
 272                         {
 273                             bool const bWasNoSnap = rDragStat.IsNoSnap();
 274                             bool const bWasSnapEnabled = rView.IsSnapEnabled();
 275
 276                             // switch snapping off
 277                             if ( !bWasNoSnap )
 278                                 const_cast<SdrDragStat&>(rDragStat).SetNoSnap();
 279                             if ( bWasSnapEnabled )
 280                                 rView.SetSnapEnabled(false);
 281
 282                             rView.MovAction( aEndPoint );
 283                             rView.EndDragObj();
 284
 285                             // restore snap
 286                             if ( !bWasNoSnap )
 287                                 const_cast<SdrDragStat&>(rDragStat).SetNoSnap( bWasNoSnap );
 288                             if ( bWasSnapEnabled )
 289                                 rView.SetSnapEnabled( bWasSnapEnabled );
 290                         }
 291
 292                         // make moved handle visible
 293                         tools::Rectangle aVisRect( aEndPoint - Point( 100, 100 ), Size( 200, 200 ) );
 294                         rView.MakeVisible( aVisRect, rWindow );
 295                     }
 296                 }
 297             }
 298             else
 299             {
 300                 // scroll page
 301                 ScrollBar* pScrollBar = ( nX != 0 ) ? rParent.GetHScroll() : rParent.GetVScroll();
 302                 if ( pScrollBar )
 303                 {
 304                     long nRangeMin = pScrollBar->GetRangeMin();
 305                     long nRangeMax = pScrollBar->GetRangeMax();
 306                     long nThumbPos = pScrollBar->GetThumbPos() + ( ( nX != 0 ) ? nX : nY ) * pScrollBar->GetLineSize();
 307                     if ( nThumbPos < nRangeMin )
 308                         nThumbPos = nRangeMin;
 309                     if ( nThumbPos > nRangeMax )
 310                         nThumbPos = nRangeMax;
 311                     pScrollBar->SetThumbPos( nThumbPos );
 312                     rParent.DoScroll();
 313                 }
 314             }
 315
 316             bReturn = true;
 317         }
 318         break;
 319         default:
 320         {
 321         }
 322         break;
 323     }
 324
 325     if ( bReturn )
 326         rWindow.ReleaseMouse();
 327
 328     return bReturn;
 329 }
 330
 331 DlgEdFuncInsert::DlgEdFuncInsert (DlgEditor& rParent_) :
 332     DlgEdFunc(rParent_)
 333 {
 334     rParent.GetView().SetCreateMode();
 335 }
 336
 337 DlgEdFuncInsert::~DlgEdFuncInsert()
 338 {
 339     rParent.GetView().SetEditMode();
 340 }
 341
 342 void DlgEdFuncInsert::MouseButtonDown( const MouseEvent& rMEvt )
 343 {
 344     if( !rMEvt.IsLeft() )
 345         return;
 346
 347     SdrView& rView  = rParent.GetView();
 348     vcl::Window& rWindow = rParent.GetWindow();
 349     rView.SetActualWin(&rWindow);
 350
 351     Point aPos = rWindow.PixelToLogic( rMEvt.GetPosPixel() );
 352     sal_uInt16 nHitLog = static_cast<sal_uInt16>(rWindow.PixelToLogic(Size(3, 0)).Width());
 353     sal_uInt16 nDrgLog = static_cast<sal_uInt16>(rWindow.PixelToLogic(Size(3, 0)).Width());
 354
 355     rWindow.CaptureMouse();
 356
 357     if ( rMEvt.IsLeft() && rMEvt.GetClicks() == 1 )
 358     {
 359         SdrHdl* pHdl = rView.PickHandle(aPos);
 360
 361         // if selected object was hit, drag object
 362         if ( pHdl!=nullptr || rView.IsMarkedHit(aPos, nHitLog) )
 363             rView.BegDragObj(aPos, nullptr, pHdl, nDrgLog);
 364         else if ( rView.AreObjectsMarked() )
 365             rView.UnmarkAll();
 366
 367         // if no action, create object
 368         if ( !rView.IsAction() )
 369             rView.BegCreateObj(aPos);
 370     }
 371     else if ( rMEvt.IsLeft() && rMEvt.GetClicks() == 2 )
 372     {
 373         // if object was hit, show property browser
 374         if ( rView.IsMarkedHit(aPos, nHitLog) && rParent.GetMode() != DlgEditor::READONLY )
 375             rParent.ShowProperties();
 376     }
 377 }
 378
 379 bool DlgEdFuncInsert::MouseButtonUp( const MouseEvent& rMEvt )
 380 {
 381     DlgEdFunc::MouseButtonUp( rMEvt );
 382
 383     SdrView& rView  = rParent.GetView();
 384     vcl::Window& rWindow = rParent.GetWindow();
 385     rView.SetActualWin(&rWindow);
 386
 387     rWindow.ReleaseMouse();
 388
 389     // object creation active?
 390     if ( rView.IsCreateObj() )
 391     {
 392         rView.EndCreateObj(SdrCreateCmd::ForceEnd);
 393
 394         if ( !rView.AreObjectsMarked() )
 395         {
 396             sal_uInt16 nHitLog = static_cast<sal_uInt16>(rWindow.PixelToLogic(Size(3, 0)).Width());
 397             Point aPos( rWindow.PixelToLogic( rMEvt.GetPosPixel() ) );
 398             rView.MarkObj(aPos, nHitLog);
 399         }
 400
 401         return rView.AreObjectsMarked();
 402     }
 403     else
 404     {
 405         if ( rView.IsDragObj() )
 406             rView.EndDragObj( rMEvt.IsMod1() );
 407         return true;
 408     }
 409 }
 410
 411 void DlgEdFuncInsert::MouseMove( const MouseEvent& rMEvt )
 412 {
 413     SdrView& rView  = rParent.GetView();
 414     vcl::Window& rWindow = rParent.GetWindow();
 415     rView.SetActualWin(&rWindow);
 416
 417     Point aPos = rWindow.PixelToLogic(rMEvt.GetPosPixel());
 418     sal_uInt16 nHitLog = static_cast<sal_uInt16>(rWindow.PixelToLogic(Size(3, 0)).Width());
 419
 420     if (rView.IsAction())
 421     {
 422         ForceScroll(aPos);
 423         rView.MovAction(aPos);
 424     }
 425
 426     rWindow.SetPointer( rView.GetPreferredPointer( aPos, &rWindow, nHitLog ) );
 427 }
 428
 429 DlgEdFuncSelect::DlgEdFuncSelect (DlgEditor& rParent_) :
 430     DlgEdFunc(rParent_)
 431 {
 432 }
 433
 434 DlgEdFuncSelect::~DlgEdFuncSelect()
 435 {
 436 }
 437
 438 void DlgEdFuncSelect::MouseButtonDown( const MouseEvent& rMEvt )
 439 {
 440     // get view from parent
 441     SdrView& rView  = rParent.GetView();
 442     vcl::Window& rWindow = rParent.GetWindow();
 443     rView.SetActualWin(&rWindow);
 444
 445     sal_uInt16 nDrgLog = static_cast<sal_uInt16>(rWindow.PixelToLogic(Size(3, 0)).Width());
 446     sal_uInt16 nHitLog = static_cast<sal_uInt16>(rWindow.PixelToLogic(Size(3, 0)).Width());
 447     Point aMDPos = rWindow.PixelToLogic(rMEvt.GetPosPixel());
 448
 449     if ( rMEvt.IsLeft() && rMEvt.GetClicks() == 1 )
 450     {
 451         SdrHdl* pHdl = rView.PickHandle(aMDPos);
 452
 453         // hit selected object?
 454         if ( pHdl!=nullptr || rView.IsMarkedHit(aMDPos, nHitLog) )
 455         {
 456             rView.BegDragObj(aMDPos, nullptr, pHdl, nDrgLog);
 457         }
 458         else
 459         {
 460             // if not multi selection, unmark all
 461             if ( !rMEvt.IsShift() )
 462                 rView.UnmarkAll();
 463             else
 464             {
 465                 SdrPageView* pPV;
 466                 SdrObject* pObj = rView.PickObj(aMDPos, nHitLog, pPV);
 467                 if (pObj)
 468                 {
 469                     //if (dynamic_cast<DlgEdForm*>(pObj))
 470                     //  rView.UnmarkAll();
 471                     //else
 472                     //  rParent.UnmarkDialog();
 473                 }
 474             }
 475
 476             if ( rView.MarkObj(aMDPos, nHitLog) )
 477             {
 478                 // drag object
 479                 pHdl = rView.PickHandle(aMDPos);
 480                 rView.BegDragObj(aMDPos, nullptr, pHdl, nDrgLog);
 481             }
 482             else
 483             {
 484                 // select object
 485                 rView.BegMarkObj(aMDPos);
 486             }
 487         }
 488     }
 489     else if ( rMEvt.IsLeft() && rMEvt.GetClicks() == 2 )
 490     {
 491         // if object was hit, show property browser
 492         if ( rView.IsMarkedHit(aMDPos, nHitLog) && rParent.GetMode() != DlgEditor::READONLY )
 493             rParent.ShowProperties();
 494     }
 495 }
 496
 497 bool DlgEdFuncSelect::MouseButtonUp( const MouseEvent& rMEvt )
 498 {
 499     DlgEdFunc::MouseButtonUp( rMEvt );
 500
 501     // get view from parent
 502     SdrView& rView  = rParent.GetView();
 503     vcl::Window& rWindow = rParent.GetWindow();
 504     rView.SetActualWin(&rWindow);
 505
 506     Point aPnt = rWindow.PixelToLogic(rMEvt.GetPosPixel());
 507     sal_uInt16 nHitLog = static_cast<sal_uInt16>(rWindow.PixelToLogic(Size(3, 0)).Width());
 508
 509     if ( rMEvt.IsLeft() )
 510     {
 511         if (rView.IsDragObj())
 512         {
 513             // object was dragged
 514             rView.EndDragObj( rMEvt.IsMod1() );
 515             rView.ForceMarkedToAnotherPage();
 516         }
 517         else if (rView.IsAction())
 518         {
 519             rView.EndAction();
 520         }
 521     }
 522
 523     rWindow.SetPointer( rView.GetPreferredPointer( aPnt, &rWindow, nHitLog ) );
 524     rWindow.ReleaseMouse();
 525
 526     return true;
 527 }
 528
 529 void DlgEdFuncSelect::MouseMove( const MouseEvent& rMEvt )
 530 {
 531     SdrView& rView  = rParent.GetView();
 532     vcl::Window& rWindow = rParent.GetWindow();
 533     rView.SetActualWin(&rWindow);
 534
 535     Point aPnt = rWindow.PixelToLogic(rMEvt.GetPosPixel());
 536     sal_uInt16 nHitLog = static_cast<sal_uInt16>(rWindow.PixelToLogic(Size(3, 0)).Width());
 537
 538     if ( rView.IsAction() )
 539     {
 540         Point aPix = rMEvt.GetPosPixel();
 541         Point aPnt_ = rWindow.PixelToLogic(aPix);
 542
 543         ForceScroll(aPnt_);
 544         rView.MovAction(aPnt_);
 545     }
 546
 547     rWindow.SetPointer( rView.GetPreferredPointer( aPnt, &rWindow, nHitLog ) );
 548 }
 549
 550 } // namespace basctl
 551
 552 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */