xref: /aoo42x/main/sw/source/core/layout/flylay.cxx (revision efeef26f)
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_sw.hxx"
26 #include "doc.hxx"
27 #include "pagefrm.hxx"
28 #include "rootfrm.hxx"
29 #include "cntfrm.hxx"
30 #include "dview.hxx"
31 #include "dflyobj.hxx"
32 #include "dcontact.hxx"
33 #include "flyfrm.hxx"
34 #include "ftnfrm.hxx"
35 #include "frmtool.hxx"
36 #include "frmfmt.hxx"
37 #include "errhdl.hxx"
38 #include "hints.hxx"
39 #include "pam.hxx"
40 #include "sectfrm.hxx"
41 
42 
43 #include <svx/svdpage.hxx>
44 #include <editeng/ulspitem.hxx>
45 #include <fmtanchr.hxx>
46 #include <fmtornt.hxx>
47 #include <fmtfsize.hxx>
48 #include "ndole.hxx"
49 #include "tabfrm.hxx"
50 #include "flyfrms.hxx"
51 // OD 22.09.2003 #i18732#
52 #include <fmtfollowtextflow.hxx>
53 // OD 29.10.2003 #113049#
54 #include <environmentofanchoredobject.hxx>
55 // OD 2004-05-24 #i28701#
56 #include <sortedobjs.hxx>
57 #include <viewsh.hxx>
58 #include <viewimp.hxx>
59 
60 
61 using namespace ::com::sun::star;
62 
63 
64 /*************************************************************************
65 |*
66 |*	SwFlyFreeFrm::SwFlyFreeFrm(), ~SwFlyFreeFrm()
67 |*
68 |*	Ersterstellung		MA 03. Dec. 92
69 |*	Letzte Aenderung	MA 09. Apr. 99
70 |*
71 |*************************************************************************/
72 
73 SwFlyFreeFrm::SwFlyFreeFrm( SwFlyFrmFmt *pFmt, SwFrm* pSib, SwFrm *pAnch ) :
74 	SwFlyFrm( pFmt, pSib, pAnch ),
75     pPage( 0 ),
76     // --> OD 2004-11-15 #i34753#
77     mbNoMakePos( false ),
78     // <--
79     // --> OD 2004-11-12 #i37068#
80     mbNoMoveOnCheckClip( false )
81     // <--
82 {
83 }
84 
85 SwFlyFreeFrm::~SwFlyFreeFrm()
86 {
87 	//und Tschuess.
88     // --> OD 2004-06-30 #i28701# - use new method <GetPageFrm()>
89     if( GetPageFrm() )
90     {
91         if( GetFmt()->GetDoc()->IsInDtor() )
92         {
93             // --> OD 2004-06-04 #i29879# - remove also to-frame anchored Writer
94             // fly frame from page.
95             const bool bRemoveFromPage =
96                     GetPageFrm()->GetSortedObjs() &&
97                     ( IsFlyAtCntFrm() ||
98                       ( GetAnchorFrm() && GetAnchorFrm()->IsFlyFrm() ) );
99             if ( bRemoveFromPage )
100             {
101                 GetPageFrm()->GetSortedObjs()->Remove( *this );
102             }
103         }
104         else
105         {
106             SwRect aTmp( GetObjRectWithSpaces() );
107             SwFlyFreeFrm::NotifyBackground( GetPageFrm(), aTmp, PREP_FLY_LEAVE );
108         }
109     }
110 }
111 
112 // --> OD 2004-06-29 #i28701#
113 TYPEINIT1(SwFlyFreeFrm,SwFlyFrm);
114 // <--
115 /*************************************************************************
116 |*
117 |*	SwFlyFreeFrm::NotifyBackground()
118 |*
119 |*	Beschreibung		Benachrichtigt den Hintergrund (alle CntntFrms die
120 |*		gerade ueberlappt werden. Ausserdem wird das Window in einigen
121 |* 		Faellen direkt invalidiert (vor allem dort, wo keine CntntFrms
122 |*		ueberlappt werden.
123 |* 		Es werden auch die CntntFrms innerhalb von anderen Flys
124 |*		beruecksichtigt.
125 |*	Ersterstellung		MA 03. Dec. 92
126 |*	Letzte Aenderung	MA 26. Aug. 93
127 |*
128 |*************************************************************************/
129 
130 void SwFlyFreeFrm::NotifyBackground( SwPageFrm *pPageFrm,
131 									 const SwRect& rRect, PrepareHint eHint )
132 {
133     ::Notify_Background( GetVirtDrawObj(), pPageFrm, rRect, eHint, sal_True );
134 }
135 
136 /*************************************************************************
137 |*
138 |*	SwFlyFreeFrm::MakeAll()
139 |*
140 |*	Ersterstellung		MA 18. Feb. 94
141 |*	Letzte Aenderung	MA 03. Mar. 97
142 |*
143 |*************************************************************************/
144 
145 void SwFlyFreeFrm::MakeAll()
146 {
147     // OD 2004-01-19 #110582#
148     if ( !GetFmt()->GetDoc()->IsVisibleLayerId( GetVirtDrawObj()->GetLayer() ) )
149     {
150         return;
151     }
152 
153     if ( !GetAnchorFrm() || IsLocked() || IsColLocked() )
154 		return;
155     // --> OD 2004-06-30 #i28701# - use new method <GetPageFrm()>
156     if( !GetPageFrm() && GetAnchorFrm() && GetAnchorFrm()->IsInFly() )
157     {
158         SwFlyFrm* pFly = AnchorFrm()->FindFlyFrm();
159         SwPageFrm *pPageFrm = pFly ? pFly->FindPageFrm() : NULL;
160         if( pPageFrm )
161             pPageFrm->AppendFlyToPage( this );
162     }
163     if( !GetPageFrm() )
164         return;
165 
166 	Lock();	//Der Vorhang faellt
167 
168 	//uebernimmt im DTor die Benachrichtigung
169 	const SwFlyNotify aNotify( this );
170 
171 	if ( IsClipped() )
172     {
173         bValidSize = bHeightClipped = bWidthClipped = sal_False;
174         // --> OD 2004-11-03 #114798# - no invalidation of position,
175         // if anchored object is anchored inside a Writer fly frame,
176         // its position is already locked, and it follows the text flow.
177         // --> OD 2004-11-15 #i34753# - add condition:
178         // no invalidation of position, if no direct move is requested in <CheckClip(..)>
179         if ( !IsNoMoveOnCheckClip() &&
180              !( PositionLocked() &&
181                 GetAnchorFrm()->IsInFly() &&
182                 GetFrmFmt().GetFollowTextFlow().GetValue() ) )
183         // <--
184         {
185             bValidPos = sal_False;
186         }
187         // <--
188     }
189 
190     // FME 2007-08-30 #i81146# new loop control
191     sal_uInt16 nLoopControlRuns = 0;
192     const sal_uInt16 nLoopControlMax = 10;
193 
194 	while ( !bValidPos || !bValidSize || !bValidPrtArea || bFormatHeightOnly )
195 	{
196         SWRECTFN( this )
197         const SwFmtFrmSize *pSz;
198 		{	//Zusaetzlicher Scope, damit aAccess vor dem Check zerstoert wird!
199 
200 			SwBorderAttrAccess aAccess( SwFrm::GetCache(), this );
201 			const SwBorderAttrs &rAttrs = *aAccess.Get();
202 			pSz = &rAttrs.GetAttrSet().GetFrmSize();
203 
204 			//Nur einstellen wenn das Flag gesetzt ist!!
205 			if ( !bValidSize )
206 			{
207 				bValidPrtArea = sal_False;
208 /*
209                 // This is also done in the Format function, so I think
210                 // this code is not necessary anymore:
211                 const Size aRelSize( CalcRel( *pSz ) );
212 				const SwTwips nMin = MINFLY + rAttrs.CalcLeftLine()+rAttrs.CalcRightLine();
213                 long nDiff = bVert ? aRelSize.Height() : aRelSize.Width();
214                 if( nDiff < nMin )
215                     nDiff = nMin;
216                 nDiff -= (aFrm.*fnRect->fnGetWidth)();
217                 if( nDiff )
218                 {
219                     (aFrm.*fnRect->fnAddRight)( nDiff );
220                     bValidPos = sal_False;
221                 }
222 */
223 			}
224 
225 			if ( !bValidPrtArea )
226 				MakePrtArea( rAttrs );
227 
228 			if ( !bValidSize || bFormatHeightOnly )
229 			{
230 				bValidSize = sal_False;
231 				Format( &rAttrs );
232 				bFormatHeightOnly = sal_False;
233 			}
234 
235 			if ( !bValidPos )
236 			{
237                 const Point aOldPos( (Frm().*fnRect->fnGetPos)() );
238                 // OD 2004-03-23 #i26791# - use new method <MakeObjPos()>
239                 // --> OD 2004-11-15 #i34753# - no positioning, if requested.
240                 if ( IsNoMakePos() )
241                     bValidPos = sal_True;
242                 else
243                     // OD 2004-03-23 #i26791# - use new method <MakeObjPos()>
244                     MakeObjPos();
245                 // <--
246                 if( aOldPos == (Frm().*fnRect->fnGetPos)() )
247 				{
248                     if( !bValidPos && GetAnchorFrm()->IsInSct() &&
249                         !GetAnchorFrm()->FindSctFrm()->IsValid() )
250 						bValidPos = sal_True;
251 				}
252 				else
253 					bValidSize = sal_False;
254 			}
255 		}
256 
257         if ( bValidPos && bValidSize )
258         {
259             ++nLoopControlRuns;
260 
261 #if OSL_DEBUG_LEVEL > 1
262             ASSERT( nLoopControlRuns < nLoopControlMax, "LoopControl in SwFlyFreeFrm::MakeAll" )
263 #endif
264 
265             if ( nLoopControlRuns < nLoopControlMax )
266 			    CheckClip( *pSz );
267         }
268         else
269             nLoopControlRuns = 0;
270 	}
271 	Unlock();
272 
273 #ifdef DBG_UTIL
274     SWRECTFN( this )
275     ASSERT( bHeightClipped || ( (Frm().*fnRect->fnGetHeight)() > 0 &&
276             (Prt().*fnRect->fnGetHeight)() > 0),
277 			"SwFlyFreeFrm::Format(), flipping Fly." );
278 
279 #endif
280 }
281 
282 /** determines, if direct environment of fly frame has 'auto' size
283 
284     OD 07.08.2003 #i17297#, #111066#, #111070#
285     start with anchor frame and search via <GetUpper()> for a header, footer,
286     row or fly frame stopping at page frame.
287     return <true>, if such a frame is found and it has 'auto' size.
288     otherwise <false> is returned.
289 
290     @author OD
291 
292     @return boolean indicating, that direct environment has 'auto' size
293 */
294 bool SwFlyFreeFrm::HasEnvironmentAutoSize() const
295 {
296     bool bRetVal = false;
297 
298     const SwFrm* pToBeCheckedFrm = GetAnchorFrm();
299     while ( pToBeCheckedFrm &&
300             !pToBeCheckedFrm->IsPageFrm() )
301     {
302         if ( pToBeCheckedFrm->IsHeaderFrm() ||
303              pToBeCheckedFrm->IsFooterFrm() ||
304              pToBeCheckedFrm->IsRowFrm() ||
305              pToBeCheckedFrm->IsFlyFrm() )
306         {
307             bRetVal = ATT_FIX_SIZE !=
308                       pToBeCheckedFrm->GetAttrSet()->GetFrmSize().GetHeightSizeType();
309             break;
310         }
311         else
312         {
313             pToBeCheckedFrm = pToBeCheckedFrm->GetUpper();
314         }
315     }
316 
317     return bRetVal;
318 }
319 
320 /*************************************************************************
321 |*
322 |*	SwFlyFreeFrm::CheckClip()
323 |*
324 |*	Ersterstellung		MA 21. Feb. 94
325 |*	Letzte Aenderung	MA 03. Mar. 97
326 |*
327 |*************************************************************************/
328 
329 void SwFlyFreeFrm::CheckClip( const SwFmtFrmSize &rSz )
330 {
331 	//Jetzt ist es ggf. an der Zeit geignete Massnahmen zu ergreifen wenn
332 	//der Fly nicht in seine Umgebung passt.
333     //Zuerst gibt der Fly seine Position auf. Danach wird er zunaechst
334     //formatiert. Erst wenn er auch durch die Aufgabe der Position nicht
335 	//passt wird die Breite oder Hoehe aufgegeben - der Rahmen wird soweit
336 	//wie notwendig zusammengequetscht.
337 
338 	const SwVirtFlyDrawObj *pObj = GetVirtDrawObj();
339 	SwRect aClip, aTmpStretch;
340 	::CalcClipRect( pObj, aClip, sal_True );
341 	::CalcClipRect( pObj, aTmpStretch, sal_False );
342 	aClip._Intersection( aTmpStretch );
343 
344     const long nBot = Frm().Top() + Frm().Height();
345     const long nRig = Frm().Left() + Frm().Width();
346     const long nClipBot = aClip.Top() + aClip.Height();
347     const long nClipRig = aClip.Left() + aClip.Width();
348 
349 	const sal_Bool bBot = nBot > nClipBot;
350 	const sal_Bool bRig = nRig > nClipRig;
351 	if ( bBot || bRig )
352 	{
353 		sal_Bool bAgain = sal_False;
354         // --> OD 2004-11-12 #i37068# - no move, if it's requested
355         if ( bBot && !IsNoMoveOnCheckClip() &&
356              !GetDrawObjs() && !GetAnchorFrm()->IsInTab() )
357         // <--
358 		{
359 			SwFrm* pHeader = FindFooterOrHeader();
360 			// In a header, correction of the position is no good idea.
361 			// If the fly moves, some paragraphs has to be formatted, this
362             // could cause a change of the height of the headerframe,
363 			// now the flyframe can change its position and so on ...
364             if ( !pHeader || !pHeader->IsHeaderFrm() )
365 			{
366 				const long nOld = Frm().Top();
367                 Frm().Pos().Y() = Max( aClip.Top(), nClipBot - Frm().Height() );
368                 if ( Frm().Top() != nOld )
369 					bAgain = sal_True;
370 				bHeightClipped = sal_True;
371 			}
372 		}
373 		if ( bRig )
374 		{
375 			const long nOld = Frm().Left();
376             Frm().Pos().X() = Max( aClip.Left(), nClipRig - Frm().Width() );
377 			if ( Frm().Left() != nOld )
378 			{
379 				const SwFmtHoriOrient &rH = GetFmt()->GetHoriOrient();
380 				// Links ausgerichtete duerfen nicht nach links verschoben werden,
381 				// wenn sie einem anderen ausweichen.
382                 if( rH.GetHoriOrient() == text::HoriOrientation::LEFT )
383 					Frm().Pos().X() = nOld;
384 				else
385 					bAgain = sal_True;
386 			}
387 			bWidthClipped = sal_True;
388 		}
389 		if ( bAgain )
390 			bValidSize = sal_False;
391 		else
392 		{
393 			//Wenn wir hier ankommen ragt der Frm in unerlaubte Bereiche
394 			//hinein, und eine Positionskorrektur ist nicht erlaubt bzw.
395 			//moeglich oder noetig.
396 
397 			//Fuer Flys mit OLE-Objekten als Lower sorgen wir dafuer, dass
398 			//immer proportional Resized wird.
399 			Size aOldSize( Frm().SSize() );
400 
401 			//Zuerst wird das FrmRect eingestellt, und dann auf den Frm
402 			//uebertragen.
403 			SwRect aFrmRect( Frm() );
404 
405 			if ( bBot )
406 			{
407 				long nDiff = nClipBot;
408                 nDiff -= aFrmRect.Top(); //nDiff ist die verfuegbare Strecke.
409 				nDiff = aFrmRect.Height() - nDiff;
410 				aFrmRect.Height( aFrmRect.Height() - nDiff );
411 				bHeightClipped = sal_True;
412 			}
413 			if ( bRig )
414 			{
415 				long nDiff = nClipRig;
416                 nDiff -= aFrmRect.Left();//nDiff ist die verfuegbare Strecke.
417 				nDiff = aFrmRect.Width() - nDiff;
418 				aFrmRect.Width( aFrmRect.Width() - nDiff );
419 				bWidthClipped = sal_True;
420 			}
421 
422             // OD 06.08.2003 #i17297#, #111066#, #111070# - no proportional
423             // scaling of graphics in environments, which determines its size
424             // by its content ('auto' size). Otherwise layout loops can occur and
425             // layout sizes of the environment can be incorrect.
426             // Such environment are:
427             // (1) header and footer frames with 'auto' size
428             // (2) table row frames with 'auto' size
429             // (3) fly frames with 'auto' size
430 			// Note: section frames seems to be not critical - didn't found
431             //       any critical layout situation so far.
432             if ( Lower() && Lower()->IsNoTxtFrm() &&
433                  ( static_cast<SwCntntFrm*>(Lower())->GetNode()->GetOLENode() ||
434                    !HasEnvironmentAutoSize() ) )
435 			{
436 				//Wenn Breite und Hoehe angepasst wurden, so ist die
437 				//groessere Veraenderung massgeblich.
438 				if ( aFrmRect.Width() != aOldSize.Width() &&
439 					 aFrmRect.Height()!= aOldSize.Height() )
440 				{
441 					if ( (aOldSize.Width() - aFrmRect.Width()) >
442 						 (aOldSize.Height()- aFrmRect.Height())	)
443 						aFrmRect.Height( aOldSize.Height() );
444 					else
445 						aFrmRect.Width( aOldSize.Width() );
446 				}
447 
448 				//Breite angepasst? - Hoehe dann proportional verkleinern
449 				if( aFrmRect.Width() != aOldSize.Width() )
450                 {
451 					aFrmRect.Height( aFrmRect.Width() * aOldSize.Height() /
452 									 aOldSize.Width() );
453                     bHeightClipped = sal_True;
454                 }
455 				//Hoehe angepasst? - Breite dann proportional verkleinern
456                 else if( aFrmRect.Height() != aOldSize.Height() )
457                 {
458 					aFrmRect.Width( aFrmRect.Height() * aOldSize.Width() /
459 									aOldSize.Height() );
460                     bWidthClipped = sal_True;
461                 }
462 
463                 // OD 07.08.2003 #i17297#, #111066#, #111070# - reactivate change
464                 // of size attribute for fly frames containing an ole object.
465                 // FME: 2004-05-19 Added the aFrmRect.HasArea() hack, because
466                 // the environment of the ole object does not have to be valid
467                 // at this moment, or even worse, it does not have to have a
468                 // resonable size. In this case we do not want to change to
469                 // attributes permanentely. Maybe one day somebody dares to remove
470                 // this code.
471                 if ( aFrmRect.HasArea() &&
472                      static_cast<SwCntntFrm*>(Lower())->GetNode()->GetOLENode() &&
473                      ( bWidthClipped || bHeightClipped ) )
474                 {
475                     SwFlyFrmFmt *pFmt = (SwFlyFrmFmt*)GetFmt();
476                     pFmt->LockModify();
477                     SwFmtFrmSize aFrmSize( rSz );
478                     aFrmSize.SetWidth( aFrmRect.Width() );
479                     aFrmSize.SetHeight( aFrmRect.Height() );
480                     pFmt->SetFmtAttr( aFrmSize );
481                     pFmt->UnlockModify();
482                 }
483 			}
484 
485 			//Jetzt die Einstellungen am Frm vornehmen, bei Spalten werden
486 			//die neuen Werte in die Attribute eingetragen, weil es sonst
487 			//ziemlich fiese Oszillationen gibt.
488 			const long nPrtHeightDiff = Frm().Height() - Prt().Height();
489 			const long nPrtWidthDiff  = Frm().Width()  - Prt().Width();
490 			Frm().Height( aFrmRect.Height() );
491 			Frm().Width ( Max( long(MINLAY), aFrmRect.Width() ) );
492 			if ( Lower() && Lower()->IsColumnFrm() )
493 			{
494 				ColLock();	//Grow/Shrink locken.
495                 const Size aTmpOldSize( Prt().SSize() );
496 				Prt().Height( Frm().Height() - nPrtHeightDiff );
497 				Prt().Width ( Frm().Width()  - nPrtWidthDiff );
498                 ChgLowersProp( aTmpOldSize );
499 				SwFrm *pLow = Lower();
500 				do
501 				{	pLow->Calc();
502 					// auch den (Column)BodyFrm mitkalkulieren
503 					((SwLayoutFrm*)pLow)->Lower()->Calc();
504 					pLow = pLow->GetNext();
505 				} while ( pLow );
506 				::CalcCntnt( this );
507 				ColUnlock();
508 				if ( !bValidSize && !bWidthClipped )
509 					bFormatHeightOnly = bValidSize = sal_True;
510 			}
511 			else
512 			{
513 				Prt().Height( Frm().Height() - nPrtHeightDiff );
514 				Prt().Width ( Frm().Width()  - nPrtWidthDiff );
515 			}
516 		}
517 	}
518 
519     // --> OD 2004-10-14 #i26945#
520     ASSERT( Frm().Height() >= 0,
521             "<SwFlyFreeFrm::CheckClip(..)> - fly frame has negative height now." );
522     // <--
523 }
524 
525 /** method to determine, if a <MakeAll()> on the Writer fly frame is possible
526 
527     OD 2005-03-03 #i43771#
528 
529     @author OD
530 */
531 bool SwFlyFreeFrm::IsFormatPossible() const
532 {
533     return SwFlyFrm::IsFormatPossible() &&
534            ( GetPageFrm() ||
535              ( GetAnchorFrm() && GetAnchorFrm()->IsInFly() ) );
536 }
537 
538 /*************************************************************************
539 |*
540 |*	SwFlyLayFrm::SwFlyLayFrm()
541 |*
542 |*	Ersterstellung		MA 25. Aug. 92
543 |*	Letzte Aenderung	MA 09. Apr. 99
544 |*
545 |*************************************************************************/
546 
547 SwFlyLayFrm::SwFlyLayFrm( SwFlyFrmFmt *pFmt, SwFrm* pSib, SwFrm *pAnch ) :
548 	SwFlyFreeFrm( pFmt, pSib, pAnch )
549 {
550 	bLayout = sal_True;
551 }
552 
553 // --> OD 2004-06-29 #i28701#
554 TYPEINIT1(SwFlyLayFrm,SwFlyFreeFrm);
555 // <--
556 /*************************************************************************
557 |*
558 |*	SwFlyLayFrm::Modify()
559 |*
560 |*	Ersterstellung		MA 08. Feb. 93
561 |*	Letzte Aenderung	MA 28. Aug. 93
562 |*
563 |*************************************************************************/
564 
565 void SwFlyLayFrm::Modify( const SfxPoolItem* pOld, const SfxPoolItem *pNew )
566 {
567 	sal_uInt16 nWhich = pNew ? pNew->Which() : 0;
568 
569 	SwFmtAnchor *pAnch = 0;
570 	if( RES_ATTRSET_CHG == nWhich && SFX_ITEM_SET ==
571 		((SwAttrSetChg*)pNew)->GetChgSet()->GetItemState( RES_ANCHOR, sal_False,
572 			(const SfxPoolItem**)&pAnch ))
573 		;		// Beim GetItemState wird der AnkerPointer gesetzt !
574 
575 	else if( RES_ANCHOR == nWhich )
576 	{
577 		//Ankerwechsel, ich haenge mich selbst um.
578 		//Es darf sich nicht um einen Wechsel des Ankertyps handeln,
579 		//dies ist nur ueber die SwFEShell moeglich.
580 		pAnch = (SwFmtAnchor*)pNew;
581 	}
582 
583 	if( pAnch )
584 	{
585 		ASSERT( pAnch->GetAnchorId() ==
586 				GetFmt()->GetAnchor().GetAnchorId(),
587 				"8-) Unzulaessiger Wechsel des Ankertyps." );
588 
589 		//Abmelden, Seite besorgen, an den entsprechenden LayoutFrm
590 		//haengen.
591         SwRect aOld( GetObjRectWithSpaces() );
592         // --> OD 2004-06-30 #i28701# - use new method <GetPageFrm()>
593         SwPageFrm *pOldPage = GetPageFrm();
594         AnchorFrm()->RemoveFly( this );
595 
596         if ( FLY_AT_PAGE == pAnch->GetAnchorId() )
597         {
598 			sal_uInt16 nPgNum = pAnch->GetPageNum();
599 			SwRootFrm *pRoot = getRootFrm();
600             SwPageFrm *pTmpPage = (SwPageFrm*)pRoot->Lower();
601             for ( sal_uInt16 i = 1; (i <= nPgNum) && pTmpPage; ++i,
602                                 pTmpPage = (SwPageFrm*)pTmpPage->GetNext() )
603 			{
604 				if ( i == nPgNum )
605                 {
606                     // --> OD 2005-06-09 #i50432# - adjust synopsis of <PlaceFly(..)>
607                     pTmpPage->PlaceFly( this, 0 );
608                     // <--
609                 }
610 			}
611             if( !pTmpPage )
612 			{
613 				pRoot->SetAssertFlyPages();
614 				pRoot->AssertFlyPages();
615 			}
616 		}
617 		else
618 		{
619 			SwNodeIndex aIdx( pAnch->GetCntntAnchor()->nNode );
620 			SwCntntFrm *pCntnt = GetFmt()->GetDoc()->GetNodes().GoNext( &aIdx )->
621 						 GetCntntNode()->getLayoutFrm( getRootFrm(), 0, 0, sal_False );
622 			if( pCntnt )
623 			{
624 				SwFlyFrm *pTmp = pCntnt->FindFlyFrm();
625 				if( pTmp )
626 					pTmp->AppendFly( this );
627 			}
628 		}
629         // --> OD 2004-06-30 #i28701# - use new method <GetPageFrm()>
630         if ( pOldPage && pOldPage != GetPageFrm() )
631 			NotifyBackground( pOldPage, aOld, PREP_FLY_LEAVE );
632 		SetCompletePaint();
633 		InvalidateAll();
634 		SetNotifyBack();
635 	}
636 	else
637 		SwFlyFrm::Modify( pOld, pNew );
638 }
639 
640 /*************************************************************************
641 |*
642 |*	SwPageFrm::AppendFly()
643 |*
644 |*	Ersterstellung		MA 10. Oct. 92
645 |*	Letzte Aenderung	MA 08. Jun. 96
646 |*
647 |*************************************************************************/
648 
649 void SwPageFrm::AppendFlyToPage( SwFlyFrm *pNew )
650 {
651 	if ( !pNew->GetVirtDrawObj()->IsInserted() )
652 		getRootFrm()->GetDrawPage()->InsertObject(
653 				(SdrObject*)pNew->GetVirtDrawObj(),
654 				pNew->GetVirtDrawObj()->GetReferencedObj().GetOrdNumDirect() );
655 
656 	InvalidateSpelling();
657     InvalidateSmartTags();  // SMARTTAGS
658 	InvalidateAutoCompleteWords();
659     InvalidateWordCount();
660 
661 	if ( GetUpper() )
662 	{
663 		((SwRootFrm*)GetUpper())->SetIdleFlags();
664 		((SwRootFrm*)GetUpper())->InvalidateBrowseWidth();
665 	}
666 
667     SdrObject* pObj = pNew->GetVirtDrawObj();
668     ASSERT( pNew->GetAnchorFrm(), "Fly without Anchor" );
669     const SwFlyFrm* pFly = pNew->GetAnchorFrm()->FindFlyFrm();
670 	if ( pFly && pObj->GetOrdNum() < pFly->GetVirtDrawObj()->GetOrdNum() )
671 	{
672         sal_uInt32 nNewNum = pFly->GetVirtDrawObj()->GetOrdNumDirect();
673 		if ( pObj->GetPage() )
674 			pObj->GetPage()->SetObjectOrdNum( pObj->GetOrdNumDirect(), nNewNum);
675 		else
676 			pObj->SetOrdNum( nNewNum );
677 	}
678 
679 	//Flys die im Cntnt sitzen beachten wir nicht weiter.
680 	if ( pNew->IsFlyInCntFrm() )
681 		InvalidateFlyInCnt();
682     else
683     {
684         InvalidateFlyCntnt();
685 
686         if ( !pSortedObjs )
687             pSortedObjs = new SwSortedObjs();
688 
689 #if OSL_DEBUG_LEVEL > 1
690         const bool bSucessInserted =
691 #endif
692         pSortedObjs->Insert( *pNew );
693 #if OSL_DEBUG_LEVEL > 1
694         ASSERT( bSucessInserted, "Fly nicht in Sorted eingetragen." )
695         (void) bSucessInserted;
696 #endif
697 
698         // --> OD 2008-04-22 #i87493#
699         ASSERT( pNew->GetPageFrm() == 0 || pNew->GetPageFrm() == this,
700                 "<SwPageFrm::AppendFlyToPage(..)> - anchored fly frame seems to be registered at another page frame. Serious defect -> please inform OD." );
701         // <--
702         // --> OD 2004-06-30 #i28701# - use new method <SetPageFrm(..)>
703         pNew->SetPageFrm( this );
704         pNew->InvalidatePage( this );
705         // OD 2004-05-17 #i28701#
706         pNew->UnlockPosition();
707 
708 		// Notify accessible layout. That's required at this place for
709 		// frames only where the anchor is moved. Creation of new frames
710 		// is additionally handled by the SwFrmNotify class.
711 		if( GetUpper() &&
712 			static_cast< SwRootFrm * >( GetUpper() )->IsAnyShellAccessible() &&
713 		 	static_cast< SwRootFrm * >( GetUpper() )->GetCurrShell() )
714 		{
715 			static_cast< SwRootFrm * >( GetUpper() )->GetCurrShell()->Imp()
716 									  ->AddAccessibleFrm( pNew );
717 		}
718     }
719 
720     // --> OD 2004-06-09 #i28701# - correction: consider also drawing objects
721     if ( pNew->GetDrawObjs() )
722     {
723         SwSortedObjs &rObjs = *pNew->GetDrawObjs();
724         for ( sal_uInt16 i = 0; i < rObjs.Count(); ++i )
725         {
726             SwAnchoredObject* pTmpObj = rObjs[i];
727             if ( pTmpObj->ISA(SwFlyFrm) )
728             {
729                 SwFlyFrm* pTmpFly = static_cast<SwFlyFrm*>(pTmpObj);
730                 // --> OD 2004-06-30 #i28701# - use new method <GetPageFrm()>
731                 if ( pTmpFly->IsFlyFreeFrm() && !pTmpFly->GetPageFrm() )
732                     AppendFlyToPage( pTmpFly );
733             }
734             else if ( pTmpObj->ISA(SwAnchoredDrawObject) )
735             {
736                 // --> OD 2008-04-22 #i87493#
737 //                AppendDrawObjToPage( *pTmpObj );
738                 if ( pTmpObj->GetPageFrm() != this )
739                 {
740                     if ( pTmpObj->GetPageFrm() != 0 )
741                     {
742                         pTmpObj->GetPageFrm()->RemoveDrawObjFromPage( *pTmpObj );
743                     }
744                     AppendDrawObjToPage( *pTmpObj );
745                 }
746                 // <--
747             }
748         }
749     }
750 }
751 
752 /*************************************************************************
753 |*
754 |*	SwPageFrm::RemoveFly()
755 |*
756 |*	Ersterstellung		MA 10. Oct. 92
757 |*	Letzte Aenderung	MA 26. Aug. 96
758 |*
759 |*************************************************************************/
760 
761 void SwPageFrm::RemoveFlyFromPage( SwFlyFrm *pToRemove )
762 {
763 	const sal_uInt32 nOrdNum = pToRemove->GetVirtDrawObj()->GetOrdNum();
764 	getRootFrm()->GetDrawPage()->RemoveObject( nOrdNum );
765 	pToRemove->GetVirtDrawObj()->ReferencedObj().SetOrdNum( nOrdNum );
766 
767 	if ( GetUpper() )
768 	{
769 		if ( !pToRemove->IsFlyInCntFrm() )
770 			((SwRootFrm*)GetUpper())->SetSuperfluous();
771 		((SwRootFrm*)GetUpper())->InvalidateBrowseWidth();
772 	}
773 
774 	//Flys die im Cntnt sitzen beachten wir nicht weiter.
775 	if ( pToRemove->IsFlyInCntFrm() )
776 		return;
777 
778 	// Notify accessible layout. That's required at this place for
779 	// frames only where the anchor is moved. Creation of new frames
780 	// is additionally handled by the SwFrmNotify class.
781 	if( GetUpper() &&
782 		static_cast< SwRootFrm * >( GetUpper() )->IsAnyShellAccessible() &&
783 		static_cast< SwRootFrm * >( GetUpper() )->GetCurrShell() )
784 	{
785 		static_cast< SwRootFrm * >( GetUpper() )->GetCurrShell()->Imp()
786 								  ->DisposeAccessibleFrm( pToRemove, sal_True );
787 	}
788 
789 	//Collections noch nicht loeschen. Das passiert am Ende
790 	//der Action im RemoveSuperfluous der Seite - angestossen von gleich-
791 	//namiger Methode der Root.
792 	//Die FlyColl kann bereits weg sein, weil der DTor der Seite
793 	//gerade 'laeuft'
794 	if ( pSortedObjs )
795 	{
796         pSortedObjs->Remove( *pToRemove );
797 		if ( !pSortedObjs->Count() )
798 		{	DELETEZ( pSortedObjs );
799 		}
800 	}
801     // --> OD 2004-06-30 #i28701# - use new method <SetPageFrm(..)>
802     pToRemove->SetPageFrm( 0L );
803 }
804 
805 /*************************************************************************
806 |*
807 |*	SwPageFrm::MoveFly
808 |*
809 |*	Ersterstellung		MA 25. Jan. 97
810 |*	Letzte Aenderung	MA 25. Jan. 97
811 |*
812 |*************************************************************************/
813 
814 void SwPageFrm::MoveFly( SwFlyFrm *pToMove, SwPageFrm *pDest )
815 {
816 	//Invalidierungen
817 	if ( GetUpper() )
818 	{
819 		((SwRootFrm*)GetUpper())->SetIdleFlags();
820 		if ( !pToMove->IsFlyInCntFrm() && pDest->GetPhyPageNum() < GetPhyPageNum() )
821 			((SwRootFrm*)GetUpper())->SetSuperfluous();
822 	}
823 
824 	pDest->InvalidateSpelling();
825     pDest->InvalidateSmartTags();   // SMARTTAGS
826 	pDest->InvalidateAutoCompleteWords();
827     pDest->InvalidateWordCount();
828 
829     if ( pToMove->IsFlyInCntFrm() )
830 	{
831 		pDest->InvalidateFlyInCnt();
832 		return;
833 	}
834 
835 	// Notify accessible layout. That's required at this place for
836 	// frames only where the anchor is moved. Creation of new frames
837 	// is additionally handled by the SwFrmNotify class.
838 	if( GetUpper() &&
839 		static_cast< SwRootFrm * >( GetUpper() )->IsAnyShellAccessible() &&
840 		static_cast< SwRootFrm * >( GetUpper() )->GetCurrShell() )
841 	{
842 		static_cast< SwRootFrm * >( GetUpper() )->GetCurrShell()->Imp()
843 								  ->DisposeAccessibleFrm( pToMove, sal_True );
844 	}
845 
846 	//Die FlyColl kann bereits weg sein, weil der DTor der Seite
847 	//gerade 'laeuft'
848 	if ( pSortedObjs )
849 	{
850         pSortedObjs->Remove( *pToMove );
851 		if ( !pSortedObjs->Count() )
852 		{	DELETEZ( pSortedObjs );
853 		}
854 	}
855 
856 	//Anmelden
857 	if ( !pDest->GetSortedObjs() )
858         pDest->pSortedObjs = new SwSortedObjs();
859 
860 #if OSL_DEBUG_LEVEL > 1
861     const bool bSucessInserted =
862 #endif
863     pDest->GetSortedObjs()->Insert( *pToMove );
864 #if OSL_DEBUG_LEVEL > 1
865 	ASSERT( bSucessInserted, "Fly nicht in Sorted eingetragen." )
866     (void) bSucessInserted;
867 #endif
868 
869     // --> OD 2004-06-30 #i28701# - use new method <SetPageFrm(..)>
870     pToMove->SetPageFrm( pDest );
871 	pToMove->InvalidatePage( pDest );
872 	pToMove->SetNotifyBack();
873 	pDest->InvalidateFlyCntnt();
874     // OD 2004-05-17 #i28701#
875     pToMove->UnlockPosition();
876 
877 	// Notify accessible layout. That's required at this place for
878 	// frames only where the anchor is moved. Creation of new frames
879 	// is additionally handled by the SwFrmNotify class.
880 	if( GetUpper() &&
881 		static_cast< SwRootFrm * >( GetUpper() )->IsAnyShellAccessible() &&
882 		static_cast< SwRootFrm * >( GetUpper() )->GetCurrShell() )
883 	{
884 		static_cast< SwRootFrm * >( GetUpper() )->GetCurrShell()->Imp()
885 								  ->AddAccessibleFrm( pToMove );
886 	}
887 
888     // --> OD 2004-06-09 #i28701# - correction: move lowers of Writer fly frame
889     if ( pToMove->GetDrawObjs() )
890     {
891         SwSortedObjs &rObjs = *pToMove->GetDrawObjs();
892         for ( sal_uInt32 i = 0; i < rObjs.Count(); ++i )
893         {
894             SwAnchoredObject* pObj = rObjs[i];
895             if ( pObj->ISA(SwFlyFrm) )
896             {
897                 SwFlyFrm* pFly = static_cast<SwFlyFrm*>(pObj);
898                 if ( pFly->IsFlyFreeFrm() )
899                 {
900                     // --> OD 2004-06-30 #i28701# - use new method <GetPageFrm()>
901                     SwPageFrm* pPageFrm = pFly->GetPageFrm();
902                     if ( pPageFrm )
903                         pPageFrm->MoveFly( pFly, pDest );
904                     else
905                         pDest->AppendFlyToPage( pFly );
906                 }
907             }
908             else if ( pObj->ISA(SwAnchoredDrawObject) )
909             {
910                 RemoveDrawObjFromPage( *pObj );
911                 pDest->AppendDrawObjToPage( *pObj );
912             }
913         }
914     }
915 }
916 
917 /*************************************************************************
918 |*
919 |*  SwPageFrm::AppendDrawObjToPage(), RemoveDrawObjFromPage()
920 |*
921 |*  --> OD 2004-07-02 #i28701# - new methods
922 |*
923 |*************************************************************************/
924 void SwPageFrm::AppendDrawObjToPage( SwAnchoredObject& _rNewObj )
925 {
926     if ( !_rNewObj.ISA(SwAnchoredDrawObject) )
927     {
928         ASSERT( false,
929                 "SwPageFrm::AppendDrawObjToPage(..) - anchored object of unexcepted type -> object not appended" );
930         return;
931     }
932 
933     if ( GetUpper() )
934     {
935         ((SwRootFrm*)GetUpper())->InvalidateBrowseWidth();
936     }
937 
938     ASSERT( _rNewObj.GetAnchorFrm(), "anchored draw object without anchor" );
939     const SwFlyFrm* pFlyFrm = _rNewObj.GetAnchorFrm()->FindFlyFrm();
940     if ( pFlyFrm &&
941          _rNewObj.GetDrawObj()->GetOrdNum() < pFlyFrm->GetVirtDrawObj()->GetOrdNum() )
942     {
943         sal_uInt32 nNewNum = pFlyFrm->GetVirtDrawObj()->GetOrdNumDirect();
944         if ( _rNewObj.GetDrawObj()->GetPage() )
945             _rNewObj.DrawObj()->GetPage()->SetObjectOrdNum(
946                             _rNewObj.GetDrawObj()->GetOrdNumDirect(), nNewNum);
947         else
948             _rNewObj.DrawObj()->SetOrdNum( nNewNum );
949     }
950 
951     if ( FLY_AS_CHAR == _rNewObj.GetFrmFmt().GetAnchor().GetAnchorId() )
952     {
953         return;
954     }
955 
956     if ( !pSortedObjs )
957     {
958         pSortedObjs = new SwSortedObjs();
959     }
960     if ( !pSortedObjs->Insert( _rNewObj ) )
961     {
962 #ifdef DBG_UTIL
963         ASSERT( pSortedObjs->Contains( _rNewObj ),
964                 "Drawing object not appended into list <pSortedObjs>." );
965 #endif
966     }
967     // --> OD 2008-04-22 #i87493#
968     ASSERT( _rNewObj.GetPageFrm() == 0 || _rNewObj.GetPageFrm() == this,
969             "<SwPageFrm::AppendDrawObjToPage(..)> - anchored draw object seems to be registered at another page frame. Serious defect -> please inform OD." );
970     // <--
971     _rNewObj.SetPageFrm( this );
972 
973     // invalidate page in order to force a reformat of object layout of the page.
974     InvalidateFlyLayout();
975 }
976 
977 void SwPageFrm::RemoveDrawObjFromPage( SwAnchoredObject& _rToRemoveObj )
978 {
979     if ( !_rToRemoveObj.ISA(SwAnchoredDrawObject) )
980     {
981         ASSERT( false,
982                 "SwPageFrm::RemoveDrawObjFromPage(..) - anchored object of unexcepted type -> object not removed" );
983         return;
984     }
985 
986     if ( pSortedObjs )
987     {
988         pSortedObjs->Remove( _rToRemoveObj );
989         if ( !pSortedObjs->Count() )
990         {
991             DELETEZ( pSortedObjs );
992         }
993         if ( GetUpper() )
994         {
995             if (FLY_AS_CHAR !=
996                     _rToRemoveObj.GetFrmFmt().GetAnchor().GetAnchorId())
997             {
998                 ((SwRootFrm*)GetUpper())->SetSuperfluous();
999                 InvalidatePage();
1000             }
1001             ((SwRootFrm*)GetUpper())->InvalidateBrowseWidth();
1002         }
1003     }
1004     _rToRemoveObj.SetPageFrm( 0 );
1005 }
1006 
1007 /*************************************************************************
1008 |*
1009 |*	SwPageFrm::PlaceFly
1010 |*
1011 |*	Ersterstellung		MA 08. Feb. 93
1012 |*	Letzte Aenderung	MA 27. Feb. 93
1013 |*
1014 |*************************************************************************/
1015 
1016 // --> OD 2005-06-09 #i50432# - adjust method description and synopsis.
1017 void SwPageFrm::PlaceFly( SwFlyFrm* pFly, SwFlyFrmFmt* pFmt )
1018 {
1019     // --> OD 2005-06-09 #i50432# - consider the case that page is an empty page:
1020     // In this case append the fly frame at the next page
1021     ASSERT( !IsEmptyPage() || GetNext(),
1022             "<SwPageFrm::PlaceFly(..)> - empty page with no next page! -> fly frame appended at empty page" );
1023     if ( IsEmptyPage() && GetNext() )
1024     {
1025         static_cast<SwPageFrm*>(GetNext())->PlaceFly( pFly, pFmt );
1026     }
1027     else
1028     {
1029         //Wenn ein Fly uebergeben wurde, so benutzen wir diesen, ansonsten wird
1030         //mit dem Format einer erzeugt.
1031         if ( pFly )
1032             AppendFly( pFly );
1033         else
1034         {   ASSERT( pFmt, ":-( kein Format fuer Fly uebergeben." );
1035             pFly = new SwFlyLayFrm( (SwFlyFrmFmt*)pFmt, this, this );
1036             AppendFly( pFly );
1037             ::RegistFlys( this, pFly );
1038         }
1039     }
1040     // <--
1041 }
1042 
1043 /*************************************************************************
1044 |*
1045 |*	::CalcClipRect
1046 |*
1047 |*	Ersterstellung		AMA 24. Sep. 96
1048 |*	Letzte Aenderung	MA  18. Dec. 96
1049 |*
1050 |*************************************************************************/
1051 // OD 22.09.2003 #i18732# - adjustments for following text flow or not
1052 // AND alignment at 'page areas' for to paragraph/to character anchored objects
1053 // OD 06.11.2003 #i22305# - adjustment for following text flow
1054 // for to frame anchored objects
1055 // OD 2004-06-02 #i29778# - Because the calculation of the position of the
1056 // floating screen object (Writer fly frame or drawing object) doesn't perform
1057 // a calculation on its upper frames and its anchor frame, a calculation of
1058 // the upper frames in this method no longer sensible.
1059 // --> OD 2004-07-06 #i28701# - if document compatibility option 'Consider
1060 // wrapping style influence on object positioning' is ON, the clip area
1061 // corresponds to the one as the object doesn't follows the text flow.
1062 sal_Bool CalcClipRect( const SdrObject *pSdrObj, SwRect &rRect, sal_Bool bMove )
1063 {
1064 	sal_Bool bRet = sal_True;
1065 	if ( pSdrObj->ISA(SwVirtFlyDrawObj) )
1066 	{
1067         const SwFlyFrm* pFly = ((const SwVirtFlyDrawObj*)pSdrObj)->GetFlyFrm();
1068         const bool bFollowTextFlow = pFly->GetFmt()->GetFollowTextFlow().GetValue();
1069         // --> OD 2004-07-06 #i28701#
1070         const bool bConsiderWrapOnObjPos =
1071                                 pFly->GetFmt()->getIDocumentSettingAccess()->get(IDocumentSettingAccess::CONSIDER_WRAP_ON_OBJECT_POSITION);
1072         // <--
1073         const SwFmtVertOrient &rV = pFly->GetFmt()->GetVertOrient();
1074         if( pFly->IsFlyLayFrm() )
1075 		{
1076             const SwFrm* pClip;
1077             // OD 06.11.2003 #i22305#
1078             // --> OD 2004-07-06 #i28701#
1079             if ( !bFollowTextFlow || bConsiderWrapOnObjPos )
1080             {
1081                 pClip = pFly->GetAnchorFrm()->FindPageFrm();
1082             }
1083             else
1084             {
1085                 pClip = pFly->GetAnchorFrm();
1086             }
1087 
1088 			rRect = pClip->Frm();
1089             SWRECTFN( pClip )
1090 
1091 			//Vertikales clipping: Top und Bottom, ggf. an PrtArea
1092             if( rV.GetVertOrient() != text::VertOrientation::NONE &&
1093                 rV.GetRelationOrient() == text::RelOrientation::PRINT_AREA )
1094 			{
1095                 (rRect.*fnRect->fnSetTop)( (pClip->*fnRect->fnGetPrtTop)() );
1096                 (rRect.*fnRect->fnSetBottom)( (pClip->*fnRect->fnGetPrtBottom)() );
1097 			}
1098 			//Horizontales clipping: Left und Right, ggf. an PrtArea
1099 			const SwFmtHoriOrient &rH = pFly->GetFmt()->GetHoriOrient();
1100             if( rH.GetHoriOrient() != text::HoriOrientation::NONE &&
1101                 rH.GetRelationOrient() == text::RelOrientation::PRINT_AREA )
1102 			{
1103                 (rRect.*fnRect->fnSetLeft)( (pClip->*fnRect->fnGetPrtLeft)() );
1104                 (rRect.*fnRect->fnSetRight)((pClip->*fnRect->fnGetPrtRight)());
1105 			}
1106 		}
1107 		else if( pFly->IsFlyAtCntFrm() )
1108 		{
1109             // OD 22.09.2003 #i18732# - consider following text flow or not
1110             // AND alignment at 'page areas'
1111             const SwFrm* pVertPosOrientFrm = pFly->GetVertPosOrientFrm();
1112             if ( !pVertPosOrientFrm )
1113             {
1114                 ASSERT( false,
1115                         "::CalcClipRect(..) - frame, vertical position is oriented at, is missing .");
1116                 pVertPosOrientFrm = pFly->GetAnchorFrm();
1117             }
1118 
1119             if ( !bFollowTextFlow || bConsiderWrapOnObjPos )
1120             {
1121                 const SwLayoutFrm* pClipFrm = pVertPosOrientFrm->FindPageFrm();
1122                 rRect = bMove ? pClipFrm->GetUpper()->Frm()
1123                               : pClipFrm->Frm();
1124                 // --> OD 2004-10-14 #i26945# - consider that a table, during
1125                 // its format, can exceed its upper printing area bottom.
1126                 // Thus, enlarge the clip rectangle, if such a case occured
1127                 if ( pFly->GetAnchorFrm()->IsInTab() )
1128                 {
1129                     const SwTabFrm* pTabFrm = const_cast<SwFlyFrm*>(pFly)
1130                                 ->GetAnchorFrmContainingAnchPos()->FindTabFrm();
1131                     SwRect aTmp( pTabFrm->Prt() );
1132                     aTmp += pTabFrm->Frm().Pos();
1133                     rRect.Union( aTmp );
1134                     // --> OD 2005-03-30 #i43913# - consider also the cell frame
1135                     const SwFrm* pCellFrm = const_cast<SwFlyFrm*>(pFly)
1136                                 ->GetAnchorFrmContainingAnchPos()->GetUpper();
1137                     while ( pCellFrm && !pCellFrm->IsCellFrm() )
1138                     {
1139                         pCellFrm = pCellFrm->GetUpper();
1140                     }
1141                     if ( pCellFrm )
1142                     {
1143                         aTmp = pCellFrm->Prt();
1144                         aTmp += pCellFrm->Frm().Pos();
1145                         rRect.Union( aTmp );
1146                     }
1147                     // <--
1148                 }
1149             }
1150             else if ( rV.GetRelationOrient() == text::RelOrientation::PAGE_FRAME ||
1151                       rV.GetRelationOrient() == text::RelOrientation::PAGE_PRINT_AREA )
1152             {
1153                 // OD 29.10.2003 #113049# - new class <SwEnvironmentOfAnchoredObject>
1154                 objectpositioning::SwEnvironmentOfAnchoredObject
1155                                                 aEnvOfObj( bFollowTextFlow );
1156                 const SwLayoutFrm& rVertClipFrm =
1157                     aEnvOfObj.GetVertEnvironmentLayoutFrm( *pVertPosOrientFrm );
1158                 if ( rV.GetRelationOrient() == text::RelOrientation::PAGE_FRAME )
1159                 {
1160                     rRect = rVertClipFrm.Frm();
1161                 }
1162                 else if ( rV.GetRelationOrient() == text::RelOrientation::PAGE_PRINT_AREA )
1163                 {
1164                     if ( rVertClipFrm.IsPageFrm() )
1165                     {
1166                         rRect = static_cast<const SwPageFrm&>(rVertClipFrm).PrtWithoutHeaderAndFooter();
1167                     }
1168                     else
1169                     {
1170                         rRect = rVertClipFrm.Frm();
1171                     }
1172                 }
1173                 const SwLayoutFrm* pHoriClipFrm =
1174                         pFly->GetAnchorFrm()->FindPageFrm()->GetUpper();
1175                 SWRECTFN( pFly->GetAnchorFrm() )
1176                 (rRect.*fnRect->fnSetLeft)( (pHoriClipFrm->Frm().*fnRect->fnGetLeft)() );
1177                 (rRect.*fnRect->fnSetRight)((pHoriClipFrm->Frm().*fnRect->fnGetRight)());
1178             }
1179             else
1180             {
1181                 // --> OD 2004-10-11 #i26945#
1182                 const SwFrm *pClip =
1183                         const_cast<SwFlyFrm*>(pFly)->GetAnchorFrmContainingAnchPos();
1184                 // <--
1185                 SWRECTFN( pClip )
1186                 const SwLayoutFrm *pUp = pClip->GetUpper();
1187                 const SwFrm *pCell = pUp->IsCellFrm() ? pUp : 0;
1188                 sal_uInt16 nType = bMove ? FRM_ROOT   | FRM_FLY | FRM_HEADER |
1189                                        FRM_FOOTER | FRM_FTN
1190                                      : FRM_BODY   | FRM_FLY | FRM_HEADER |
1191                                        FRM_FOOTER | FRM_CELL| FRM_FTN;
1192 
1193                 while ( !(pUp->GetType() & nType) || pUp->IsColBodyFrm() )
1194                 {
1195                     pUp = pUp->GetUpper();
1196                     if ( !pCell && pUp->IsCellFrm() )
1197                         pCell = pUp;
1198                 }
1199                 if ( bMove )
1200                 {
1201                     if ( pUp->IsRootFrm() )
1202                     {
1203                         rRect  = pUp->Prt();
1204                         rRect += pUp->Frm().Pos();
1205                         pUp = 0;
1206                     }
1207                 }
1208                 if ( pUp )
1209                 {
1210                     if ( pUp->GetType() & FRM_BODY )
1211                     {
1212                         const SwPageFrm *pPg;
1213                         if ( pUp->GetUpper() != (pPg = pFly->FindPageFrm()) )
1214                             pUp = pPg->FindBodyCont();
1215                         rRect = pUp->GetUpper()->Frm();
1216                         (rRect.*fnRect->fnSetTop)( (pUp->*fnRect->fnGetPrtTop)() );
1217                         (rRect.*fnRect->fnSetBottom)((pUp->*fnRect->fnGetPrtBottom)());
1218                     }
1219                     else
1220                     {
1221                         if( ( pUp->GetType() & (FRM_FLY | FRM_FTN ) ) &&
1222                             !pUp->Frm().IsInside( pFly->Frm().Pos() ) )
1223                         {
1224                             if( pUp->IsFlyFrm() )
1225                             {
1226                                 SwFlyFrm *pTmpFly = (SwFlyFrm*)pUp;
1227                                 while( pTmpFly->GetNextLink() )
1228                                 {
1229                                     pTmpFly = pTmpFly->GetNextLink();
1230                                     if( pTmpFly->Frm().IsInside( pFly->Frm().Pos() ) )
1231                                         break;
1232                                 }
1233                                 pUp = pTmpFly;
1234                             }
1235                             else if( pUp->IsInFtn() )
1236                             {
1237                                 const SwFtnFrm *pTmp = pUp->FindFtnFrm();
1238                                 while( pTmp->GetFollow() )
1239                                 {
1240                                     pTmp = pTmp->GetFollow();
1241                                     if( pTmp->Frm().IsInside( pFly->Frm().Pos() ) )
1242                                         break;
1243                                 }
1244                                 pUp = pTmp;
1245                             }
1246                         }
1247                         rRect = pUp->Prt();
1248                         rRect.Pos() += pUp->Frm().Pos();
1249                         if ( pUp->GetType() & (FRM_HEADER | FRM_FOOTER) )
1250                         {
1251                             rRect.Left ( pUp->GetUpper()->Frm().Left() );
1252                             rRect.Width( pUp->GetUpper()->Frm().Width());
1253                         }
1254                         else if ( pUp->IsCellFrm() )                //MA_FLY_HEIGHT
1255                         {
1256                             const SwFrm *pTab = pUp->FindTabFrm();
1257                             (rRect.*fnRect->fnSetBottom)(
1258                                         (pTab->GetUpper()->*fnRect->fnGetPrtBottom)() );
1259                             // OD 08.08.2003 #110978# - expand to left and right
1260                             // cell border
1261                             rRect.Left ( pUp->Frm().Left() );
1262                             rRect.Width( pUp->Frm().Width() );
1263                         }
1264                     }
1265                 }
1266                 if ( pCell )
1267                 {
1268                     //CellFrms koennen auch in 'unerlaubten' Bereichen stehen, dann
1269                     //darf der Fly das auch.
1270                     SwRect aTmp( pCell->Prt() );
1271                     aTmp += pCell->Frm().Pos();
1272                     rRect.Union( aTmp );
1273                 }
1274             }
1275 		}
1276 		else
1277 		{
1278             const SwFrm *pUp = pFly->GetAnchorFrm()->GetUpper();
1279             SWRECTFN( pFly->GetAnchorFrm() )
1280             while( pUp->IsColumnFrm() || pUp->IsSctFrm() || pUp->IsColBodyFrm())
1281                 pUp = pUp->GetUpper();
1282             rRect = pUp->Frm();
1283             if( !pUp->IsBodyFrm() )
1284             {
1285                 rRect += pUp->Prt().Pos();
1286                 rRect.SSize( pUp->Prt().SSize() );
1287                 if ( pUp->IsCellFrm() )
1288                 {
1289                     const SwFrm *pTab = pUp->FindTabFrm();
1290                     (rRect.*fnRect->fnSetBottom)(
1291                                     (pTab->GetUpper()->*fnRect->fnGetPrtBottom)() );
1292                 }
1293             }
1294             else if ( pUp->GetUpper()->IsPageFrm() )
1295             {
1296                 // #111909# Objects anchored as character may exceed right margin
1297                 // of body frame:
1298                 (rRect.*fnRect->fnSetRight)( (pUp->GetUpper()->Frm().*fnRect->fnGetRight)() );
1299             }
1300             long nHeight = (9*(rRect.*fnRect->fnGetHeight)())/10;
1301             long nTop;
1302             const SwFmt *pFmt = ((SwContact*)GetUserCall(pSdrObj))->GetFmt();
1303             const SvxULSpaceItem &rUL = pFmt->GetULSpace();
1304             if( bMove )
1305             {
1306                 nTop = bVert ? ((SwFlyInCntFrm*)pFly)->GetRefPoint().X() :
1307                                ((SwFlyInCntFrm*)pFly)->GetRefPoint().Y();
1308                 nTop = (*fnRect->fnYInc)( nTop, -nHeight );
1309                 long nWidth = (pFly->Frm().*fnRect->fnGetWidth)();
1310                 (rRect.*fnRect->fnSetLeftAndWidth)( bVert ?
1311                             ((SwFlyInCntFrm*)pFly)->GetRefPoint().Y() :
1312                             ((SwFlyInCntFrm*)pFly)->GetRefPoint().X(), nWidth );
1313                 nHeight = 2*nHeight - rUL.GetLower() - rUL.GetUpper();
1314 			}
1315             else
1316             {
1317                 nTop = (*fnRect->fnYInc)( (pFly->Frm().*fnRect->fnGetBottom)(),
1318                                            rUL.GetLower() - nHeight );
1319                 nHeight = 2*nHeight - (pFly->Frm().*fnRect->fnGetHeight)()
1320                           - rUL.GetLower() - rUL.GetUpper();
1321             }
1322             (rRect.*fnRect->fnSetTopAndHeight)( nTop, nHeight );
1323 		}
1324 	}
1325 	else
1326 	{
1327 		const SwDrawContact *pC = (const SwDrawContact*)GetUserCall(pSdrObj);
1328 		const SwFrmFmt  *pFmt = (const SwFrmFmt*)pC->GetFmt();
1329 		const SwFmtAnchor &rAnch = pFmt->GetAnchor();
1330         if ( FLY_AS_CHAR == rAnch.GetAnchorId() )
1331         {
1332             const SwFrm* pAnchorFrm = pC->GetAnchorFrm( pSdrObj );
1333             if( !pAnchorFrm )
1334             {
1335                 ASSERT( false, "<::CalcClipRect(..)> - missing anchor frame." );
1336                 ((SwDrawContact*)pC)->ConnectToLayout();
1337                 pAnchorFrm = pC->GetAnchorFrm();
1338             }
1339             const SwFrm* pUp = pAnchorFrm->GetUpper();
1340             rRect = pUp->Prt();
1341             rRect += pUp->Frm().Pos();
1342             SWRECTFN( pAnchorFrm )
1343             long nHeight = (9*(rRect.*fnRect->fnGetHeight)())/10;
1344             long nTop;
1345             const SvxULSpaceItem &rUL = pFmt->GetULSpace();
1346             SwRect aSnapRect( pSdrObj->GetSnapRect() );
1347             long nTmpH = 0;
1348             if( bMove )
1349             {
1350                 nTop = (*fnRect->fnYInc)( bVert ? pSdrObj->GetAnchorPos().X() :
1351                                        pSdrObj->GetAnchorPos().Y(), -nHeight );
1352                 long nWidth = (aSnapRect.*fnRect->fnGetWidth)();
1353                 (rRect.*fnRect->fnSetLeftAndWidth)( bVert ?
1354                             pSdrObj->GetAnchorPos().Y() :
1355                             pSdrObj->GetAnchorPos().X(), nWidth );
1356 			}
1357             else
1358             {
1359                 // OD 2004-04-13 #i26791# - value of <nTmpH> is needed to
1360                 // calculate value of <nTop>.
1361                 nTmpH = bVert ? pSdrObj->GetCurrentBoundRect().GetWidth() :
1362                                 pSdrObj->GetCurrentBoundRect().GetHeight();
1363                 nTop = (*fnRect->fnYInc)( (aSnapRect.*fnRect->fnGetTop)(),
1364                                           rUL.GetLower() + nTmpH - nHeight );
1365             }
1366             nHeight = 2*nHeight - nTmpH - rUL.GetLower() - rUL.GetUpper();
1367             (rRect.*fnRect->fnSetTopAndHeight)( nTop, nHeight );
1368 		}
1369 		else
1370         {
1371             // OD 23.06.2003 #108784# - restrict clip rectangle for drawing
1372             // objects in header/footer to the page frame.
1373             // OD 2004-03-29 #i26791#
1374             const SwFrm* pAnchorFrm = pC->GetAnchorFrm( pSdrObj );
1375             if ( pAnchorFrm && pAnchorFrm->FindFooterOrHeader() )
1376             {
1377                 // clip frame is the page frame the header/footer is on.
1378                 const SwFrm* pClipFrm = pAnchorFrm->FindPageFrm();
1379                 rRect = pClipFrm->Frm();
1380             }
1381             else
1382             {
1383                 bRet = sal_False;
1384             }
1385         }
1386 	}
1387 	return bRet;
1388 }
1389