xref: /AOO41X/main/sc/source/ui/view/cellsh4.cxx (revision 8809db7a87f97847b57a57f4cd2b0104b2b83182)
1 /**************************************************************
2  *
3  * Licensed to the Apache Software Foundation (ASF) under one
4  * or more contributor license agreements.  See the NOTICE file
5  * distributed with this work for additional information
6  * regarding copyright ownership.  The ASF licenses this file
7  * to you under the Apache License, Version 2.0 (the
8  * "License"); you may not use this file except in compliance
9  * with the License.  You may obtain a copy of the License at
10  *
11  *   http://www.apache.org/licenses/LICENSE-2.0
12  *
13  * Unless required by applicable law or agreed to in writing,
14  * software distributed under the License is distributed on an
15  * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
16  * KIND, either express or implied.  See the License for the
17  * specific language governing permissions and limitations
18  * under the License.
19  *
20  *************************************************************/
21 
22 
23 
24 // MARKER(update_precomp.py): autogen include statement, do not remove
25 #include "precompiled_sc.hxx"
26 
27 
28 
29 //------------------------------------------------------------------
30 
31 #ifdef _MSC_VER
32 #pragma optimize ("", off)
33 #endif
34 
35 // INCLUDE ---------------------------------------------------------------
36 
37 #include <sfx2/request.hxx>
38 
39 #include "cellsh.hxx"
40 #include "tabvwsh.hxx"
41 #include "global.hxx"
42 #include "scmod.hxx"
43 #include "inputhdl.hxx"
44 #include "inputwin.hxx"
45 #include "document.hxx"
46 #include "sc.hrc"
47 
48 
49 //------------------------------------------------------------------
50 
51 #define IS_AVAILABLE(WhichId,ppItem) \
52     (pReqArgs->GetItemState((WhichId), sal_True, ppItem ) == SFX_ITEM_SET)
53 
54 
55 void ScCellShell::ExecuteCursor( SfxRequest& rReq )
56 {
57     ScViewData* pData = GetViewData();
58     ScTabViewShell* pTabViewShell   = pData->GetViewShell();
59     const SfxItemSet*   pReqArgs = rReq.GetArgs();
60     sal_uInt16              nSlotId  = rReq.GetSlot();
61     SCsCOLROW           nRepeat = 1;
62     sal_Bool                bSel = sal_False;
63     sal_Bool                bKeep = sal_False;
64 
65     if ( pReqArgs != NULL )
66     {
67         const   SfxPoolItem* pItem;
68         if( IS_AVAILABLE( FN_PARAM_1, &pItem ) )
69             nRepeat = static_cast<SCsCOLROW>(((const SfxInt16Item*)pItem)->GetValue());
70         if( IS_AVAILABLE( FN_PARAM_2, &pItem ) )
71             bSel = ((const SfxBoolItem*)pItem)->GetValue();
72     }
73     else
74     {
75         //  evaluate locked selection mode
76 
77         sal_uInt16 nLocked = pTabViewShell->GetLockedModifiers();
78         if ( nLocked & KEY_SHIFT )
79             bSel = sal_True;                // EXT
80         else if ( nLocked & KEY_MOD1 )
81         {
82             // ADD mode: keep the selection, start a new block when marking with shift again
83             bKeep = sal_True;
84             pTabViewShell->SetNewStartIfMarking();
85         }
86     }
87 
88     SCsCOLROW nRTLSign = 1;
89     if ( pData->GetDocument()->IsLayoutRTL( pData->GetTabNo() ) )
90     {
91         //! evaluate cursor movement option?
92         nRTLSign = -1;
93     }
94 
95     // einmal extra, damit der Cursor bei ExecuteInputDirect nicht zuoft gemalt wird:
96     pTabViewShell->HideAllCursors();
97 
98     //OS: einmal fuer alle wird doch reichen!
99     pTabViewShell->ExecuteInputDirect();
100     switch ( nSlotId )
101     {
102         case SID_CURSORDOWN:
103             pTabViewShell->MoveCursorRel(   0,  nRepeat, SC_FOLLOW_LINE, bSel, bKeep );
104             break;
105 
106         case SID_CURSORBLKDOWN:
107             pTabViewShell->MoveCursorArea( 0, nRepeat, SC_FOLLOW_JUMP, bSel, bKeep );
108             break;
109 
110         case SID_CURSORUP:
111             pTabViewShell->MoveCursorRel(   0,  -nRepeat, SC_FOLLOW_LINE, bSel, bKeep );
112             break;
113 
114         case SID_CURSORBLKUP:
115             pTabViewShell->MoveCursorArea( 0, -nRepeat, SC_FOLLOW_JUMP, bSel, bKeep );
116             break;
117 
118         case SID_CURSORLEFT:
119             pTabViewShell->MoveCursorRel( static_cast<SCsCOL>(-nRepeat * nRTLSign), 0, SC_FOLLOW_LINE, bSel, bKeep );
120             break;
121 
122         case SID_CURSORBLKLEFT:
123             pTabViewShell->MoveCursorArea( static_cast<SCsCOL>(-nRepeat * nRTLSign), 0, SC_FOLLOW_JUMP, bSel, bKeep );
124             break;
125 
126         case SID_CURSORRIGHT:
127             pTabViewShell->MoveCursorRel(   static_cast<SCsCOL>(nRepeat * nRTLSign), 0, SC_FOLLOW_LINE, bSel, bKeep );
128             break;
129 
130         case SID_CURSORBLKRIGHT:
131             pTabViewShell->MoveCursorArea( static_cast<SCsCOL>(nRepeat * nRTLSign), 0, SC_FOLLOW_JUMP, bSel, bKeep );
132             break;
133 
134         case SID_CURSORPAGEDOWN:
135             pTabViewShell->MoveCursorPage(  0, nRepeat, SC_FOLLOW_FIX, bSel, bKeep );
136             break;
137 
138         case SID_CURSORPAGEUP:
139             pTabViewShell->MoveCursorPage(  0, -nRepeat, SC_FOLLOW_FIX, bSel, bKeep );
140             break;
141 
142         case SID_CURSORPAGERIGHT_: //XXX !!!
143             pTabViewShell->MoveCursorPage( static_cast<SCsCOL>(nRepeat), 0, SC_FOLLOW_FIX, bSel, bKeep );
144             break;
145 
146         case SID_CURSORPAGELEFT_: //XXX !!!
147             pTabViewShell->MoveCursorPage( static_cast<SCsCOL>(-nRepeat), 0, SC_FOLLOW_FIX, bSel, bKeep );
148             break;
149 
150         default:
151             DBG_ERROR("Unbekannte Message bei ViewShell (Cursor)");
152             return;
153     }
154 
155     pTabViewShell->ShowAllCursors();
156 
157     rReq.AppendItem( SfxInt16Item(FN_PARAM_1, static_cast<sal_Int16>(nRepeat)) );
158     rReq.AppendItem( SfxBoolItem(FN_PARAM_2, bSel) );
159     rReq.Done();
160 }
161 
162 void ScCellShell::GetStateCursor( SfxItemSet& /* rSet */ )
163 {
164 }
165 
166 void ScCellShell::ExecuteCursorSel( SfxRequest& rReq )
167 {
168     const SfxItemSet*   pReqArgs = rReq.GetArgs();
169     sal_uInt16              nSlotId  = rReq.GetSlot();
170     short               nRepeat = 1;
171 
172     if ( pReqArgs != NULL )
173     {
174         const   SfxPoolItem* pItem;
175         if( IS_AVAILABLE( FN_PARAM_1, &pItem ) )
176             nRepeat = ((const SfxInt16Item*)pItem)->GetValue();
177     }
178 
179     switch ( nSlotId )
180     {
181         case SID_CURSORDOWN_SEL:        rReq.SetSlot( SID_CURSORDOWN );  break;
182         case SID_CURSORBLKDOWN_SEL:     rReq.SetSlot( SID_CURSORBLKDOWN );  break;
183         case SID_CURSORUP_SEL:          rReq.SetSlot( SID_CURSORUP );  break;
184         case SID_CURSORBLKUP_SEL:       rReq.SetSlot( SID_CURSORBLKUP );  break;
185         case SID_CURSORLEFT_SEL:        rReq.SetSlot( SID_CURSORLEFT );  break;
186         case SID_CURSORBLKLEFT_SEL:     rReq.SetSlot( SID_CURSORBLKLEFT );  break;
187         case SID_CURSORRIGHT_SEL:       rReq.SetSlot( SID_CURSORRIGHT );  break;
188         case SID_CURSORBLKRIGHT_SEL:    rReq.SetSlot( SID_CURSORBLKRIGHT );  break;
189         case SID_CURSORPAGEDOWN_SEL:    rReq.SetSlot( SID_CURSORPAGEDOWN );  break;
190         case SID_CURSORPAGEUP_SEL:      rReq.SetSlot( SID_CURSORPAGEUP );  break;
191         case SID_CURSORPAGERIGHT_SEL:   rReq.SetSlot( SID_CURSORPAGERIGHT_ );  break;
192         case SID_CURSORPAGELEFT_SEL:    rReq.SetSlot( SID_CURSORPAGELEFT_ );  break;
193         default:
194             DBG_ERROR("Unbekannte Message bei ViewShell (CursorSel)");
195             return;
196     }
197     rReq.AppendItem( SfxInt16Item(FN_PARAM_1, nRepeat ) );
198     rReq.AppendItem( SfxBoolItem(FN_PARAM_2, sal_True) );
199     ExecuteSlot( rReq, GetInterface() );
200 }
201 
202 void ScCellShell::ExecuteMove( SfxRequest& rReq )
203 {
204     ScTabViewShell* pTabViewShell   = GetViewData()->GetViewShell();
205     sal_uInt16 nSlotId  = rReq.GetSlot();
206 
207     if(nSlotId != SID_CURSORTOPOFSCREEN && nSlotId != SID_CURSORENDOFSCREEN)
208         pTabViewShell->ExecuteInputDirect();
209     switch ( nSlotId )
210     {
211         case SID_NEXT_TABLE:
212         case SID_NEXT_TABLE_SEL:
213             pTabViewShell->SelectNextTab( 1, (nSlotId == SID_NEXT_TABLE_SEL) );
214             break;
215 
216         case SID_PREV_TABLE:
217         case SID_PREV_TABLE_SEL:
218             pTabViewShell->SelectNextTab( -1, (nSlotId == SID_PREV_TABLE_SEL) );
219             break;
220 
221         //  Cursorbewegungen in Bloecken gehen nicht von Basic aus,
222         //  weil das ScSbxRange-Objekt bei Eingaben die Markierung veraendert
223 
224         case SID_NEXT_UNPROTECT:
225             pTabViewShell->FindNextUnprot( sal_False, !rReq.IsAPI() );
226             break;
227 
228         case SID_PREV_UNPROTECT:
229             pTabViewShell->FindNextUnprot( sal_True, !rReq.IsAPI() );
230             break;
231 
232         case SID_CURSORENTERUP:
233             if (rReq.IsAPI())
234                 pTabViewShell->MoveCursorRel( 0, -1, SC_FOLLOW_LINE, sal_False );
235             else
236                 pTabViewShell->MoveCursorEnter( sal_True );
237             break;
238 
239         case SID_CURSORENTERDOWN:
240             if (rReq.IsAPI())
241                 pTabViewShell->MoveCursorRel( 0, 1, SC_FOLLOW_LINE, sal_False );
242             else
243                 pTabViewShell->MoveCursorEnter( sal_False );
244             break;
245 
246         case SID_SELECT_COL:
247             pTabViewShell->MarkColumns();
248             break;
249 
250         case SID_SELECT_ROW:
251             pTabViewShell->MarkRows();
252             break;
253 
254         case SID_SELECT_NONE:
255             pTabViewShell->Unmark();
256             break;
257 
258         case SID_ALIGNCURSOR:
259             pTabViewShell->AlignToCursor( GetViewData()->GetCurX(), GetViewData()->GetCurY(), SC_FOLLOW_JUMP );
260             break;
261 
262         case SID_MARKDATAAREA:
263             pTabViewShell->MarkDataArea();
264             break;
265 
266         case SID_MARKARRAYFORMULA:
267             pTabViewShell->MarkMatrixFormula();
268             break;
269 
270         case SID_SETINPUTMODE:
271             SC_MOD()->SetInputMode( SC_INPUT_TABLE );
272             break;
273 
274         case SID_FOCUS_INPUTLINE:
275             {
276                 ScInputHandler* pHdl = SC_MOD()->GetInputHdl( pTabViewShell );
277                 if (pHdl)
278                 {
279                     ScInputWindow* pWin = pHdl->GetInputWindow();
280                     if (pWin)
281                         pWin->SwitchToTextWin();
282                 }
283             }
284             break;
285 
286         case SID_CURSORTOPOFSCREEN:
287             pTabViewShell->MoveCursorScreen( 0, -1, SC_FOLLOW_LINE, sal_False );
288             break;
289 
290         case SID_CURSORENDOFSCREEN:
291             pTabViewShell->MoveCursorScreen( 0, 1, SC_FOLLOW_LINE, sal_False );
292             break;
293 
294         default:
295             DBG_ERROR("Unbekannte Message bei ViewShell (Cursor)");
296             return;
297     }
298 
299     rReq.Done();
300 }
301 
302 void ScCellShell::ExecutePageSel( SfxRequest& rReq )
303 {
304     sal_uInt16              nSlotId  = rReq.GetSlot();
305     switch ( nSlotId )
306     {
307         case SID_CURSORHOME_SEL:        rReq.SetSlot( SID_CURSORHOME );  break;
308         case SID_CURSOREND_SEL:         rReq.SetSlot( SID_CURSOREND );  break;
309         case SID_CURSORTOPOFFILE_SEL:   rReq.SetSlot( SID_CURSORTOPOFFILE );  break;
310         case SID_CURSORENDOFFILE_SEL:   rReq.SetSlot( SID_CURSORENDOFFILE );  break;
311         default:
312             DBG_ERROR("Unbekannte Message bei ViewShell (ExecutePageSel)");
313             return;
314     }
315     rReq.AppendItem( SfxBoolItem(FN_PARAM_2, sal_True) );
316     ExecuteSlot( rReq, GetInterface() );
317 }
318 
319 void ScCellShell::ExecutePage( SfxRequest& rReq )
320 {
321     ScTabViewShell* pTabViewShell   = GetViewData()->GetViewShell();
322     const SfxItemSet*   pReqArgs = rReq.GetArgs();
323     sal_uInt16              nSlotId  = rReq.GetSlot();
324     sal_Bool                bSel = sal_False;
325     sal_Bool                bKeep = sal_False;
326 
327     if ( pReqArgs != NULL )
328     {
329         const   SfxPoolItem* pItem;
330         if( IS_AVAILABLE( FN_PARAM_2, &pItem ) )
331             bSel = ((const SfxBoolItem*)pItem)->GetValue();
332     }
333     else
334     {
335         //  evaluate locked selection mode
336 
337         sal_uInt16 nLocked = pTabViewShell->GetLockedModifiers();
338         if ( nLocked & KEY_SHIFT )
339             bSel = sal_True;                // EXT
340         else if ( nLocked & KEY_MOD1 )
341         {
342             // ADD mode: keep the selection, start a new block when marking with shift again
343             bKeep = sal_True;
344             pTabViewShell->SetNewStartIfMarking();
345         }
346     }
347 
348     pTabViewShell->ExecuteInputDirect();
349     switch ( nSlotId )
350     {
351         case SID_CURSORHOME:
352             pTabViewShell->MoveCursorEnd( -1, 0, SC_FOLLOW_LINE, bSel, bKeep );
353             break;
354 
355         case SID_CURSOREND:
356             pTabViewShell->MoveCursorEnd( 1, 0, SC_FOLLOW_JUMP, bSel, bKeep );
357             break;
358 
359         case SID_CURSORTOPOFFILE:
360             pTabViewShell->MoveCursorEnd( -1, -1, SC_FOLLOW_LINE, bSel, bKeep );
361             break;
362 
363         case SID_CURSORENDOFFILE:
364             pTabViewShell->MoveCursorEnd( 1, 1, SC_FOLLOW_JUMP, bSel, bKeep );
365             break;
366 
367         default:
368             DBG_ERROR("Unbekannte Message bei ViewShell (ExecutePage)");
369             return;
370     }
371 
372     rReq.AppendItem( SfxBoolItem(FN_PARAM_2, bSel) );
373     rReq.Done();
374 }
375 
376 
377 
378 
379