?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
merge the formfield patch from ooo-build
[ooovba.git] / chart2 / source / controller / itemsetwrapper / GraphicPropertyItemConverter.cxx
blobef0c7bafc4a112e3736b2fbeacf4d9cf038d550f
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: GraphicPropertyItemConverter.cxx,v $
10 * $Revision: 1.13.44.1 $
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_chart2.hxx"
33 #include "GraphicPropertyItemConverter.hxx"
34 #include "SchWhichPairs.hxx"
35 #include "macros.hxx"
36 #include "ItemPropertyMap.hxx"
37 #include "PropertyHelper.hxx"
38 #include "CommonConverters.hxx"
39
40 // #ifndef _SFXINTITEM_HXX
41 // #include <svtools/intitem.hxx>
42 // #endif
43 #include <svx/xflclit.hxx>
44 #include <svx/xlnclit.hxx>
45 #include <svx/xflbmtit.hxx>
46 #include <svx/xflbstit.hxx>
47 #include <svx/xbtmpit.hxx>
48 #include <svx/xflftrit.hxx>
49 #include <svx/xlndsit.hxx>
50 #include <svx/xflhtit.hxx>
51 #include <svx/xflgrit.hxx>
52 #include <svx/xfltrit.hxx>
53 #include <svx/xlntrit.hxx>
54 #include <svx/eeitem.hxx>
55 // for SfxBoolItem
56 #include <svtools/eitem.hxx>
57 // for XFillGradientStepCountItem
58 #include <svx/xgrscit.hxx>
59 #include <com/sun/star/beans/XPropertyState.hpp>
60 #include <com/sun/star/chart2/FillBitmap.hpp>
61 #include <com/sun/star/awt/Gradient.hpp>
62 #include <com/sun/star/container/XNameAccess.hpp>
63
64 using namespace ::com::sun::star;
65
66 namespace
67 {
68 ::comphelper::ItemPropertyMapType & lcl_GetDataPointFilledPropertyMap()
69 {
70 static ::comphelper::ItemPropertyMapType aDataPointPropertyFilledMap(
71 ::comphelper::MakeItemPropertyMap
72 IPM_MAP_ENTRY( XATTR_FILLSTYLE, "FillStyle", 0 )
73 IPM_MAP_ENTRY( XATTR_FILLCOLOR, "Color", 0 )
74 // IPM_MAP_ENTRY( XATTR_FILLTRANSPARENCE, "Transparency", 0 )
75 // IPM_MAP_ENTRY( XATTR_FILLGRADIENT, "Gradient", 0 )
76 // IPM_MAP_ENTRY( XATTR_FILLHATCH, "Hatch", 0 )
77 IPM_MAP_ENTRY( XATTR_LINECOLOR, "BorderColor", 0 )
78 IPM_MAP_ENTRY( XATTR_LINESTYLE, "BorderStyle", 0 )
79 IPM_MAP_ENTRY( XATTR_LINEWIDTH, "BorderWidth", 0 )
80 // IPM_MAP_ENTRY( XATTR_LINEDASH, "BorderDash", 0 )
81 // IPM_MAP_ENTRY( XATTR_LINETRANSPARENCE, "BorderTransparency", 0 )
82 IPM_MAP_ENTRY( XATTR_FILLBACKGROUND, "FillBackground", 0 )
83 IPM_MAP_ENTRY( XATTR_FILLBMP_POS, "FillBitmapRectanglePoint", 0 )
84 IPM_MAP_ENTRY( XATTR_FILLBMP_SIZEX, "FillBitmapSizeX", 0 )
85 IPM_MAP_ENTRY( XATTR_FILLBMP_SIZEY, "FillBitmapSizeY", 0 )
86 IPM_MAP_ENTRY( XATTR_FILLBMP_SIZELOG, "FillBitmapLogicalSize", 0 )
87 IPM_MAP_ENTRY( XATTR_FILLBMP_TILEOFFSETX, "FillBitmapOffsetX", 0 )
88 IPM_MAP_ENTRY( XATTR_FILLBMP_TILEOFFSETY, "FillBitmapOffsetY", 0 )
89 IPM_MAP_ENTRY( XATTR_FILLBMP_POSOFFSETX, "FillBitmapPositionOffsetX", 0 )
90 IPM_MAP_ENTRY( XATTR_FILLBMP_POSOFFSETY, "FillBitmapPositionOffsetY", 0 )
91 );
92
93 return aDataPointPropertyFilledMap;
94 }
95 ::comphelper::ItemPropertyMapType & lcl_GetDataPointLinePropertyMap()
96 {
97 static ::comphelper::ItemPropertyMapType aDataPointPropertyLineMap(
98 ::comphelper::MakeItemPropertyMap
99 IPM_MAP_ENTRY( XATTR_LINECOLOR, "Color", 0 )
100 // IPM_MAP_ENTRY( XATTR_LINETRANSPARENCE, "Transparency", 0 )
101 IPM_MAP_ENTRY( XATTR_LINESTYLE, "LineStyle", 0 )
102 IPM_MAP_ENTRY( XATTR_LINEWIDTH, "LineWidth", 0 )
103 // IPM_MAP_ENTRY( XATTR_LINEDASH, "LineDash", 0 )
104 );
105
106 return aDataPointPropertyLineMap;
107 }
108 ::comphelper::ItemPropertyMapType & lcl_GetLinePropertyMap()
109 {
110 static ::comphelper::ItemPropertyMapType aLinePropertyMap(
111 ::comphelper::MakeItemPropertyMap
112 IPM_MAP_ENTRY( XATTR_LINESTYLE, "LineStyle", 0 )
113 IPM_MAP_ENTRY( XATTR_LINEWIDTH, "LineWidth", 0 )
114 // IPM_MAP_ENTRY( XATTR_LINEDASH, "LineDash", 0 )
115 IPM_MAP_ENTRY( XATTR_LINECOLOR, "LineColor", 0 )
116 // IPM_MAP_ENTRY( XATTR_LINETRANSPARENCE, "LineTransparence", 0 )
117 IPM_MAP_ENTRY( XATTR_LINEJOINT, "LineJoint", 0 )
118 );
119
120 return aLinePropertyMap;
121 }
122 ::comphelper::ItemPropertyMapType & lcl_GetFillPropertyMap()
123 {
124 static ::comphelper::ItemPropertyMapType aFillPropertyMap(
125 ::comphelper::MakeItemPropertyMap
126 IPM_MAP_ENTRY( XATTR_FILLSTYLE, "FillStyle", 0 )
127 IPM_MAP_ENTRY( XATTR_FILLCOLOR, "FillColor", 0 )
128 // IPM_MAP_ENTRY( XATTR_FILLTRANSPARENCE, "FillTransparence", 0 )
129 // IPM_MAP_ENTRY( XATTR_FILLBITMAP, "FillBitmapName", MID_NAME )
130 // IPM_MAP_ENTRY( XATTR_FILLGRADIENT, "FillGradient", 0 )
131 // IPM_MAP_ENTRY( XATTR_FILLHATCH, "FillHatch", 0 )
132 IPM_MAP_ENTRY( XATTR_FILLBACKGROUND, "FillBackground", 0 )
133 IPM_MAP_ENTRY( XATTR_FILLBMP_POS, "FillBitmapRectanglePoint", 0 )
134 IPM_MAP_ENTRY( XATTR_FILLBMP_SIZEX, "FillBitmapSizeX", 0 )
135 IPM_MAP_ENTRY( XATTR_FILLBMP_SIZEY, "FillBitmapSizeY", 0 )
136 IPM_MAP_ENTRY( XATTR_FILLBMP_SIZELOG, "FillBitmapLogicalSize", 0 )
137 IPM_MAP_ENTRY( XATTR_FILLBMP_TILEOFFSETX, "FillBitmapOffsetX", 0 )
138 IPM_MAP_ENTRY( XATTR_FILLBMP_TILEOFFSETY, "FillBitmapOffsetY", 0 )
139 IPM_MAP_ENTRY( XATTR_FILLBMP_POSOFFSETX, "FillBitmapPositionOffsetX", 0 )
140 IPM_MAP_ENTRY( XATTR_FILLBMP_POSOFFSETY, "FillBitmapPositionOffsetY", 0 )
141 );
142
143 return aFillPropertyMap;
144 }
145
146 bool lcl_supportsFillProperties( ::chart::wrapper::GraphicPropertyItemConverter::eGraphicObjectType eType )
147 {
148 return ( eType == ::chart::wrapper::GraphicPropertyItemConverter::FILLED_DATA_POINT ||
149 eType == ::chart::wrapper::GraphicPropertyItemConverter::FILL_PROPERTIES ||
150 eType == ::chart::wrapper::GraphicPropertyItemConverter::LINE_AND_FILL_PROPERTIES );
151 }
152
153 bool lcl_supportsLineProperties( ::chart::wrapper::GraphicPropertyItemConverter::eGraphicObjectType eType )
154 {
155 return ( eType != ::chart::wrapper::GraphicPropertyItemConverter::FILL_PROPERTIES );
156 }
157
158 bool lcl_SetContentForNamedProperty(
159 const uno::Reference< lang::XMultiServiceFactory > & xFactory,
160 const ::rtl::OUString & rTableName,
161 NameOrIndex & rItem, BYTE nMemberId )
162 {
163 bool bResult = false;
164 if( xFactory.is())
165 {
166 ::rtl::OUString aPropertyValue( rItem.GetName());
167 uno::Reference< container::XNameAccess > xNameAcc(
168 xFactory->createInstance( rTableName ),
169 uno::UNO_QUERY );
170 if( xNameAcc.is() &&
171 xNameAcc->hasByName( aPropertyValue ))
172 {
173 rItem.PutValue( xNameAcc->getByName( aPropertyValue ), nMemberId );
174 bResult = true;
175 }
176 }
177 return bResult;
178 }
179
180 } // anonymous namespace
181
182 // ========================================
183
184 namespace chart
185 {
186 namespace wrapper
187 {
188
189 GraphicPropertyItemConverter::GraphicPropertyItemConverter(
190 const uno::Reference<
191 beans::XPropertySet > & rPropertySet,
192 SfxItemPool& rItemPool,
193 SdrModel& rDrawModel,
194 const uno::Reference< lang::XMultiServiceFactory > & xNamedPropertyContainerFactory,
195 eGraphicObjectType eObjectType /* = FILL_PROPERTIES */ ) :
196 ItemConverter( rPropertySet, rItemPool ),
197 m_eGraphicObjectType( eObjectType ),
198 m_rDrawModel( rDrawModel ),
199 m_xNamedPropertyTableFactory( xNamedPropertyContainerFactory )
200 {}
201
202 GraphicPropertyItemConverter::~GraphicPropertyItemConverter()
203 {}
204
205 const USHORT * GraphicPropertyItemConverter::GetWhichPairs() const
206 {
207 const USHORT * pResult = NULL;
208
209 switch( m_eGraphicObjectType )
210 {
211 case LINE_DATA_POINT:
212 case FILLED_DATA_POINT:
213 pResult = nRowWhichPairs; break;
214 case LINE_PROPERTIES:
215 pResult = nLinePropertyWhichPairs; break;
216 case FILL_PROPERTIES:
217 pResult = nFillPropertyWhichPairs; break;
218 case LINE_AND_FILL_PROPERTIES:
219 pResult = nLineAndFillPropertyWhichPairs; break;
220 }
221
222 return pResult;
223 }
224
225 bool GraphicPropertyItemConverter::GetItemProperty( tWhichIdType nWhichId, tPropertyNameWithMemberId & rOutProperty ) const
226 {
227 ::comphelper::ItemPropertyMapType::const_iterator aEndIt;
228 ::comphelper::ItemPropertyMapType::const_iterator aIt;
229
230 switch( m_eGraphicObjectType )
231 {
232 case LINE_DATA_POINT:
233 aEndIt = lcl_GetDataPointLinePropertyMap().end();
234 aIt = lcl_GetDataPointLinePropertyMap().find( nWhichId );
235 break;
236 case FILLED_DATA_POINT:
237 aEndIt = lcl_GetDataPointFilledPropertyMap().end();
238 aIt = lcl_GetDataPointFilledPropertyMap().find( nWhichId );
239 break;
240 case LINE_PROPERTIES:
241 aEndIt = lcl_GetLinePropertyMap().end();
242 aIt = lcl_GetLinePropertyMap().find( nWhichId );
243 break;
244
245 case FILL_PROPERTIES:
246 aEndIt = lcl_GetFillPropertyMap().end();
247 aIt = lcl_GetFillPropertyMap().find( nWhichId );
248 break;
249
250 case LINE_AND_FILL_PROPERTIES:
251 // line
252 aEndIt = lcl_GetLinePropertyMap().end();
253 aIt = lcl_GetLinePropertyMap().find( nWhichId );
254
255 // not found => try fill
256 if( aIt == aEndIt )
257 {
258 aEndIt = lcl_GetFillPropertyMap().end();
259 aIt = lcl_GetFillPropertyMap().find( nWhichId );
260 }
261 break;
262 }
263
264 if( aIt == aEndIt )
265 return false;
266
267 rOutProperty =(*aIt).second;
268 return true;
269 }
270
271 void GraphicPropertyItemConverter::FillSpecialItem(
272 USHORT nWhichId, SfxItemSet & rOutItemSet ) const
273 throw( uno::Exception )
274 {
275 // if( m_eGraphicObjectType == LINE_DATA_POINT ||
276 // m_eGraphicObjectType == LINE_PROPERTIES )
277 // return;
278
279 switch( nWhichId )
280 {
281 // bitmap property
282 case XATTR_FILLBMP_TILE:
283 case XATTR_FILLBMP_STRETCH:
284 {
285 drawing::BitmapMode aMode = drawing::BitmapMode_REPEAT;
286 if( GetPropertySet()->getPropertyValue( C2U("FillBitmapMode")) >>= aMode )
287 {
288 rOutItemSet.Put( XFillBmpTileItem( aMode == drawing::BitmapMode_REPEAT ));
289 rOutItemSet.Put( XFillBmpStretchItem( aMode == drawing::BitmapMode_STRETCH ));
290 }
291 }
292 break;
293
294 case XATTR_FILLFLOATTRANSPARENCE:
295 try
296 {
297 if( lcl_supportsFillProperties( m_eGraphicObjectType ))
298 {
299 ::rtl::OUString aPropName =
300 (m_eGraphicObjectType == FILLED_DATA_POINT)
301 ? C2U( "TransparencyGradientName" )
302 : C2U( "FillTransparenceGradientName" );
303
304 uno::Any aValue( GetPropertySet()->getPropertyValue( aPropName ));
305 if( aValue.hasValue())
306 {
307 XFillFloatTransparenceItem aItem;
308 aItem.PutValue( aValue, MID_NAME );
309
310 lcl_SetContentForNamedProperty(
311 m_xNamedPropertyTableFactory, C2U("com.sun.star.drawing.TransparencyGradientTable"),
312 aItem, MID_FILLGRADIENT );
313
314 // this is important to enable the item
315 ::rtl::OUString aName;
316 if( (aValue >>= aName) &&
317 aName.getLength())
318 {
319 aItem.SetEnabled( TRUE );
320 rOutItemSet.Put( aItem );
321 }
322 }
323 }
324 }
325 catch( beans::UnknownPropertyException ex )
326 {
327 ASSERT_EXCEPTION( ex );
328 }
329 break;
330
331 case XATTR_GRADIENTSTEPCOUNT:
332 if( lcl_supportsFillProperties( m_eGraphicObjectType ))
333 {
334 ::rtl::OUString aPropName =
335 (m_eGraphicObjectType == FILLED_DATA_POINT)
336 ? C2U( "GradientStepCount" )
337 : C2U( "FillGradientStepCount" );
338
339 sal_Int16 nStepCount = 0;
340 uno::Any aValue( GetPropertySet()->getPropertyValue( aPropName ) );
341 if( hasLongOrShortValue(aValue) )
342 {
343 nStepCount = getShortForLongAlso(aValue);
344 rOutItemSet.Put( XGradientStepCountItem( nStepCount ));
345 }
346 }
347 break;
348
349 case XATTR_LINEDASH:
350 if( lcl_supportsLineProperties( m_eGraphicObjectType ))
351 {
352 ::rtl::OUString aPropName =
353 (m_eGraphicObjectType == FILLED_DATA_POINT)
354 ? C2U( "BorderDashName" )
355 : C2U( "LineDashName" );
356
357 XLineDashItem aItem;
358 aItem.PutValue( GetPropertySet()->getPropertyValue( aPropName ), MID_NAME );
359
360 lcl_SetContentForNamedProperty(
361 m_xNamedPropertyTableFactory, C2U("com.sun.star.drawing.DashTable"),
362 aItem, MID_LINEDASH );
363
364 // translate model name to UI-name for predefined entries, so
365 // that the correct entry is chosen in the list of UI-names
366 XLineDashItem * pItemToPut = & aItem;
367 pItemToPut = aItem.checkForUniqueItem( & m_rDrawModel );
368
369 rOutItemSet.Put( * pItemToPut );
370 }
371 break;
372
373 case XATTR_FILLGRADIENT:
374 if( lcl_supportsFillProperties( m_eGraphicObjectType ))
375 {
376 ::rtl::OUString aPropName =
377 (m_eGraphicObjectType == FILLED_DATA_POINT)
378 ? C2U( "GradientName" )
379 : C2U( "FillGradientName" );
380
381 XFillGradientItem aItem;
382 aItem.PutValue( GetPropertySet()->getPropertyValue( aPropName ), MID_NAME );
383
384 lcl_SetContentForNamedProperty(
385 m_xNamedPropertyTableFactory, C2U("com.sun.star.drawing.GradientTable"),
386 aItem, MID_FILLGRADIENT );
387
388 // translate model name to UI-name for predefined entries, so
389 // that the correct entry is chosen in the list of UI-names
390 XFillGradientItem * pItemToPut = & aItem;
391 pItemToPut = aItem.checkForUniqueItem( & m_rDrawModel );
392
393 rOutItemSet.Put( * pItemToPut );
394 }
395 break;
396
397 case XATTR_FILLHATCH:
398 if( lcl_supportsFillProperties( m_eGraphicObjectType ))
399 {
400 ::rtl::OUString aPropName =
401 (m_eGraphicObjectType == FILLED_DATA_POINT)
402 ? C2U( "HatchName" )
403 : C2U( "FillHatchName" );
404
405 XFillHatchItem aItem;
406 aItem.PutValue( GetPropertySet()->getPropertyValue( aPropName ), MID_NAME );
407
408 lcl_SetContentForNamedProperty(
409 m_xNamedPropertyTableFactory, C2U("com.sun.star.drawing.HatchTable"),
410 aItem, MID_FILLHATCH );
411
412 // translate model name to UI-name for predefined entries, so
413 // that the correct entry is chosen in the list of UI-names
414 XFillHatchItem * pItemToPut = & aItem;
415 pItemToPut = aItem.checkForUniqueItem( & m_rDrawModel );
416
417 rOutItemSet.Put( * pItemToPut );
418 }
419 break;
420
421 case XATTR_FILLBITMAP:
422 if( lcl_supportsFillProperties( m_eGraphicObjectType ))
423 {
424 XFillBitmapItem aItem;
425 aItem.PutValue( GetPropertySet()->getPropertyValue( C2U( "FillBitmapName" ) ), MID_NAME );
426
427 lcl_SetContentForNamedProperty(
428 m_xNamedPropertyTableFactory, C2U("com.sun.star.drawing.BitmapTable"),
429 aItem, MID_GRAFURL );
430
431 // translate model name to UI-name for predefined entries, so
432 // that the correct entry is chosen in the list of UI-names
433 XFillBitmapItem * pItemToPut = & aItem;
434 pItemToPut = aItem.checkForUniqueItem( & m_rDrawModel );
435
436 rOutItemSet.Put( * pItemToPut );
437 }
438 break;
439
440 // hack, because QueryValue of XLineTransparenceItem returns sal_Int32
441 // instead of sal_Int16
442 case XATTR_LINETRANSPARENCE:
443 if( lcl_supportsLineProperties( m_eGraphicObjectType ))
444 {
445 ::rtl::OUString aPropName =
446 (m_eGraphicObjectType == FILLED_DATA_POINT)
447 ? C2U( "BorderTransparency" )
448 : (m_eGraphicObjectType == LINE_DATA_POINT)
449 ? C2U( "Transparency" )
450 : C2U( "LineTransparence" );
451
452 XLineTransparenceItem aItem;
453 aItem.PutValue( GetPropertySet()->getPropertyValue( aPropName ) );
454
455 rOutItemSet.Put( aItem );
456 }
457 break;
458
459 // hack, because QueryValue of XFillTransparenceItem returns sal_Int32
460 // instead of sal_Int16
461 case XATTR_FILLTRANSPARENCE:
462 if( lcl_supportsFillProperties( m_eGraphicObjectType ))
463 {
464 ::rtl::OUString aPropName =
465 (m_eGraphicObjectType == FILLED_DATA_POINT)
466 ? C2U( "Transparency" )
467 : C2U( "FillTransparence" );
468
469 XFillTransparenceItem aItem;
470 aItem.PutValue( GetPropertySet()->getPropertyValue( aPropName ) );
471
472 rOutItemSet.Put( aItem );
473 }
474 break;
475 }
476 }
477
478 bool GraphicPropertyItemConverter::ApplySpecialItem(
479 USHORT nWhichId, const SfxItemSet & rItemSet )
480 throw( uno::Exception )
481 {
482 bool bChanged = false;
483 uno::Any aValue;
484
485 switch( nWhichId )
486 {
487 // bitmap property
488 case XATTR_FILLBMP_STRETCH:
489 if( lcl_supportsFillProperties( m_eGraphicObjectType ))
490 {
491 const ::rtl::OUString aModePropName = C2U("FillBitmapMode");
492 bool bStretched = static_cast< const XFillBmpStretchItem & >(
493 rItemSet.Get( XATTR_FILLBMP_STRETCH )).GetValue();
494 drawing::BitmapMode aMode =
495 (bStretched ? drawing::BitmapMode_STRETCH : drawing::BitmapMode_NO_REPEAT);
496
497 aValue <<= aMode;
498 if( aValue != GetPropertySet()->getPropertyValue( aModePropName ))
499 {
500 GetPropertySet()->setPropertyValue( aModePropName, aValue );
501 bChanged = true;
502 }
503 }
504 break;
505
506 case XATTR_FILLBMP_TILE:
507 if( lcl_supportsFillProperties( m_eGraphicObjectType ))
508 {
509 const ::rtl::OUString aModePropName = C2U("FillBitmapMode");
510 bool bTiled = static_cast< const XFillBmpTileItem & >(
511 rItemSet.Get( XATTR_FILLBMP_TILE )).GetValue();
512 drawing::BitmapMode aMode =
513 (bTiled ? drawing::BitmapMode_REPEAT : drawing::BitmapMode_NO_REPEAT);
514
515 aValue <<= aMode;
516 if( aValue != GetPropertySet()->getPropertyValue( aModePropName ))
517 {
518 GetPropertySet()->setPropertyValue( aModePropName, aValue );
519 bChanged = true;
520 }
521 }
522 break;
523
524 case XATTR_FILLFLOATTRANSPARENCE:
525 try
526 {
527 if( lcl_supportsFillProperties( m_eGraphicObjectType ))
528 {
529 ::rtl::OUString aPropName =
530 (m_eGraphicObjectType == FILLED_DATA_POINT)
531 ? C2U( "TransparencyGradientName" )
532 : C2U( "FillTransparenceGradientName" );
533
534 const XFillFloatTransparenceItem & rItem =
535 static_cast< const XFillFloatTransparenceItem & >(
536 rItemSet.Get( nWhichId ));
537
538 if( rItem.IsEnabled() &&
539 rItem.QueryValue( aValue, MID_NAME ))
540 {
541 uno::Any aGradient;
542 rItem.QueryValue( aGradient, MID_FILLGRADIENT );
543
544 // add TransparencyGradient to list if it does not already exist
545 ::rtl::OUString aPreferredName;
546 aValue >>= aPreferredName;
547 aValue <<= PropertyHelper::addTransparencyGradientUniqueNameToTable(
548 aGradient, m_xNamedPropertyTableFactory, aPreferredName );
549
550 if( aValue != GetPropertySet()->getPropertyValue( aPropName ))
551 {
552 GetPropertySet()->setPropertyValue( aPropName, aValue );
553 bChanged = true;
554 }
555 }
556 else
557 {
558 ::rtl::OUString aName;
559 if( ( GetPropertySet()->getPropertyValue( aPropName ) >>= aName )
560 && aName.getLength() > 0 )
561 {
562 uno::Reference< beans::XPropertyState > xState( GetPropertySet(), uno::UNO_QUERY );
563 if( xState.is())
564 xState->setPropertyToDefault( aPropName );
565 bChanged = true;
566 }
567 }
568 }
569 }
570 catch( beans::UnknownPropertyException ex )
571 {
572 ASSERT_EXCEPTION( ex );
573 }
574 break;
575
576 case XATTR_GRADIENTSTEPCOUNT:
577 {
578 if( lcl_supportsFillProperties( m_eGraphicObjectType ))
579 {
580 ::rtl::OUString aPropName =
581 (m_eGraphicObjectType == FILLED_DATA_POINT)
582 ? C2U( "GradientStepCount" )
583 : C2U( "FillGradientStepCount" );
584
585 sal_Int16 nStepCount = ( static_cast< const XGradientStepCountItem & >(
586 rItemSet.Get( nWhichId ))).GetValue();
587
588 aValue <<= nStepCount;
589 if( aValue != GetPropertySet()->getPropertyValue( aPropName ))
590 {
591 GetPropertySet()->setPropertyValue( aPropName, aValue );
592 bChanged = true;
593 }
594 }
595 }
596 break;
597
598 case XATTR_LINEDASH:
599 {
600 if( lcl_supportsLineProperties( m_eGraphicObjectType ))
601 {
602
603 ::rtl::OUString aPropName =
604 (m_eGraphicObjectType == FILLED_DATA_POINT)
605 ? C2U( "BorderDashName" )
606 : C2U( "LineDashName" );
607
608 const XLineDashItem & rItem =
609 static_cast< const XLineDashItem & >(
610 rItemSet.Get( nWhichId ));
611
612 if( rItem.QueryValue( aValue, MID_NAME ))
613 {
614 if( aValue != GetPropertySet()->getPropertyValue( aPropName ))
615 {
616 // add LineDash to list
617 uno::Any aLineDash;
618 rItem.QueryValue( aLineDash, MID_LINEDASH );
619 ::rtl::OUString aPreferredName;
620 aValue >>= aPreferredName;
621 aValue <<= PropertyHelper::addLineDashUniqueNameToTable(
622 aLineDash, m_xNamedPropertyTableFactory, aPreferredName );
623
624 GetPropertySet()->setPropertyValue( aPropName, aValue );
625 bChanged = true;
626 }
627 }
628 }
629 }
630 break;
631
632 case XATTR_FILLGRADIENT:
633 {
634 if( lcl_supportsFillProperties( m_eGraphicObjectType ))
635 {
636 ::rtl::OUString aPropName =
637 (m_eGraphicObjectType == FILLED_DATA_POINT)
638 ? C2U( "GradientName" )
639 : C2U( "FillGradientName" );
640
641 const XFillGradientItem & rItem =
642 static_cast< const XFillGradientItem & >(
643 rItemSet.Get( nWhichId ));
644
645 if( rItem.QueryValue( aValue, MID_NAME ))
646 {
647 if( aValue != GetPropertySet()->getPropertyValue( aPropName ))
648 {
649 // add Gradient to list
650 uno::Any aGradient;
651 rItem.QueryValue( aGradient, MID_FILLGRADIENT );
652 ::rtl::OUString aPreferredName;
653 aValue >>= aPreferredName;
654 aValue <<= PropertyHelper::addGradientUniqueNameToTable(
655 aGradient, m_xNamedPropertyTableFactory, aPreferredName );
656
657 GetPropertySet()->setPropertyValue( aPropName, aValue );
658 bChanged = true;
659 }
660 }
661 }
662 }
663 break;
664
665 case XATTR_FILLHATCH:
666 {
667 if( lcl_supportsFillProperties( m_eGraphicObjectType ))
668 {
669 ::rtl::OUString aPropName =
670 (m_eGraphicObjectType == FILLED_DATA_POINT)
671 ? C2U( "HatchName" )
672 : C2U( "FillHatchName" );
673
674 const XFillHatchItem & rItem =
675 static_cast< const XFillHatchItem & >(
676 rItemSet.Get( nWhichId ));
677
678 if( rItem.QueryValue( aValue, MID_NAME ))
679 {
680 if( aValue != GetPropertySet()->getPropertyValue( aPropName ))
681 {
682 // add Hatch to list
683 uno::Any aHatch;
684 rItem.QueryValue( aHatch, MID_FILLHATCH );
685 ::rtl::OUString aPreferredName;
686 aValue >>= aPreferredName;
687 aValue <<= PropertyHelper::addHatchUniqueNameToTable(
688 aHatch, m_xNamedPropertyTableFactory, aPreferredName );
689
690 GetPropertySet()->setPropertyValue( aPropName, aValue );
691 bChanged = true;
692 }
693 }
694 }
695 }
696 break;
697
698 case XATTR_FILLBITMAP:
699 {
700 if( lcl_supportsFillProperties( m_eGraphicObjectType ))
701 {
702 const XFillBitmapItem & rItem =
703 static_cast< const XFillBitmapItem & >(
704 rItemSet.Get( nWhichId ));
705
706 if( rItem.QueryValue( aValue, MID_NAME ))
707 {
708 if( aValue != GetPropertySet()->getPropertyValue( C2U( "FillBitmapName" )))
709 {
710 // add Bitmap to list
711 uno::Any aBitmap;
712 rItem.QueryValue( aBitmap, MID_GRAFURL );
713 ::rtl::OUString aPreferredName;
714 aValue >>= aPreferredName;
715 aValue <<= PropertyHelper::addBitmapUniqueNameToTable(
716 aBitmap, m_xNamedPropertyTableFactory, aPreferredName );
717
718 GetPropertySet()->setPropertyValue( C2U( "FillBitmapName" ), aValue );
719 bChanged = true;
720 }
721 }
722 }
723 }
724 break;
725
726 // hack, because QueryValue of XLineTransparenceItem returns sal_Int32
727 // instead of sal_Int16
728 case XATTR_LINETRANSPARENCE:
729 if( lcl_supportsLineProperties( m_eGraphicObjectType ))
730 {
731 ::rtl::OUString aPropName =
732 (m_eGraphicObjectType == FILLED_DATA_POINT)
733 ? C2U( "BorderTransparency" )
734 : (m_eGraphicObjectType == LINE_DATA_POINT)
735 ? C2U( "Transparency" )
736 : C2U( "LineTransparence" );
737
738 const XLineTransparenceItem & rItem =
739 static_cast< const XLineTransparenceItem & >(
740 rItemSet.Get( nWhichId ));
741
742 if( rItem.QueryValue( aValue ))
743 {
744 OSL_ENSURE( ! aValue.isExtractableTo(
745 ::getCppuType( reinterpret_cast< const sal_Int16 * >(0))),
746 "TransparenceItem QueryValue bug is fixed. Remove hack." );
747 sal_Int32 nValue = 0;
748 if( aValue >>= nValue )
749 {
750 OSL_ENSURE( nValue < SAL_MAX_INT16, "Transparency value too large" );
751 sal_Int16 nValueToSet( static_cast< sal_Int16 >( nValue ));
752 aValue <<= nValueToSet;
753
754 GetPropertySet()->setPropertyValue( aPropName, aValue );
755 bChanged = true;
756 }
757 else
758 {
759 OSL_ENSURE( false, "Wrong type in Transparency Any" );
760 }
761 }
762 }
763 break;
764
765 // hack, because QueryValue of XFillTransparenceItem returns sal_Int32
766 // instead of sal_Int16
767 case XATTR_FILLTRANSPARENCE:
768 if( lcl_supportsFillProperties( m_eGraphicObjectType ))
769 {
770 ::rtl::OUString aPropName =
771 (m_eGraphicObjectType == FILLED_DATA_POINT)
772 ? C2U( "Transparency" )
773 : C2U( "FillTransparence" );
774
775 const XFillTransparenceItem & rItem =
776 static_cast< const XFillTransparenceItem & >(
777 rItemSet.Get( nWhichId ));
778
779 if( rItem.QueryValue( aValue ))
780 {
781 OSL_ENSURE( ! aValue.isExtractableTo(
782 ::getCppuType( reinterpret_cast< const sal_Int16 * >(0))),
783 "TransparenceItem QueryValue bug is fixed. Remove hack." );
784 sal_Int32 nValue = 0;
785 if( aValue >>= nValue )
786 {
787 OSL_ENSURE( nValue < SAL_MAX_INT16, "Transparency value too large" );
788 sal_Int16 nValueToSet( static_cast< sal_Int16 >( nValue ));
789 aValue <<= nValueToSet;
790
791 GetPropertySet()->setPropertyValue( aPropName, aValue );
792 // if linear or no transparence is set, delete the gradient
793 ::rtl::OUString aTransGradPropName =
794 (m_eGraphicObjectType == FILLED_DATA_POINT)
795 ? C2U( "TransparencyGradientName" )
796 : C2U( "FillTransparenceGradientName" );
797 GetPropertySet()->setPropertyValue(
798 aTransGradPropName, uno::makeAny( ::rtl::OUString() ));
799
800 bChanged = true;
801 }
802 else
803 {
804 OSL_ENSURE( false, "Wrong type in Transparency Any" );
805 }
806 }
807 }
808 break;
809 }
810
811 return bChanged;
812 }
813
814 } // namespace wrapper
815 } // namespace chart
vba interoperability for OOo