?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
merge the formfield patch from ooo-build
[ooovba.git] / sc / source / ui / navipi / navipi.cxx
bloba6e541357733a2918a16ccf3428736e5dc3ba2f5
1 /*************************************************************************
2 *
3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
4 *
5 * Copyright 2008 by Sun Microsystems, Inc.
6 *
7 * OpenOffice.org - a multi-platform office productivity suite
8 *
9 * $RCSfile: navipi.cxx,v $
10 * $Revision: 1.26 $
11 *
12 * This file is part of OpenOffice.org.
13 *
14 * OpenOffice.org is free software: you can redistribute it and/or modify
15 * it under the terms of the GNU Lesser General Public License version 3
16 * only, as published by the Free Software Foundation.
17 *
18 * OpenOffice.org is distributed in the hope that it will be useful,
19 * but WITHOUT ANY WARRANTY; without even the implied warranty of
20 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
21 * GNU Lesser General Public License version 3 for more details
22 * (a copy is included in the LICENSE file that accompanied this code).
23 *
24 * You should have received a copy of the GNU Lesser General Public License
25 * version 3 along with OpenOffice.org. If not, see
26 * <http://www.openoffice.org/license.html>
27 * for a copy of the LGPLv3 License.
28 *
29 ************************************************************************/
30
31 // MARKER(update_precomp.py): autogen include statement, do not remove
32 #include "precompiled_sc.hxx"
33
34 //------------------------------------------------------------------
35
36 // #include <math.h>
37 #include <rangelst.hxx>
38 #include <sfx2/app.hxx>
39 #include <sfx2/bindings.hxx>
40 #include <sfx2/dispatch.hxx>
41 #include <sfx2/event.hxx>
42 #include <sfx2/imgmgr.hxx>
43 #include <sfx2/navigat.hxx>
44 #include <svtools/stritem.hxx>
45 #include <svtools/urlbmk.hxx>
46 #include <vcl/sound.hxx>
47 #include <unotools/charclass.hxx>
48 #include <stdlib.h>
49
50 #include "viewdata.hxx"
51 #include "tabvwsh.hxx"
52 #include "docsh.hxx"
53 #include "document.hxx"
54 #include "dbcolect.hxx"
55 #include "rangenam.hxx"
56 #include "rangeutl.hxx"
57 #include "popmenu.hxx"
58 #include "scresid.hxx"
59 #include "scmod.hxx"
60 #include "navicfg.hxx"
61 #include "navcitem.hxx"
62 #include "navipi.hrc"
63 #include "navipi.hxx"
64 #include "navsett.hxx"
65
66 // Timeout, um Notizen zu suchen
67 #define SC_CONTENT_TIMEOUT 1000
68
69 // Toleranz, wieviel ueber der eingeklappten Groesse noch klein ist
70 #define SCNAV_MINTOL 5
71
72 // maximum values for UI
73 #define SCNAV_MAXCOL (MAXCOLCOUNT)
74 // macro is sufficient since only used in ctor
75 #define SCNAV_COLDIGITS (static_cast<xub_StrLen>( floor( log10( static_cast<double>(SCNAV_MAXCOL)))) + 1) // 1...256...18278
76 // precomputed constant because it is used in every change of spin button field
77 static const xub_StrLen SCNAV_COLLETTERS = ::ScColToAlpha(SCNAV_MAXCOL).Len(); // A...IV...ZZZ
78
79 #define SCNAV_MAXROW (MAXROWCOUNT)
80
81 //------------------------------------------------------------------------
82
83 // static
84 void ScNavigatorDlg::ReleaseFocus()
85 {
86 SfxViewShell* pCurSh = SfxViewShell::Current();
87
88 if ( pCurSh )
89 {
90 Window* pShellWnd = pCurSh->GetWindow();
91 if ( pShellWnd )
92 pShellWnd->GrabFocus();
93 }
94 }
95
96 //==================================================================
97 // class ColumnEdit
98 //==================================================================
99
100 ColumnEdit::ColumnEdit( ScNavigatorDlg* pParent, const ResId& rResId )
101 : SpinField ( pParent, rResId ),
102 rDlg ( *pParent ),
103 nCol ( 0 ),
104 nKeyGroup ( KEYGROUP_ALPHA )
105 {
106 SetMaxTextLen( SCNAV_COLDIGITS ); // 1...256...18278 or A...IV...ZZZ
107 }
108
109 //------------------------------------------------------------------------
110
111 __EXPORT ColumnEdit::~ColumnEdit()
112 {
113 }
114
115 //------------------------------------------------------------------------
116
117 long __EXPORT ColumnEdit::Notify( NotifyEvent& rNEvt )
118 {
119 long nHandled = SpinField::Notify( rNEvt );
120
121 USHORT nType = rNEvt.GetType();
122 if ( nType == EVENT_KEYINPUT )
123 {
124 const KeyEvent* pKEvt = rNEvt.GetKeyEvent();
125 KeyCode aCode = pKEvt->GetKeyCode();
126
127 if ( !aCode.IsMod1() && !aCode.IsMod2() )
128 {
129 //! Eingabeueberpruefung (nur Zahlen oder nur Buchstaben, max 2 bzw 3 Stellen)
130 //! war vor VCL per nicht weitergeleitetem KeyInput
131 //! dafuer was neues ausdenken!!!
132
133 if ( aCode.GetCode() == KEY_RETURN )
134 {
135 ScNavigatorDlg::ReleaseFocus();
136 ExecuteCol();
137 nHandled = 1;
138 }
139 }
140 }
141 else if ( nType == EVENT_LOSEFOCUS ) // LoseFocus wird bei VCL nicht gerufen
142 EvalText(); // nCol setzen
143
144 return nHandled;
145 }
146
147 //------------------------------------------------------------------------
148
149 void __EXPORT ColumnEdit::LoseFocus()
150 {
151 EvalText();
152 }
153
154
155 //------------------------------------------------------------------------
156
157 void __EXPORT ColumnEdit::Up()
158 {
159 nCol++;
160
161 #ifdef OS2
162 if ( nCol > SCNAV_MAXCOL )
163 nCol = 1;
164 #endif
165
166 if ( nCol <= SCNAV_MAXCOL )
167 SetCol( nCol );
168 else
169 nCol--;
170 }
171
172 //------------------------------------------------------------------------
173
174 void __EXPORT ColumnEdit::Down()
175 {
176 if ( nCol>1 )
177 SetCol( nCol-1 );
178 #ifdef OS2
179 else
180 SetCol( SCNAV_MAXCOL );
181 #endif
182 }
183
184 //------------------------------------------------------------------------
185
186 void __EXPORT ColumnEdit::First()
187 {
188 nCol = 1;
189 SetText( 'A' );
190 }
191
192 //------------------------------------------------------------------------
193
194 void __EXPORT ColumnEdit::Last()
195 {
196 String aStr;
197 nCol = NumToAlpha( SCNAV_MAXCOL, aStr );
198 SetText( aStr );
199 }
200
201
202 //------------------------------------------------------------------------
203
204 void ColumnEdit::EvalText()
205 {
206 String aStrCol = GetText();
207
208 if ( aStrCol.Len() > 0 )
209 {
210 // nKeyGroup wird bei VCL mangels KeyInput nicht mehr gesetzt
211
212 if ( CharClass::isAsciiNumeric(aStrCol) )
213 nCol = NumStrToAlpha( aStrCol );
214 else
215 nCol = AlphaToNum( aStrCol );
216 }
217 else
218 nCol = 0;
219
220 SetText( aStrCol );
221 nKeyGroup = KEYGROUP_ALPHA;
222 }
223
224 //------------------------------------------------------------------------
225
226 void ColumnEdit::ExecuteCol()
227 {
228 SCROW nRow = rDlg.aEdRow.GetRow();
229
230 EvalText(); // setzt nCol
231
232 if ( (nCol > 0) && (nRow > 0) )
233 rDlg.SetCurrentCell( nCol-1, nRow-1 );
234 }
235
236 //------------------------------------------------------------------------
237
238 void ColumnEdit::SetCol( SCCOL nColNo )
239 {
240 String aStr;
241
242 if ( nColNo == 0 )
243 {
244 nCol = 0;
245 SetText( aStr );
246 }
247 else
248 {
249 nColNo = NumToAlpha( nColNo, aStr );
250 nCol = nColNo;
251 SetText( aStr );
252 }
253 }
254
255 //------------------------------------------------------------------------
256
257 SCCOL ColumnEdit::AlphaToNum( String& rStr )
258 {
259 SCCOL nColumn = 0;
260
261 if ( CharClass::isAsciiAlpha( rStr) )
262 {
263 rStr.ToUpperAscii();
264
265 if (::AlphaToCol( nColumn, rStr))
266 ++nColumn;
267
268 if ( (rStr.Len() > SCNAV_COLLETTERS) || (nColumn > SCNAV_MAXCOL) )
269 {
270 nColumn = SCNAV_MAXCOL;
271 NumToAlpha( nColumn, rStr );
272 }
273 }
274 else
275 rStr.Erase();
276
277 return nColumn;
278 }
279
280 //------------------------------------------------------------------------
281
282 SCCOL ColumnEdit::NumStrToAlpha( String& rStr )
283 {
284 SCCOL nColumn = 0;
285
286 if ( CharClass::isAsciiNumeric(rStr) )
287 nColumn = NumToAlpha( (SCCOL)rStr.ToInt32(), rStr );
288 else
289 rStr.Erase();
290
291 return nColumn;
292 }
293
294 //------------------------------------------------------------------------
295
296 SCCOL ColumnEdit::NumToAlpha( SCCOL nColNo, String& rStr )
297 {
298 if ( nColNo > SCNAV_MAXCOL )
299 nColNo = SCNAV_MAXCOL;
300 else if ( nColNo < 1 )
301 nColNo = 1;
302
303 ::ScColToAlpha( rStr, nColNo - 1);
304
305 return nColNo;
306 }
307
308 //==================================================================
309 // class RowEdit
310 //==================================================================
311
312 RowEdit::RowEdit( ScNavigatorDlg* pParent, const ResId& rResId )
313 : NumericField( pParent, rResId ),
314 rDlg ( *pParent )
315 {
316 SetMax( SCNAV_MAXROW);
317 SetLast( SCNAV_MAXROW);
318 }
319
320 //------------------------------------------------------------------------
321
322 __EXPORT RowEdit::~RowEdit()
323 {
324 }
325
326 //------------------------------------------------------------------------
327
328 long __EXPORT RowEdit::Notify( NotifyEvent& rNEvt )
329 {
330 long nHandled = NumericField::Notify( rNEvt );
331
332 if ( rNEvt.GetType() == EVENT_KEYINPUT )
333 {
334 const KeyEvent* pKEvt = rNEvt.GetKeyEvent();
335 KeyCode aCode = pKEvt->GetKeyCode();
336 if ( aCode.GetCode() == KEY_RETURN && !aCode.IsMod1() && !aCode.IsMod2() )
337 {
338 ScNavigatorDlg::ReleaseFocus();
339 ExecuteRow();
340 nHandled = 1;
341 }
342 }
343
344 return nHandled;
345 }
346
347 //------------------------------------------------------------------------
348
349 void __EXPORT RowEdit::LoseFocus()
350 {
351 }
352
353 //------------------------------------------------------------------------
354
355 void RowEdit::ExecuteRow()
356 {
357 SCCOL nCol = rDlg.aEdCol.GetCol();
358 SCROW nRow = (SCROW)GetValue();
359
360 if ( (nCol > 0) && (nRow > 0) )
361 rDlg.SetCurrentCell( nCol-1, nRow-1 );
362 }
363
364 //==================================================================
365 // class ScDocListBox
366 //==================================================================
367
368 ScDocListBox::ScDocListBox( ScNavigatorDlg* pParent, const ResId& rResId )
369 : ListBox ( pParent, rResId ),
370 rDlg ( *pParent )
371 {
372 }
373
374 //------------------------------------------------------------------------
375
376 __EXPORT ScDocListBox::~ScDocListBox()
377 {
378 }
379
380 //------------------------------------------------------------------------
381
382 void __EXPORT ScDocListBox::Select()
383 {
384 ScNavigatorDlg::ReleaseFocus();
385
386 String aDocName = GetSelectEntry();
387 rDlg.aLbEntries.SelectDoc( aDocName );
388 }
389
390 //==================================================================
391 // class CommandToolBox
392 //==================================================================
393
394 CommandToolBox::CommandToolBox( ScNavigatorDlg* pParent, const ResId& rResId )
395 : ToolBox ( pParent, rResId ),
396 rDlg ( *pParent )
397 {
398 InitImageList(); // ImageList members of ScNavigatorDlg must be initialized before!
399
400 SetSizePixel( CalcWindowSizePixel() );
401 SetDropdownClickHdl( LINK(this, CommandToolBox, ToolBoxDropdownClickHdl) );
402 SetItemBits( IID_DROPMODE, GetItemBits( IID_DROPMODE ) | TIB_DROPDOWNONLY );
403 // EnableItem( IID_UP, FALSE );
404 // EnableItem( IID_DOWN, FALSE );
405 }
406
407 //------------------------------------------------------------------------
408
409 __EXPORT CommandToolBox::~CommandToolBox()
410 {
411 }
412
413 //------------------------------------------------------------------------
414
415 void CommandToolBox::Select( USHORT nSelId )
416 {
417 // Modus umschalten ?
418
419 if ( nSelId == IID_ZOOMOUT || nSelId == IID_SCENARIOS )
420 {
421 NavListMode eOldMode = rDlg.eListMode;
422 NavListMode eNewMode = eOldMode;
423
424 if ( nSelId == IID_SCENARIOS ) // auf Szenario
425 {
426 if ( eOldMode == NAV_LMODE_SCENARIOS )
427 eNewMode = NAV_LMODE_AREAS;
428 else
429 eNewMode = NAV_LMODE_SCENARIOS;
430 }
431 else // ein/aus
432 {
433 if ( eOldMode == NAV_LMODE_NONE )
434 eNewMode = NAV_LMODE_AREAS;
435 else
436 eNewMode = NAV_LMODE_NONE;
437 }
438 rDlg.SetListMode( eNewMode );
439 UpdateButtons();
440 }
441 else
442 switch ( nSelId )
443 {
444 case IID_DATA:
445 rDlg.MarkDataArea();
446 break;
447 case IID_UP:
448 rDlg.StartOfDataArea();
449 break;
450 case IID_DOWN:
451 rDlg.EndOfDataArea();
452 break;
453 // IID_DROPMODE ist in Click
454 case IID_CHANGEROOT:
455 rDlg.aLbEntries.ToggleRoot();
456 UpdateButtons();
457 break;
458 }
459 }
460
461 void __EXPORT CommandToolBox::Select()
462 {
463 Select( GetCurItemId() );
464 }
465
466 //------------------------------------------------------------------------
467
468 void __EXPORT CommandToolBox::Click()
469 {
470 }
471
472 //------------------------------------------------------------------------
473
474 IMPL_LINK( CommandToolBox, ToolBoxDropdownClickHdl, ToolBox*, EMPTYARG )
475 {
476 // Das Popupmenue fuer den Dropmodus muss im Click (Button Down)
477 // statt im Select (Button Up) aufgerufen werden.
478
479 if ( GetCurItemId() == IID_DROPMODE )
480 {
481 ScPopupMenu aPop( ScResId( RID_POPUP_DROPMODE ) );
482 aPop.CheckItem( RID_DROPMODE_URL + rDlg.GetDropMode() );
483 aPop.Execute( this, GetItemRect(IID_DROPMODE), POPUPMENU_EXECUTE_DOWN );
484 USHORT nId = aPop.GetSelected();
485
486 EndSelection(); // vor SetDropMode (SetDropMode ruft SetItemImage)
487
488 if ( nId >= RID_DROPMODE_URL && nId <= RID_DROPMODE_COPY )
489 rDlg.SetDropMode( nId - RID_DROPMODE_URL );
490
491 // #49956# den gehighlighteten Button aufheben
492 Point aPoint;
493 MouseEvent aLeave( aPoint, 0, MOUSE_LEAVEWINDOW | MOUSE_SYNTHETIC );
494 MouseMove( aLeave );
495 }
496
497 return 1;
498 }
499
500 //------------------------------------------------------------------------
501
502 void CommandToolBox::UpdateButtons()
503 {
504 NavListMode eMode = rDlg.eListMode;
505 CheckItem( IID_SCENARIOS, eMode == NAV_LMODE_SCENARIOS );
506 CheckItem( IID_ZOOMOUT, eMode != NAV_LMODE_NONE );
507
508 // Umschalten-Button:
509 if ( eMode == NAV_LMODE_SCENARIOS || eMode == NAV_LMODE_NONE )
510 {
511 EnableItem( IID_CHANGEROOT, FALSE );
512 CheckItem( IID_CHANGEROOT, FALSE );
513 }
514 else
515 {
516 EnableItem( IID_CHANGEROOT, TRUE );
517 BOOL bRootSet = rDlg.aLbEntries.GetRootType() != SC_CONTENT_ROOT;
518 CheckItem( IID_CHANGEROOT, bRootSet );
519 }
520
521 BOOL bDark = GetDisplayBackground().GetColor().IsDark();
522
523 USHORT nImageId = 0;
524 switch ( rDlg.nDropMode )
525 {
526 case SC_DROPMODE_URL: nImageId = bDark ? RID_IMG_H_DROP_URL : RID_IMG_DROP_URL; break;
527 case SC_DROPMODE_LINK: nImageId = bDark ? RID_IMG_H_DROP_LINK : RID_IMG_DROP_LINK; break;
528 case SC_DROPMODE_COPY: nImageId = bDark ? RID_IMG_H_DROP_COPY : RID_IMG_DROP_COPY; break;
529 }
530 SetItemImage( IID_DROPMODE, Image(ScResId(nImageId)) );
531 }
532
533 void CommandToolBox::InitImageList()
534 {
535 BOOL bDark = GetDisplayBackground().GetColor().IsDark();
536
537 ImageList& rImgLst = bDark ? rDlg.aCmdImageListH : rDlg.aCmdImageList;
538
539 USHORT nCount = GetItemCount();
540 for (USHORT i = 0; i < nCount; i++)
541 {
542 USHORT nId = GetItemId(i);
543 SetItemImage( nId, rImgLst.GetImage( nId ) );
544 }
545 }
546
547 void CommandToolBox::DataChanged( const DataChangedEvent& rDCEvt )
548 {
549 if ( rDCEvt.GetType() == DATACHANGED_SETTINGS && (rDCEvt.GetFlags() & SETTINGS_STYLE) )
550 {
551 // update item images
552
553 InitImageList();
554 UpdateButtons(); // drop mode
555 }
556
557 ToolBox::DataChanged( rDCEvt );
558 }
559
560 //==================================================================
561 // class ScNavigatorSettings
562 //==================================================================
563
564 ScNavigatorSettings::ScNavigatorSettings() :
565 maExpandedVec( SC_CONTENT_COUNT, FALSE ),
566 mnRootSelected( SC_CONTENT_ROOT ),
567 mnChildSelected( SC_CONTENT_NOCHILD )
568 {
569 }
570
571 //==================================================================
572 // class ScNavigatorDlgWrapper
573 //==================================================================
574
575 SFX_IMPL_CHILDWINDOWCONTEXT( ScNavigatorDialogWrapper, SID_NAVIGATOR )
576
577 #define IS_MODE(bit)(((nFlags)&(bit))==(bit))
578
579 ScNavigatorDialogWrapper::ScNavigatorDialogWrapper(
580 Window* pParent,
581 USHORT nId,
582 SfxBindings* pBind,
583 SfxChildWinInfo* /* pInfo */ ) :
584 SfxChildWindowContext( nId )
585 {
586 pNavigator = new ScNavigatorDlg( pBind, this, pParent );
587 SetWindow( pNavigator );
588
589 // Einstellungen muessen anderswo gemerkt werden,
590 // pInfo geht uns (ausser der Groesse) nichts mehr an
591
592 Size aInfoSize = pParent->GetOutputSizePixel(); // von aussen vorgegebene Groesse
593 Size aNavSize = pNavigator->GetOutputSizePixel(); // Default-Groesse
594
595 aNavSize.Width() = Max( aInfoSize.Width(), aNavSize.Width() );
596 aNavSize.Height() = Max( aInfoSize.Height(), aNavSize.Height() );
597 pNavigator->nListModeHeight = Max( aNavSize.Height(), pNavigator->nListModeHeight );
598
599 // Die Groesse kann in einem anderen Modul geaendert worden sein,
600 // deshalb muessen in Abhaengigkeit von der momentanen Groesse die
601 // Inhalte eingeblendet werden oder nicht
602
603 BOOL bSmall = ( aInfoSize.Height() <= pNavigator->aInitSize.Height() + SCNAV_MINTOL );
604 NavListMode eNavMode = NAV_LMODE_NONE;
605 if (!bSmall)
606 {
607 // wenn Szenario aktiv war, wieder einschalten
608
609 ScNavipiCfg& rCfg = SC_MOD()->GetNavipiCfg();
610 NavListMode eLastMode = (NavListMode) rCfg.GetListMode();
611 if ( eLastMode == NAV_LMODE_SCENARIOS )
612 eNavMode = NAV_LMODE_SCENARIOS;
613 else
614 eNavMode = NAV_LMODE_AREAS;
615 }
616
617 // Die Groesse des Floats nicht neu setzen (FALSE bei SetListMode), damit der
618 // Navigator nicht aufgeklappt wird, wenn er minimiert war (#38872#).
619
620 pNavigator->SetListMode( eNavMode, FALSE ); // FALSE: Groesse des Float nicht setzen
621
622 USHORT nCmdId;
623 switch (eNavMode)
624 {
625 case NAV_LMODE_DOCS: nCmdId = IID_DOCS; break;
626 case NAV_LMODE_AREAS: nCmdId = IID_AREAS; break;
627 case NAV_LMODE_DBAREAS: nCmdId = IID_DBAREAS; break;
628 case NAV_LMODE_SCENARIOS: nCmdId = IID_SCENARIOS; break;
629 default: nCmdId = 0;
630 }
631 if (nCmdId)
632 {
633 pNavigator->aTbxCmd.CheckItem( nCmdId );
634 pNavigator->DoResize();
635 }
636
637 pNavigator->bFirstBig = ( nCmdId == 0 ); // dann spaeter
638
639 /*???
640 FloatingWindow* pFloat = GetFloatingWindow();
641 if ( pFloat )
642 pFloat->SetMinOutputSizePixel( pNavigator->GetMinOutputSizePixel() );
643 */
644
645 //!? pNavigator->Show();
646 }
647
648 void __EXPORT ScNavigatorDialogWrapper::Resizing( Size& rSize )
649 {
650 ((ScNavigatorDlg*)GetWindow())->Resizing(rSize);
651 }
652
653 //========================================================================
654 // class ScNavigatorPI
655 //========================================================================
656
657 #define CTRL_ITEMS 4
658
659 #define REGISTER_SLOT(i,id) \
660 ppBoundItems[i]=new ScNavigatorControllerItem(id,*this,rBindings);
661
662 ScNavigatorDlg::ScNavigatorDlg( SfxBindings* pB, SfxChildWindowContext* pCW, Window* pParent ) :
663 Window( pParent, ScResId(RID_SCDLG_NAVIGATOR) ),
664 rBindings ( *pB ), // is used in CommandToolBox ctor
665 aCmdImageList( ScResId( IL_CMD ) ),
666 aCmdImageListH( ScResId( ILH_CMD ) ),
667 aFtCol ( this, ScResId( FT_COL ) ),
668 aEdCol ( this, ScResId( ED_COL ) ),
669 aFtRow ( this, ScResId( FT_ROW ) ),
670 aEdRow ( this, ScResId( ED_ROW ) ),
671 aTbxCmd ( this, ScResId( TBX_CMD ) ),
672 aLbEntries ( this, ScResId( LB_ENTRIES ) ),
673 aWndScenarios( this,ScResId( STR_QHLP_SCEN_LISTBOX), ScResId(STR_QHLP_SCEN_COMMENT)),
674 aLbDocuments( this, ScResId( LB_DOCUMENTS ) ),
675 aStrDragMode ( ScResId( STR_DRAGMODE ) ),
676 aStrDisplay ( ScResId( STR_DISPLAY ) ),
677 aStrActiveWin( ScResId( STR_ACTIVEWIN ) ),
678 pContextWin ( pCW ),
679 pMarkArea ( NULL ),
680 pViewData ( NULL ),
681 nListModeHeight( 0 ),
682 nInitListHeight( 0 ),
683 eListMode ( NAV_LMODE_NONE ),
684 nDropMode ( SC_DROPMODE_URL ),
685 nCurCol ( 0 ),
686 nCurRow ( 0 ),
687 nCurTab ( 0 ),
688 bFirstBig ( FALSE )
689 {
690 ScNavipiCfg& rCfg = SC_MOD()->GetNavipiCfg();
691 nDropMode = rCfg.GetDragMode();
692 // eListMode wird von aussen gesetzt, Root weiter unten
693
694 aLbDocuments.SetDropDownLineCount(9);
695 String aOpen = String::CreateFromAscii(RTL_CONSTASCII_STRINGPARAM( " (" ));
696 aStrActive = aOpen;
697 aStrActive += String( ScResId( STR_ACTIVE ) );
698 aStrActive += ')'; // " (aktiv)"
699 aStrNotActive = aOpen;
700 aStrNotActive += String( ScResId( STR_NOTACTIVE ) );
701 aStrNotActive += ')'; // " (inaktiv)"
702 aStrHidden = aOpen;
703 aStrHidden += String( ScResId( STR_HIDDEN ) );
704 aStrHidden += ')'; // " (versteckt)"
705
706 aTitleBase = GetText();
707
708 long nListboxYPos = aTbxCmd.GetPosPixel().Y() + aTbxCmd.GetSizePixel().Height() + 4;
709 aLbEntries.SetPosSizePixel( 0, nListboxYPos, 0, 0, WINDOW_POSSIZE_Y);
710
711 nBorderOffset = aLbEntries.GetPosPixel().X();
712
713 aInitSize.Width() = aTbxCmd.GetPosPixel().X()
714 + aTbxCmd.GetSizePixel().Width()
715 + nBorderOffset;
716 aInitSize.Height() = aLbEntries.GetPosPixel().Y();
717
718 nInitListHeight = aLbEntries.GetSizePixel().Height();
719 nListModeHeight = aInitSize.Height()
720 + nInitListHeight;
721
722 // kein Resize, eh der ganze Kontext-Kram initialisiert ist!
723 // SetOutputSizePixel( aInitSize ); //???
724 /*! FloatingWindow* pFloat = pContextWin->GetFloatingWindow();
725 if ( pFloat)
726 pFloat->SetMinOutputSizePixel( aInitSize );
727 */
728 ppBoundItems = new ScNavigatorControllerItem* [CTRL_ITEMS];
729
730 rBindings.ENTERREGISTRATIONS();
731 //-----------------------------
732 REGISTER_SLOT( 0, SID_CURRENTCELL );
733 REGISTER_SLOT( 1, SID_CURRENTTAB );
734 REGISTER_SLOT( 2, SID_CURRENTDOC );
735 REGISTER_SLOT( 3, SID_SELECT_SCENARIO );
736 //-----------------------------
737 rBindings.LEAVEREGISTRATIONS();
738
739 StartListening( *(SFX_APP()) );
740 StartListening( rBindings );
741
742 aLbDocuments.Hide(); // bei NAV_LMODE_NONE gibts die nicht
743
744 aLbEntries.InitWindowBits(TRUE);
745
746 aLbEntries.SetSpaceBetweenEntries(0);
747 aLbEntries.SetSelectionMode( SINGLE_SELECTION );
748 aLbEntries.SetDragDropMode( SV_DRAGDROP_CTRL_MOVE |
749 SV_DRAGDROP_CTRL_COPY |
750 SV_DRAGDROP_ENABLE_TOP );
751
752 // war eine Kategorie als Root ausgewaehlt?
753 USHORT nLastRoot = rCfg.GetRootType();
754 if ( nLastRoot )
755 aLbEntries.SetRootType( nLastRoot );
756
757 aLbEntries.Refresh();
758 GetDocNames();
759
760 aTbxCmd.UpdateButtons();
761
762 UpdateColumn();
763 UpdateRow();
764 UpdateTable();
765 aLbEntries.Hide();
766 aWndScenarios.Hide();
767 aWndScenarios.SetPosPixel( aLbEntries.GetPosPixel() );
768
769 aContentTimer.SetTimeoutHdl( LINK( this, ScNavigatorDlg, TimeHdl ) );
770 aContentTimer.SetTimeout( SC_CONTENT_TIMEOUT );
771
772 FreeResource();
773 }
774
775 //------------------------------------------------------------------------
776
777 __EXPORT ScNavigatorDlg::~ScNavigatorDlg()
778 {
779 aContentTimer.Stop();
780
781 USHORT i;
782 for ( i=0; i<CTRL_ITEMS; i++ )
783 delete ppBoundItems[i];
784
785 delete [] ppBoundItems;
786 delete pMarkArea;
787
788 EndListening( *(SFX_APP()) );
789 EndListening( rBindings );
790 }
791
792 //------------------------------------------------------------------------
793
794 void __EXPORT ScNavigatorDlg::Resizing( Size& rNewSize ) // Size = Outputsize?
795 {
796 FloatingWindow* pFloat = pContextWin->GetFloatingWindow();
797 if ( pFloat )
798 {
799 Size aMinOut = pFloat->GetMinOutputSizePixel();
800
801 if ( rNewSize.Width() < aMinOut.Width() )
802 rNewSize.Width() = aMinOut.Width();
803
804 if ( eListMode == NAV_LMODE_NONE )
805 rNewSize.Height() = aInitSize.Height();
806 else
807 {
808 if ( rNewSize.Height() < aMinOut.Height() )
809 rNewSize.Height() = aMinOut.Height();
810 }
811 }
812 // else
813 // SfxDockingWindow::Resizing(rNewSize);
814 }
815
816
817
818 void ScNavigatorDlg::Paint( const Rectangle& rRec )
819 {
820 const StyleSettings& rStyleSettings = Application::GetSettings().GetStyleSettings();
821 Color aBgColor = rStyleSettings.GetFaceColor();
822 Wallpaper aBack( aBgColor );
823
824 SetBackground( aBack );
825 aFtCol.SetBackground( aBack );
826 aFtRow.SetBackground( aBack );
827
828 Window::Paint( rRec );
829 }
830
831 void ScNavigatorDlg::DataChanged( const DataChangedEvent& rDCEvt )
832 {
833 if ( rDCEvt.GetType() == DATACHANGED_SETTINGS && (rDCEvt.GetFlags() & SETTINGS_STYLE) )
834 {
835 // toolbox images are exchanged in CommandToolBox::DataChanged
836 Invalidate();
837 }
838
839 Window::DataChanged( rDCEvt );
840 }
841
842 //------------------------------------------------------------------------
843
844 void __EXPORT ScNavigatorDlg::Resize()
845 {
846 DoResize();
847 }
848
849 //------------------------------------------------------------------------
850
851 void ScNavigatorDlg::DoResize()
852 {
853 Size aNewSize = GetOutputSizePixel();
854 long nTotalHeight = aNewSize.Height();
855
856 // #41403# bei angedocktem Navigator wird das Fenster evtl. erst klein erzeugt,
857 // dann kommt ein Resize auf die wirkliche Groesse -> dann Inhalte einschalten
858
859 BOOL bSmall = ( nTotalHeight <= aInitSize.Height() + SCNAV_MINTOL );
860 if ( !bSmall && bFirstBig )
861 {
862 // Inhalte laut Config wieder einschalten
863
864 bFirstBig = FALSE;
865 NavListMode eNavMode = NAV_LMODE_AREAS;
866 ScNavipiCfg& rCfg = SC_MOD()->GetNavipiCfg();
867 NavListMode eLastMode = (NavListMode) rCfg.GetListMode();
868 if ( eLastMode == NAV_LMODE_SCENARIOS )
869 eNavMode = NAV_LMODE_SCENARIOS;
870 SetListMode( eNavMode, FALSE ); // FALSE: Groesse des Float nicht setzen
871 }
872
873 // auch wenn die Inhalte nicht sichtbar sind, die Groessen anpassen,
874 // damit die Breite stimmt
875
876 //@@ 03.11.97 changes begin
877 Point aEntryPos = aLbEntries.GetPosPixel();
878 Point aListPos = aLbDocuments.GetPosPixel();
879 aNewSize.Width() -= 2*nBorderOffset;
880 Size aDocSize = aLbDocuments.GetSizePixel();
881 aDocSize.Width() = aNewSize.Width();
882
883 if(!bSmall)
884 {
885
886 long nListHeight = aLbDocuments.GetSizePixel().Height();
887 aNewSize.Height() -= ( aEntryPos.Y() + nListHeight + 2*nBorderOffset );
888 if(aNewSize.Height()<0) aNewSize.Height()=0;
889
890 aListPos.Y() = aEntryPos.Y() + aNewSize.Height() + nBorderOffset;
891
892 if(aListPos.Y() > aLbEntries.GetPosPixel().Y())
893 aLbDocuments.SetPosPixel( aListPos );
894
895 }
896 aLbEntries.SetSizePixel( aNewSize );
897 aWndScenarios.SetSizePixel( aNewSize );
898 aLbDocuments.SetSizePixel( aDocSize );
899
900 //@@ 03.11.97 end
901
902 BOOL bListMode = (eListMode != NAV_LMODE_NONE);
903 FloatingWindow* pFloat = pContextWin->GetFloatingWindow();
904 if ( pFloat && bListMode )
905 nListModeHeight = nTotalHeight;
906 }
907
908 //------------------------------------------------------------------------
909
910 void __EXPORT ScNavigatorDlg::Notify( SfxBroadcaster&, const SfxHint& rHint )
911 {
912 if ( rHint.ISA(SfxSimpleHint) )
913 {
914 ULONG nHintId = ((SfxSimpleHint&)rHint).GetId();
915
916 if ( nHintId == SC_HINT_DOCNAME_CHANGED )
917 {
918 aLbEntries.ActiveDocChanged();
919 }
920 else if ( NAV_LMODE_NONE == eListMode )
921 {
922 // Tabellen hier nicht mehr
923 }
924 else
925 {
926 switch ( nHintId )
927 {
928 case SC_HINT_TABLES_CHANGED:
929 aLbEntries.Refresh( SC_CONTENT_TABLE );
930 break;
931
932 case SC_HINT_DBAREAS_CHANGED:
933 aLbEntries.Refresh( SC_CONTENT_DBAREA );
934 break;
935
936 case SC_HINT_AREAS_CHANGED:
937 aLbEntries.Refresh( SC_CONTENT_RANGENAME );
938 break;
939
940 case SC_HINT_DRAW_CHANGED:
941 aLbEntries.Refresh( SC_CONTENT_GRAPHIC );
942 aLbEntries.Refresh( SC_CONTENT_OLEOBJECT );
943 aLbEntries.Refresh( SC_CONTENT_DRAWING );
944 break;
945
946 case SC_HINT_AREALINKS_CHANGED:
947 aLbEntries.Refresh( SC_CONTENT_AREALINK );
948 break;
949
950 // SFX_HINT_DOCCHANGED kommt nicht nur bei Dokument-Wechsel
951
952 case SC_HINT_NAVIGATOR_UPDATEALL:
953 UpdateAll();
954 break;
955
956 case FID_DATACHANGED:
957 case FID_ANYDATACHANGED:
958 aContentTimer.Start(); // Notizen nicht sofort suchen
959 break;
960
961 default:
962 break;
963 }
964 }
965 }
966 else if ( rHint.ISA(SfxEventHint) )
967 {
968 ULONG nEventId = ((SfxEventHint&)rHint).GetEventId();
969 if ( nEventId == SFX_EVENT_ACTIVATEDOC )
970 {
971 aLbEntries.ActiveDocChanged();
972 UpdateAll();
973 }
974 }
975 }
976
977 //------------------------------------------------------------------------
978
979 IMPL_LINK( ScNavigatorDlg, TimeHdl, Timer*, pTimer )
980 {
981 if ( pTimer != &aContentTimer )
982 return 0;
983
984 aLbEntries.Refresh( SC_CONTENT_NOTE );
985 return 0;
986 }
987
988 //------------------------------------------------------------------------
989
990 void ScNavigatorDlg::SetDropMode(USHORT nNew)
991 {
992 nDropMode = nNew;
993 aTbxCmd.UpdateButtons();
994
995 ScNavipiCfg& rCfg = SC_MOD()->GetNavipiCfg();
996 rCfg.SetDragMode(nDropMode);
997 }
998
999 //------------------------------------------------------------------------
1000
1001 void ScNavigatorDlg::CursorPosChanged()
1002 {
1003 //! Eintraege selektieren ???
1004
1005 // if ( GetDBAtCursor( aStrDbName ) )
1006 // if ( GetAreaAtCursor( aStrAreaName ) )
1007 }
1008
1009 //------------------------------------------------------------------------
1010
1011 void ScNavigatorDlg::SetCurrentCell( SCCOL nColNo, SCROW nRowNo )
1012 {
1013 if ( (nColNo+1 != nCurCol) || (nRowNo+1 != nCurRow) )
1014 {
1015 // SID_CURRENTCELL == Item #0 Cache leeren, damit das Setzen der
1016 // aktuellen Zelle auch in zusammengefassten Bereichen funktioniert.
1017 ppBoundItems[0]->ClearCache();
1018
1019 ScAddress aScAddress( nColNo, nRowNo, 0 );
1020 String aAddr;
1021 aScAddress.Format( aAddr, SCA_ABS );
1022
1023 BOOL bUnmark = FALSE;
1024 if ( GetViewData() )
1025 bUnmark = !pViewData->GetMarkData().IsCellMarked( nColNo, nRowNo );
1026
1027 SfxStringItem aPosItem( SID_CURRENTCELL, aAddr );
1028 SfxBoolItem aUnmarkItem( FN_PARAM_1, bUnmark ); // ggf. Selektion aufheben
1029
1030 rBindings.GetDispatcher()->Execute( SID_CURRENTCELL,
1031 SFX_CALLMODE_SYNCHRON | SFX_CALLMODE_RECORD,
1032 &aPosItem, &aUnmarkItem, 0L );
1033 }
1034 }
1035
1036 void ScNavigatorDlg::SetCurrentCellStr( const String rName )
1037 {
1038 ppBoundItems[0]->ClearCache();
1039 SfxStringItem aNameItem( SID_CURRENTCELL, rName );
1040
1041 rBindings.GetDispatcher()->Execute( SID_CURRENTCELL,
1042 SFX_CALLMODE_SYNCHRON | SFX_CALLMODE_RECORD,
1043 &aNameItem, 0L );
1044 }
1045
1046 //------------------------------------------------------------------------
1047
1048 void ScNavigatorDlg::SetCurrentTable( SCTAB nTabNo )
1049 {
1050 if ( nTabNo != nCurTab )
1051 {
1052 // Tabelle fuer Basic ist 1-basiert
1053 SfxUInt16Item aTabItem( SID_CURRENTTAB, static_cast<sal_uInt16>(nTabNo) + 1 );
1054 rBindings.GetDispatcher()->Execute( SID_CURRENTTAB,
1055 SFX_CALLMODE_SYNCHRON | SFX_CALLMODE_RECORD,
1056 &aTabItem, 0L );
1057 }
1058 }
1059
1060 void ScNavigatorDlg::SetCurrentTableStr( const String rName )
1061 {
1062 if (!GetViewData()) return;
1063
1064 ScDocument* pDoc = pViewData->GetDocument();
1065 SCTAB nCount = pDoc->GetTableCount();
1066 String aTabName;
1067
1068 for ( SCTAB i=0; i<nCount; i++ )
1069 {
1070 pDoc->GetName( i, aTabName );
1071 if ( aTabName == rName )
1072 {
1073 SetCurrentTable( i );
1074 return;
1075 }
1076 }
1077
1078 Sound::Beep(); // Tabelle nicht gefunden
1079 }
1080
1081 //------------------------------------------------------------------------
1082
1083 void ScNavigatorDlg::SetCurrentObject( const String rName )
1084 {
1085 SfxStringItem aNameItem( SID_CURRENTOBJECT, rName );
1086 rBindings.GetDispatcher()->Execute( SID_CURRENTOBJECT,
1087 SFX_CALLMODE_SYNCHRON | SFX_CALLMODE_RECORD,
1088 &aNameItem, 0L );
1089 }
1090
1091 //------------------------------------------------------------------------
1092
1093 void ScNavigatorDlg::SetCurrentDoc( const String& rDocName ) // aktivieren
1094 {
1095 SfxStringItem aDocItem( SID_CURRENTDOC, rDocName );
1096 rBindings.GetDispatcher()->Execute( SID_CURRENTDOC,
1097 SFX_CALLMODE_SYNCHRON | SFX_CALLMODE_RECORD,
1098 &aDocItem, 0L );
1099 }
1100
1101 //------------------------------------------------------------------------
1102
1103 ScTabViewShell* ScNavigatorDlg::GetTabViewShell() const
1104 {
1105 return PTR_CAST( ScTabViewShell, SfxViewShell::Current() );
1106 }
1107
1108 //------------------------------------------------------------------------
1109
1110 ScNavigatorSettings* ScNavigatorDlg::GetNavigatorSettings()
1111 {
1112 // #95791# Don't store the settings pointer here, because the settings belong to
1113 // the view, and the view may be closed while the navigator is open (reload).
1114 // If the pointer is cached here again later for performance reasons, it has to
1115 // be forgotten when the view is closed.
1116
1117 ScTabViewShell* pViewSh = GetTabViewShell();
1118 return pViewSh ? pViewSh->GetNavigatorSettings() : NULL;
1119 }
1120
1121 //------------------------------------------------------------------------
1122
1123 BOOL ScNavigatorDlg::GetViewData()
1124 {
1125 ScTabViewShell* pViewSh = GetTabViewShell();
1126 pViewData = pViewSh ? pViewSh->GetViewData() : NULL;
1127
1128 return ( pViewData != NULL );
1129 }
1130
1131 //------------------------------------------------------------------------
1132
1133 void ScNavigatorDlg::UpdateColumn( const SCCOL* pCol )
1134 {
1135 if ( pCol )
1136 nCurCol = *pCol;
1137 else if ( GetViewData() )
1138 nCurCol = pViewData->GetCurX() + 1;
1139
1140 aEdCol.SetCol( nCurCol );
1141 CheckDataArea();
1142 }
1143
1144 //------------------------------------------------------------------------
1145
1146 void ScNavigatorDlg::UpdateRow( const SCROW* pRow )
1147 {
1148 if ( pRow )
1149 nCurRow = *pRow;
1150 else if ( GetViewData() )
1151 nCurRow = pViewData->GetCurY() + 1;
1152
1153 aEdRow.SetRow( nCurRow );
1154 CheckDataArea();
1155 }
1156
1157 //------------------------------------------------------------------------
1158
1159 void ScNavigatorDlg::UpdateTable( const SCTAB* pTab )
1160 {
1161 if ( pTab )
1162 nCurTab = *pTab;
1163 else if ( GetViewData() )
1164 nCurTab = pViewData->GetTabNo();
1165
1166 // aLbTables.SetTab( nCurTab );
1167 CheckDataArea();
1168 }
1169
1170 //------------------------------------------------------------------------
1171
1172 void ScNavigatorDlg::UpdateAll()
1173 {
1174 switch ( eListMode )
1175 {
1176 case NAV_LMODE_DOCS:
1177 case NAV_LMODE_DBAREAS:
1178 case NAV_LMODE_AREAS:
1179 aLbEntries.Refresh();
1180 break;
1181
1182 case NAV_LMODE_NONE:
1183 //! ???
1184 break;
1185
1186 default:
1187 break;
1188 }
1189
1190 aContentTimer.Stop(); // dann nicht nochmal
1191 }
1192
1193 //------------------------------------------------------------------------
1194
1195 void ScNavigatorDlg::SetListMode( NavListMode eMode, BOOL bSetSize )
1196 {
1197 if ( eMode != eListMode )
1198 {
1199 if ( eMode != NAV_LMODE_NONE )
1200 bFirstBig = FALSE; // nicht mehr automatisch umschalten
1201
1202 eListMode = eMode;
1203
1204 switch ( eMode )
1205 {
1206 case NAV_LMODE_NONE:
1207 ShowList( FALSE, bSetSize );
1208 break;
1209
1210 case NAV_LMODE_AREAS:
1211 case NAV_LMODE_DBAREAS:
1212 case NAV_LMODE_DOCS:
1213 aLbEntries.Refresh();
1214 ShowList( TRUE, bSetSize );
1215 break;
1216
1217 case NAV_LMODE_SCENARIOS:
1218 ShowScenarios( TRUE, bSetSize );
1219 break;
1220 }
1221
1222 aTbxCmd.UpdateButtons();
1223
1224 if ( eMode != NAV_LMODE_NONE )
1225 {
1226 ScNavipiCfg& rCfg = SC_MOD()->GetNavipiCfg();
1227 rCfg.SetListMode( (USHORT) eMode );
1228 }
1229 }
1230
1231 if ( pMarkArea )
1232 UnmarkDataArea();
1233 }
1234
1235 //------------------------------------------------------------------------
1236
1237 void ScNavigatorDlg::ShowList( BOOL bShow, BOOL bSetSize )
1238 {
1239 FloatingWindow* pFloat = pContextWin->GetFloatingWindow();
1240 Size aSize = GetParent()->GetOutputSizePixel();
1241
1242 if ( bShow )
1243 {
1244 Size aMinSize = aInitSize;
1245
1246 aMinSize.Height() += nInitListHeight;
1247 if ( pFloat )
1248 pFloat->SetMinOutputSizePixel( aMinSize );
1249 aSize.Height() = nListModeHeight;
1250 aLbEntries.Show();
1251 aLbDocuments.Show();
1252 }
1253 else
1254 {
1255 if ( pFloat )
1256 {
1257 pFloat->SetMinOutputSizePixel( aInitSize );
1258 nListModeHeight = aSize.Height();
1259 }
1260 aSize.Height() = aInitSize.Height();
1261 aLbEntries.Hide();
1262 aLbDocuments.Hide();
1263 }
1264 aWndScenarios.Hide();
1265
1266 if ( pFloat )
1267 {
1268 if ( bSetSize )
1269 pFloat->SetOutputSizePixel( aSize );
1270 }
1271 else
1272 {
1273 SfxNavigator* pNav = (SfxNavigator*)GetParent();
1274 Size aFloating = pNav->GetFloatingSize();
1275 aFloating.Height() = aSize.Height();
1276 pNav->SetFloatingSize( aFloating );
1277 }
1278 }
1279
1280 //------------------------------------------------------------------------
1281
1282 void ScNavigatorDlg::ShowScenarios( BOOL bShow, BOOL bSetSize )
1283 {
1284 FloatingWindow* pFloat = pContextWin->GetFloatingWindow();
1285 Size aSize = GetParent()->GetOutputSizePixel();
1286
1287 if ( bShow )
1288 {
1289 Size aMinSize = aInitSize;
1290 aMinSize.Height() += nInitListHeight;
1291 if ( pFloat )
1292 pFloat->SetMinOutputSizePixel( aMinSize );
1293 aSize.Height() = nListModeHeight;
1294
1295 rBindings.Invalidate( SID_SELECT_SCENARIO );
1296 rBindings.Update( SID_SELECT_SCENARIO );
1297
1298 aWndScenarios.Show();
1299 aLbDocuments.Show();
1300 }
1301 else
1302 {
1303 if ( pFloat )
1304 {
1305 pFloat->SetMinOutputSizePixel( aInitSize );
1306 nListModeHeight = aSize.Height();
1307 }
1308 aSize.Height() = aInitSize.Height();
1309 aWndScenarios.Hide();
1310 aLbDocuments.Hide();
1311 }
1312 aLbEntries.Hide();
1313
1314 if ( pFloat )
1315 {
1316 if ( bSetSize )
1317 pFloat->SetOutputSizePixel( aSize );
1318 }
1319 else
1320 {
1321 SfxNavigator* pNav = (SfxNavigator*)GetParent();
1322 Size aFloating = pNav->GetFloatingSize();
1323 aFloating.Height() = aSize.Height();
1324 pNav->SetFloatingSize( aFloating );
1325 }
1326 }
1327
1328
1329 //------------------------------------------------------------------------
1330 //
1331 // Dokumente fuer Dropdown-Listbox
1332 //
1333 //------------------------------------------------------------------------
1334
1335 void ScNavigatorDlg::GetDocNames( const String* pManualSel )
1336 {
1337 aLbDocuments.Clear();
1338 aLbDocuments.SetUpdateMode( FALSE );
1339
1340 ScDocShell* pCurrentSh = PTR_CAST( ScDocShell, SfxObjectShell::Current() );
1341
1342 String aSelEntry;
1343 SfxObjectShell* pSh = SfxObjectShell::GetFirst();
1344 while ( pSh )
1345 {
1346 if ( pSh->ISA(ScDocShell) )
1347 {
1348 String aName = pSh->GetTitle();
1349 String aEntry = aName;
1350 if (pSh == pCurrentSh)
1351 aEntry += aStrActive;
1352 else
1353 aEntry += aStrNotActive;
1354 aLbDocuments.InsertEntry( aEntry );
1355
1356 if ( pManualSel ? ( aName == *pManualSel )
1357 : ( pSh == pCurrentSh ) )
1358 aSelEntry = aEntry; // kompletter Eintrag zum Selektieren
1359 }
1360
1361 pSh = SfxObjectShell::GetNext( *pSh );
1362 }
1363
1364 aLbDocuments.InsertEntry( aStrActiveWin );
1365
1366 String aHidden = aLbEntries.GetHiddenTitle();
1367 if (aHidden.Len())
1368 {
1369 String aEntry = aHidden;
1370 aEntry += aStrHidden;
1371 aLbDocuments.InsertEntry( aEntry );
1372
1373 if ( pManualSel && aHidden == *pManualSel )
1374 aSelEntry = aEntry;
1375 }
1376
1377 aLbDocuments.SetUpdateMode( TRUE );
1378
1379 aLbDocuments.SelectEntry( aSelEntry );
1380 }
1381
1382 //------------------------------------------------------------------------
1383
1384 void ScNavigatorDlg::MarkDataArea()
1385 {
1386 ScTabViewShell* pViewSh = GetTabViewShell();
1387
1388 if ( pViewSh )
1389 {
1390 if ( !pMarkArea )
1391 pMarkArea = new ScArea;
1392
1393 pViewSh->MarkDataArea();
1394 ScRange aMarkRange;
1395 pViewSh->GetViewData()->GetMarkData().GetMarkArea(aMarkRange);
1396 pMarkArea->nColStart = aMarkRange.aStart.Col();
1397 pMarkArea->nRowStart = aMarkRange.aStart.Row();
1398 pMarkArea->nColEnd = aMarkRange.aEnd.Col();
1399 pMarkArea->nRowEnd = aMarkRange.aEnd.Row();
1400 pMarkArea->nTab = aMarkRange.aStart.Tab();
1401 }
1402 }
1403
1404 //------------------------------------------------------------------------
1405
1406 void ScNavigatorDlg::UnmarkDataArea()
1407 {
1408 ScTabViewShell* pViewSh = GetTabViewShell();
1409
1410 if ( pViewSh )
1411 {
1412 pViewSh->Unmark();
1413 DELETEZ( pMarkArea );
1414 }
1415 }
1416
1417 //------------------------------------------------------------------------
1418
1419 void ScNavigatorDlg::CheckDataArea()
1420 {
1421 if ( aTbxCmd.IsItemChecked( IID_DATA ) && pMarkArea )
1422 {
1423 if ( nCurTab != pMarkArea->nTab
1424 || nCurCol < pMarkArea->nColStart+1
1425 || nCurCol > pMarkArea->nColEnd+1
1426 || nCurRow < pMarkArea->nRowStart+1
1427 || nCurRow > pMarkArea->nRowEnd+1 )
1428 {
1429 aTbxCmd.SetItemState( IID_DATA, TriState(STATE_CHECK) );
1430 aTbxCmd.Select( IID_DATA );
1431 }
1432 }
1433 }
1434
1435 //------------------------------------------------------------------------
1436
1437 void ScNavigatorDlg::StartOfDataArea()
1438 {
1439 // pMarkArea auswerten ???
1440
1441 if ( GetViewData() )
1442 {
1443 ScMarkData& rMark = pViewData->GetMarkData();
1444 ScRange aMarkRange;
1445 rMark.GetMarkArea( aMarkRange );
1446
1447 SCCOL nCol = aMarkRange.aStart.Col();
1448 SCROW nRow = aMarkRange.aStart.Row();
1449
1450 if ( (nCol+1 != aEdCol.GetCol()) || (nRow+1 != aEdRow.GetRow()) )
1451 SetCurrentCell( nCol, nRow );
1452 }
1453 }
1454
1455 //------------------------------------------------------------------------
1456
1457 void ScNavigatorDlg::EndOfDataArea()
1458 {
1459 // pMarkArea auswerten ???
1460
1461 if ( GetViewData() )
1462 {
1463 ScMarkData& rMark = pViewData->GetMarkData();
1464 ScRange aMarkRange;
1465 rMark.GetMarkArea( aMarkRange );
1466
1467 SCCOL nCol = aMarkRange.aEnd.Col();
1468 SCROW nRow = aMarkRange.aEnd.Row();
1469
1470 if ( (nCol+1 != aEdCol.GetCol()) || (nRow+1 != aEdRow.GetRow()) )
1471 SetCurrentCell( nCol, nRow );
1472 }
1473 }
1474
1475 //------------------------------------------------------------------------
1476
1477 SfxChildAlignment __EXPORT ScNavigatorDlg::CheckAlignment(
1478 SfxChildAlignment eActAlign, SfxChildAlignment eAlign )
1479 {
1480 SfxChildAlignment eRetAlign;
1481
1482 //! kein Andocken, wenn Listbox nicht da ???
1483
1484 switch (eAlign)
1485 {
1486 case SFX_ALIGN_TOP:
1487 case SFX_ALIGN_HIGHESTTOP:
1488 case SFX_ALIGN_LOWESTTOP:
1489 case SFX_ALIGN_BOTTOM:
1490 case SFX_ALIGN_LOWESTBOTTOM:
1491 case SFX_ALIGN_HIGHESTBOTTOM:
1492 eRetAlign = eActAlign; // nicht erlaubt
1493 break;
1494
1495 case SFX_ALIGN_LEFT:
1496 case SFX_ALIGN_RIGHT:
1497 case SFX_ALIGN_FIRSTLEFT:
1498 case SFX_ALIGN_LASTLEFT:
1499 case SFX_ALIGN_FIRSTRIGHT:
1500 case SFX_ALIGN_LASTRIGHT:
1501 eRetAlign = eAlign; // erlaubt
1502 break;
1503
1504 default:
1505 eRetAlign = eAlign;
1506 break;
1507 }
1508 return eRetAlign;
1509 }
1510
1511 //------------------------------------------------------------------------
1512 //
1513 // Drop auf den Navigator - andere Datei laden (File oder Bookmark)
1514 //
1515 //------------------------------------------------------------------------
1516
1517 #if 0
1518 BOOL __EXPORT ScNavigatorDlg::Drop( const DropEvent& rEvt )
1519 {
1520 BOOL bReturn = FALSE;
1521
1522 if ( !aLbEntries.IsInDrag() ) // kein Verschieben innerhalb der TreeListBox
1523 {
1524 String aFileName;
1525
1526 SvScDataObjectRef pObject = SvScDataObject::PasteDragServer(rEvt);
1527
1528 ULONG nFormat = INetBookmark::HasFormat(*pObject);
1529 INetBookmark aBookmark;
1530 if (aBookmark.Paste(*pObject,nFormat))
1531 aFileName = aBookmark.GetURL();
1532 else
1533 {
1534 // FORMAT_FILE direkt aus DragServer
1535
1536 USHORT nCount = DragServer::GetItemCount();
1537 for ( USHORT i = 0; i < nCount && !aFileName.Len(); ++i )
1538 if (DragServer::HasFormat( i, FORMAT_FILE ))
1539 aFileName = DragServer::PasteFile( i );
1540 }
1541
1542 if ( aFileName.Len() )
1543 bReturn = aLbEntries.LoadFile( aFileName );
1544 }
1545 return bReturn;
1546 }
1547
1548 BOOL __EXPORT ScNavigatorDlg::QueryDrop( DropEvent& rEvt )
1549 {
1550 BOOL bReturn = FALSE;
1551
1552 if ( !aLbEntries.IsInDrag() ) // kein Verschieben innerhalb der TreeListBox
1553 {
1554 SvScDataObjectRef pObject = SvScDataObject::PasteDragServer(rEvt);
1555 if ( pObject->HasFormat(FORMAT_FILE)
1556 || INetBookmark::HasFormat(*pObject) )
1557 {
1558 rEvt.SetAction(DROP_COPY); // Kopier-Cursor anzeigen
1559 bReturn = TRUE;
1560 }
1561 }
1562
1563 return bReturn;
1564 }
1565 #endif
1566
1567
1568
vba interoperability for OOo