?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Version 4.3.0.0.beta1, tag libreoffice-4.3.0.0.beta1
[LibreOffice.git] / svx / source / dialog / rubydialog.cxx
blobec2daf383fd47da368474684709fd88162cda909
1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
2 /*
3 * This file is part of the LibreOffice project.
4 *
5 * This Source Code Form is subject to the terms of the Mozilla Public
6 * License, v. 2.0. If a copy of the MPL was not distributed with this
7 * file, You can obtain one at http://mozilla.org/MPL/2.0/.
8 *
9 * This file incorporates work covered by the following license notice:
10 *
11 * Licensed to the Apache Software Foundation (ASF) under one or more
12 * contributor license agreements. See the NOTICE file distributed
13 * with this work for additional information regarding copyright
14 * ownership. The ASF licenses this file to you under the Apache
15 * License, Version 2.0 (the "License"); you may not use this file
16 * except in compliance with the License. You may obtain a copy of
17 * the License at http://www.apache.org/licenses/LICENSE-2.0 .
18 */
19
20 #include <svx/rubydialog.hxx>
21 #include <tools/shl.hxx>
22 #include <svx/dialmgr.hxx>
23 #include <svx/dialogs.hrc>
24 #include <sfx2/app.hxx>
25 #include <sfx2/dispatch.hxx>
26 #include <sfx2/viewfrm.hxx>
27 #include <svl/eitem.hxx>
28 #include <com/sun/star/frame/XController.hpp>
29 #include <com/sun/star/style/XStyle.hpp>
30 #include <com/sun/star/text/XRubySelection.hpp>
31 #include <com/sun/star/beans/PropertyValues.hpp>
32 #include <com/sun/star/beans/XPropertySet.hpp>
33 #include <com/sun/star/beans/XPropertySetInfo.hpp>
34 #include <com/sun/star/container/XNameContainer.hpp>
35 #include <com/sun/star/style/XStyleFamiliesSupplier.hpp>
36 #include <com/sun/star/text/RubyAdjust.hpp>
37 #include <com/sun/star/view/XSelectionChangeListener.hpp>
38 #include <com/sun/star/view/XSelectionSupplier.hpp>
39 #include <cppuhelper/implbase1.hxx>
40 #include <svtools/colorcfg.hxx>
41 #include <vcl/layout.hxx>
42 #include <vcl/settings.hxx>
43
44 using namespace com::sun::star::uno;
45 using namespace com::sun::star::frame;
46 using namespace com::sun::star::text;
47 using namespace com::sun::star::beans;
48 using namespace com::sun::star::style;
49 using namespace com::sun::star::view;
50 using namespace com::sun::star::lang;
51 using namespace com::sun::star::container;
52
53 SFX_IMPL_CHILDWINDOW( SvxRubyChildWindow, SID_RUBY_DIALOG );
54
55 static const sal_Char cRubyBaseText[] = "RubyBaseText";
56 static const sal_Char cRubyText[] = "RubyText";
57 static const sal_Char cCharacterStyles[] = "CharacterStyles";
58 static const sal_Char cRubyAdjust[] = "RubyAdjust";
59 static const sal_Char cRubyIsAbove[] = "RubyIsAbove";
60 static const sal_Char cDisplayName[] = "DisplayName";
61 static const sal_Char cRubyCharStyleName[] = "RubyCharStyleName";
62 static const sal_Char cRubies[] = "Rubies";
63
64 SvxRubyChildWindow::SvxRubyChildWindow( Window* _pParent, sal_uInt16 nId,
65 SfxBindings* pBindings, SfxChildWinInfo* pInfo) :
66 SfxChildWindow(_pParent, nId)
67 {
68 SvxRubyDialog* pDlg = new SvxRubyDialog(pBindings, this, _pParent);
69 pWindow = pDlg;
70
71 if ( pInfo->nFlags & SFX_CHILDWIN_ZOOMIN )
72 pDlg->RollUp();
73
74 eChildAlignment = SFX_ALIGN_NOALIGNMENT;
75
76 pDlg->Initialize( pInfo );
77 }
78
79 SfxChildWinInfo SvxRubyChildWindow::GetInfo() const
80 {
81 return SfxChildWindow::GetInfo();
82 }
83
84 class SvxRubyData_Impl : public cppu::WeakImplHelper1
85 < ::com::sun::star::view::XSelectionChangeListener >
86 {
87 Reference<XModel> xModel;
88 Reference<XRubySelection> xSelection;
89 Sequence<PropertyValues> aRubyValues;
90 Reference<XController> xController;
91 bool bHasSelectionChanged;
92 public:
93 SvxRubyData_Impl();
94 virtual ~SvxRubyData_Impl();
95
96 void SetController(Reference<XController> xCtrl);
97 Reference<XModel> GetModel()
98 {
99 if(!xController.is())
100 xModel = 0;
101 else
102 xModel = xController->getModel();
103 return xModel;
104 }
105 bool HasSelectionChanged() const{return bHasSelectionChanged;}
106 Reference<XRubySelection> GetRubySelection()
107 {
108 xSelection = Reference<XRubySelection>(xController, UNO_QUERY);
109 return xSelection;
110 }
111 void UpdateRubyValues()
112 {
113 if(!xSelection.is())
114 aRubyValues.realloc(0);
115 else
116 aRubyValues = xSelection->getRubyList(false);
117 bHasSelectionChanged = false;
118 }
119 Sequence<PropertyValues>& GetRubyValues() {return aRubyValues;}
120 void AssertOneEntry();
121
122 virtual void SAL_CALL selectionChanged( const ::com::sun::star::lang::EventObject& aEvent ) throw (RuntimeException, std::exception) SAL_OVERRIDE;
123 virtual void SAL_CALL disposing( const ::com::sun::star::lang::EventObject& Source ) throw (RuntimeException, std::exception) SAL_OVERRIDE;
124
125 };
126
127 SvxRubyData_Impl::SvxRubyData_Impl() :
128 bHasSelectionChanged(false)
129 {
130 }
131
132 SvxRubyData_Impl::~SvxRubyData_Impl()
133 {
134 }
135
136 void SvxRubyData_Impl::SetController(Reference<XController> xCtrl)
137 {
138 if(xCtrl.get() != xController.get())
139 {
140 try
141 {
142 Reference<XSelectionSupplier> xSelSupp(xController, UNO_QUERY);
143 if(xSelSupp.is())
144 xSelSupp->removeSelectionChangeListener(this);
145
146 bHasSelectionChanged = true;
147 xController = xCtrl;
148 xSelSupp = Reference<XSelectionSupplier>(xController, UNO_QUERY);
149 if(xSelSupp.is())
150 xSelSupp->addSelectionChangeListener(this);
151 }
152 catch (const Exception&)
153 {
154 }
155 }
156 }
157
158 void SvxRubyData_Impl::selectionChanged( const EventObject& ) throw (RuntimeException, std::exception)
159 {
160 bHasSelectionChanged = true;
161 }
162
163 void SvxRubyData_Impl::disposing( const EventObject&) throw (RuntimeException, std::exception)
164 {
165 try
166 {
167 Reference<XSelectionSupplier> xSelSupp(xController, UNO_QUERY);
168 if(xSelSupp.is())
169 xSelSupp->removeSelectionChangeListener(this);
170 }
171 catch (const Exception&)
172 {
173 }
174 xController = 0;
175 }
176
177 void SvxRubyData_Impl::AssertOneEntry()
178 {
179 //create one entry
180 if(!aRubyValues.getLength())
181 {
182 aRubyValues.realloc(1);
183 Sequence<PropertyValue>& rValues = aRubyValues.getArray()[0];
184 rValues.realloc(5);
185 PropertyValue* pValues = rValues.getArray();
186 pValues[0].Name = cRubyBaseText;
187 pValues[1].Name = cRubyText;
188 pValues[2].Name = cRubyAdjust;
189 pValues[3].Name = cRubyIsAbove;
190 pValues[4].Name = cRubyCharStyleName;
191 }
192 }
193
194 SvxRubyDialog::SvxRubyDialog(SfxBindings *pBind, SfxChildWindow *pCW,
195 Window* _pParent)
196 : SfxModelessDialog(pBind, pCW, _pParent, "AsianPhoneticGuideDialog",
197 "svx/ui/asianphoneticguidedialog.ui")
198 , nLastPos(0)
199 , nCurrentEdit(0)
200 , bModified(false)
201 , pBindings(pBind)
202 {
203 xImpl = pImpl = new SvxRubyData_Impl;
204 get(m_pLeftFT, "basetextft");
205 get(m_pRightFT, "rubytextft");
206 get(m_pAdjustLB, "adjustlb");
207 get(m_pPositionLB, "positionlb");
208 get(m_pCharStyleFT, "styleft");
209 get(m_pCharStyleLB, "stylelb");
210 m_pCharStyleLB->SetStyle(m_pCharStyleLB->GetStyle() | WB_SORT);
211 get(m_pStylistPB, "styles");
212 get(m_pApplyPB, "apply");
213 get(m_pClosePB, "close");
214 get(m_pPreviewWin, "preview");
215 m_pPreviewWin->setRubyDialog(this);
216 get(m_pScrolledWindow, "scrolledwindow");
217 m_pScrolledWindow->setUserManagedScrolling(true);
218 m_pScrollSB = &m_pScrolledWindow->getVertScrollBar();
219 get(m_pLeft1ED, "Left1ED");
220 get(m_pRight1ED, "Right1ED");
221 get(m_pLeft2ED, "Left2ED");
222 get(m_pRight2ED, "Right2ED");
223 get(m_pLeft3ED, "Left3ED");
224 get(m_pRight3ED, "Right3ED");
225 get(m_pLeft4ED, "Left4ED");
226 get(m_pRight4ED, "Right4ED");
227 aEditArr[0] = m_pLeft1ED; aEditArr[1] = m_pRight1ED;
228 aEditArr[2] = m_pLeft2ED; aEditArr[3] = m_pRight2ED;
229 aEditArr[4] = m_pLeft3ED; aEditArr[5] = m_pRight3ED;
230 aEditArr[6] = m_pLeft4ED; aEditArr[7] = m_pRight4ED;
231
232 m_pApplyPB->SetClickHdl(LINK(this, SvxRubyDialog, ApplyHdl_Impl));
233 m_pClosePB->SetClickHdl(LINK(this, SvxRubyDialog, CloseHdl_Impl));
234 m_pStylistPB->SetClickHdl(LINK(this, SvxRubyDialog, StylistHdl_Impl));
235 m_pAdjustLB->SetSelectHdl(LINK(this, SvxRubyDialog, AdjustHdl_Impl));
236 m_pPositionLB->SetSelectHdl(LINK(this, SvxRubyDialog, PositionHdl_Impl));
237 m_pCharStyleLB->SetSelectHdl(LINK(this, SvxRubyDialog, CharStyleHdl_Impl));
238
239 Link aScrLk(LINK(this, SvxRubyDialog, ScrollHdl_Impl));
240 m_pScrollSB->SetScrollHdl( aScrLk );
241 m_pScrollSB->SetEndScrollHdl( aScrLk );
242
243 Link aEditLk(LINK(this, SvxRubyDialog, EditModifyHdl_Impl));
244 Link aScrollLk(LINK(this, SvxRubyDialog, EditScrollHdl_Impl));
245 Link aJumpLk(LINK(this, SvxRubyDialog, EditJumpHdl_Impl));
246 for(sal_uInt16 i = 0; i < 8; i++)
247 {
248 aEditArr[i]->SetModifyHdl(aEditLk);
249 aEditArr[i]->SetJumpHdl(aJumpLk);
250 if(!i || 7 == i)
251 aEditArr[i]->SetScrollHdl(aScrollLk);
252 }
253
254 UpdateColors();
255
256 OUString leftLabelName = m_pLeftFT->GetText(), rightLabelName = m_pRightFT->GetText();
257 m_pLeft2ED->SetAccessibleName(leftLabelName);
258 m_pLeft3ED->SetAccessibleName(leftLabelName);
259 m_pLeft4ED->SetAccessibleName(leftLabelName);
260 m_pRight2ED->SetAccessibleName(rightLabelName);
261 m_pRight3ED->SetAccessibleName(rightLabelName);
262 m_pRight4ED->SetAccessibleName(rightLabelName);
263 }
264
265 SvxRubyDialog::~SvxRubyDialog()
266 {
267 ClearCharStyleList();
268 EventObject aEvent;
269 xImpl->disposing(aEvent);
270 }
271
272 void SvxRubyDialog::ClearCharStyleList()
273 {
274 for(sal_uInt16 i = 0; i < m_pCharStyleLB->GetEntryCount(); i++)
275 {
276 void* pData = m_pCharStyleLB->GetEntryData(i);
277 delete (OUString*)pData;
278 }
279 m_pCharStyleLB->Clear();
280 }
281
282 bool SvxRubyDialog::Close()
283 {
284 pBindings->GetDispatcher()->Execute( SID_RUBY_DIALOG,
285 SFX_CALLMODE_ASYNCHRON |
286 SFX_CALLMODE_RECORD);
287 return true;
288 }
289
290 void SvxRubyDialog::Activate()
291 {
292 SfxModelessDialog::Activate();
293 SfxPoolItem* pState = 0;
294 SfxItemState eState = pBindings->QueryState( SID_STYLE_DESIGNER, pState );
295 bool bEnable = (eState < SFX_ITEM_AVAILABLE) || !pState || !((SfxBoolItem*)pState)->GetValue();
296 delete pState;
297 m_pStylistPB->Enable(bEnable);
298 //get selection from current view frame
299 SfxViewFrame* pCurFrm = SfxViewFrame::Current();
300 Reference< XController > xCtrl = pCurFrm->GetFrame().GetController();
301 pImpl->SetController(xCtrl);
302 if(pImpl->HasSelectionChanged())
303 {
304
305 Reference< XRubySelection > xRubySel = pImpl->GetRubySelection();
306 pImpl->UpdateRubyValues();
307 EnableControls(xRubySel.is());
308 if(xRubySel.is())
309 {
310 Reference< XModel > xModel = pImpl->GetModel();
311 const OUString sCharStyleSelect = m_pCharStyleLB->GetSelectEntry();
312 ClearCharStyleList();
313 Reference<XStyleFamiliesSupplier> xSupplier(xModel, UNO_QUERY);
314 if(xSupplier.is())
315 {
316 try
317 {
318 Reference<XNameAccess> xFam = xSupplier->getStyleFamilies();
319 Any aChar = xFam->getByName(cCharacterStyles);
320 Reference<XNameContainer> xChar;
321 aChar >>= xChar;
322 Reference<XIndexAccess> xCharIdx(xChar, UNO_QUERY);
323 if(xCharIdx.is())
324 {
325 OUString sUIName(cDisplayName);
326 for(sal_Int32 nStyle = 0; nStyle < xCharIdx->getCount(); nStyle++)
327 {
328 Any aStyle = xCharIdx->getByIndex(nStyle);
329 Reference<XStyle> xStyle;
330 aStyle >>= xStyle;
331 Reference<XPropertySet> xPrSet(xStyle, UNO_QUERY);
332 OUString sName, sCoreName;
333 if(xPrSet.is())
334 {
335 Reference<XPropertySetInfo> xInfo = xPrSet->getPropertySetInfo();
336 if(xInfo->hasPropertyByName(sUIName))
337 {
338 Any aName = xPrSet->getPropertyValue(sUIName);
339 aName >>= sName;
340 }
341 }
342 if(xStyle.is())
343 {
344 sCoreName = xStyle->getName();
345 if(sName.isEmpty())
346 sName = sCoreName;
347 }
348 if(!sName.isEmpty())
349 {
350 sal_uInt16 nPos = m_pCharStyleLB->InsertEntry(sName);
351 m_pCharStyleLB->SetEntryData( nPos, new OUString(sCoreName) );
352
353 }
354 }
355 }
356 }
357 catch (const Exception&)
358 {
359 OSL_FAIL("exception in style access");
360 }
361 if(!sCharStyleSelect.isEmpty())
362 m_pCharStyleLB->SelectEntry(sCharStyleSelect);
363 }
364 m_pCharStyleLB->Enable(xSupplier.is());
365 m_pCharStyleFT->Enable(xSupplier.is());
366 }
367 Update();
368 m_pPreviewWin->Invalidate();
369 }
370 }
371
372 void SvxRubyDialog::Deactivate()
373 {
374 SfxModelessDialog::Deactivate();
375 }
376
377 void SvxRubyDialog::SetRubyText(sal_Int32 nPos, Edit& rLeft, Edit& rRight)
378 {
379 OUString sLeft, sRight;
380 const Sequence<PropertyValues>& aRubyValues = pImpl->GetRubyValues();
381 bool bEnable = aRubyValues.getLength() > nPos;
382 if(bEnable)
383 {
384 const Sequence<PropertyValue> aProps = aRubyValues.getConstArray()[nPos];
385 const PropertyValue* pProps = aProps.getConstArray();
386 for(sal_Int32 nProp = 0; nProp < aProps.getLength(); nProp++)
387 {
388 if ( pProps[nProp].Name == cRubyBaseText )
389 pProps[nProp].Value >>= sLeft;
390 else if ( pProps[nProp].Name == cRubyText )
391 pProps[nProp].Value >>= sRight;
392 }
393 }
394 else if(!nPos)
395 bEnable = true;
396 rLeft.Enable(bEnable);
397 rRight.Enable(bEnable);
398 rLeft.SetText(sLeft);
399 rRight.SetText(sRight);
400 rLeft.SaveValue();
401 rRight.SaveValue();
402 }
403
404 void SvxRubyDialog::GetRubyText()
405 {
406 long nTempLastPos = GetLastPos();
407 for(int i = 0; i < 8; i+=2)
408 {
409 if(aEditArr[i]->IsEnabled() &&
410 (aEditArr[i]->IsValueChangedFromSaved() ||
411 aEditArr[i + 1]->IsValueChangedFromSaved()))
412 {
413 Sequence<PropertyValues>& aRubyValues = pImpl->GetRubyValues();
414 DBG_ASSERT(aRubyValues.getLength() > (i / 2 + nTempLastPos), "wrong index" );
415 SetModified(true);
416 Sequence<PropertyValue> &rProps = aRubyValues.getArray()[i / 2 + nTempLastPos];
417 PropertyValue* pProps = rProps.getArray();
418 for(sal_Int32 nProp = 0; nProp < rProps.getLength(); nProp++)
419 {
420 if ( pProps[nProp].Name == cRubyBaseText )
421 pProps[nProp].Value <<= OUString(aEditArr[i]->GetText());
422 else if ( pProps[nProp].Name == cRubyText )
423 pProps[nProp].Value <<= OUString(aEditArr[i + 1]->GetText());
424 }
425 }
426 }
427 }
428
429 void SvxRubyDialog::Update()
430 {
431 const Sequence<PropertyValues>& aRubyValues = pImpl->GetRubyValues();
432 sal_Int32 nLen = aRubyValues.getLength();
433 m_pScrollSB->Enable(nLen > 4);
434 m_pScrollSB->SetRange( Range(0, nLen > 4 ? nLen - 4 : 0));
435 m_pScrollSB->SetThumbPos(0);
436 SetLastPos(0);
437 SetModified(false);
438
439 sal_Int16 nAdjust = -1;
440 sal_Int16 nPosition = -1;
441 OUString sCharStyleName, sTmp;
442 bool bCharStyleEqual = true;
443 for(sal_Int32 nRuby = 0; nRuby < nLen; nRuby++)
444 {
445 const Sequence<PropertyValue> &rProps = aRubyValues.getConstArray()[nRuby];
446 const PropertyValue* pProps = rProps.getConstArray();
447 for(sal_Int32 nProp = 0; nProp < rProps.getLength(); nProp++)
448 {
449 if(nAdjust > -2 && pProps[nProp].Name == cRubyAdjust )
450 {
451 sal_Int16 nTmp = sal_Int16();
452 pProps[nProp].Value >>= nTmp;
453 if(!nRuby)
454 nAdjust = nTmp;
455 else if(nAdjust != nTmp)
456 nAdjust = -2;
457 }
458 if(nPosition > -2 && pProps[nProp].Name == cRubyIsAbove )
459 {
460 bool bTmp = *(sal_Bool*)pProps[nProp].Value.getValue();
461 if(!nRuby)
462 nPosition = bTmp ? 0 : 1;
463 else if( (!nPosition && !bTmp) || (nPosition == 1 && bTmp) )
464 nPosition = -2;
465 }
466 if(bCharStyleEqual && pProps[nProp].Name == cRubyCharStyleName )
467 {
468 pProps[nProp].Value >>= sTmp;
469 if(!nRuby)
470 sCharStyleName = sTmp;
471 else if(sCharStyleName != sTmp)
472 bCharStyleEqual = false;
473 }
474 }
475 }
476 if(!nLen)
477 {
478 //enable selection if the ruby list is empty
479 nAdjust = 0;
480 nPosition = 0;
481 }
482 if(nAdjust > -1)
483 m_pAdjustLB->SelectEntryPos(nAdjust);
484 else
485 m_pAdjustLB->SetNoSelection();
486 if(nPosition > -1)
487 m_pPositionLB->SelectEntryPos(nPosition ? 1 : 0);
488 if(!nLen || (bCharStyleEqual && sCharStyleName.isEmpty()))
489 sCharStyleName = cRubies;
490 if(!sCharStyleName.isEmpty())
491 {
492 for(sal_uInt16 i = 0; i < m_pCharStyleLB->GetEntryCount(); i++)
493 {
494 const OUString* pCoreName = (const OUString*)m_pCharStyleLB->GetEntryData(i);
495 if(pCoreName && sCharStyleName == *pCoreName)
496 {
497 m_pCharStyleLB->SelectEntryPos(i);
498 break;
499 }
500 }
501 }
502 else
503 m_pCharStyleLB->SetNoSelection();
504
505 ScrollHdl_Impl(m_pScrollSB);
506 }
507
508 void SvxRubyDialog::GetCurrentText(OUString& rBase, OUString& rRuby)
509 {
510 rBase = aEditArr[nCurrentEdit * 2]->GetText();
511 rRuby = aEditArr[nCurrentEdit * 2 + 1]->GetText();
512 }
513
514 IMPL_LINK(SvxRubyDialog, ScrollHdl_Impl, ScrollBar*, pScroll)
515 {
516 long nPos = pScroll->GetThumbPos();
517 if(GetLastPos() != nPos)
518 {
519 GetRubyText();
520 }
521 SetRubyText(nPos++, *m_pLeft1ED, *m_pRight1ED);
522 SetRubyText(nPos++, *m_pLeft2ED, *m_pRight2ED);
523 SetRubyText(nPos++, *m_pLeft3ED, *m_pRight3ED);
524 SetRubyText(nPos, *m_pLeft4ED, *m_pRight4ED);
525 SetLastPos(nPos - 3);
526 m_pPreviewWin->Invalidate();
527 return 0;
528 }
529
530 IMPL_LINK_NOARG(SvxRubyDialog, ApplyHdl_Impl)
531 {
532 const Sequence<PropertyValues>& aRubyValues = pImpl->GetRubyValues();
533 if(!aRubyValues.getLength())
534 {
535 AssertOneEntry();
536 PositionHdl_Impl(m_pPositionLB);
537 AdjustHdl_Impl(m_pAdjustLB);
538 CharStyleHdl_Impl(m_pCharStyleLB);
539 }
540 GetRubyText();
541 //reset all edit fields - SaveValue is called
542 ScrollHdl_Impl(m_pScrollSB);
543
544 Reference<XRubySelection> xSelection = pImpl->GetRubySelection();
545 if(IsModified() && xSelection.is())
546 {
547 try
548 {
549 xSelection->setRubyList(aRubyValues, false);
550 }
551 catch (const Exception&)
552 {
553 OSL_FAIL("Exception caught");
554 }
555 }
556 return 0;
557 }
558
559 IMPL_LINK_NOARG(SvxRubyDialog, CloseHdl_Impl)
560 {
561 Close();
562 return 0;
563 }
564
565 IMPL_LINK_NOARG(SvxRubyDialog, StylistHdl_Impl)
566 {
567 SfxPoolItem* pState = 0;
568 SfxItemState eState = pBindings->QueryState( SID_STYLE_DESIGNER, pState );
569 if(eState <= SFX_ITEM_SET || !pState || !((SfxBoolItem*)pState)->GetValue())
570 {
571 pBindings->GetDispatcher()->Execute( SID_STYLE_DESIGNER,
572 SFX_CALLMODE_ASYNCHRON |
573 SFX_CALLMODE_RECORD);
574 }
575 delete pState;
576 return 0;
577 }
578
579 IMPL_LINK(SvxRubyDialog, AdjustHdl_Impl, ListBox*, pBox)
580 {
581 AssertOneEntry();
582 sal_Int16 nAdjust = pBox->GetSelectEntryPos();
583 Sequence<PropertyValues>& aRubyValues = pImpl->GetRubyValues();
584 for(sal_Int32 nRuby = 0; nRuby < aRubyValues.getLength(); nRuby++)
585 {
586 Sequence<PropertyValue> &rProps = aRubyValues.getArray()[nRuby];
587 PropertyValue* pProps = rProps.getArray();
588 for(sal_Int32 nProp = 0; nProp < rProps.getLength(); nProp++)
589 {
590 if ( pProps[nProp].Name == cRubyAdjust )
591 pProps[nProp].Value <<= nAdjust;
592 }
593 SetModified(true);
594 }
595 m_pPreviewWin->Invalidate();
596 return 0;
597 }
598
599 IMPL_LINK(SvxRubyDialog, PositionHdl_Impl, ListBox*, pBox)
600 {
601 AssertOneEntry();
602 sal_Bool bAbove = !pBox->GetSelectEntryPos();
603 const Type& rType = ::getBooleanCppuType();
604 Sequence<PropertyValues>& aRubyValues = pImpl->GetRubyValues();
605 for(sal_Int32 nRuby = 0; nRuby < aRubyValues.getLength(); nRuby++)
606 {
607 Sequence<PropertyValue> &rProps = aRubyValues.getArray()[nRuby];
608 PropertyValue* pProps = rProps.getArray();
609 for(sal_Int32 nProp = 0; nProp < rProps.getLength(); nProp++)
610 {
611 if ( pProps[nProp].Name == cRubyIsAbove )
612 pProps[nProp].Value.setValue(&bAbove, rType);
613 }
614 SetModified(true);
615 }
616 m_pPreviewWin->Invalidate();
617 return 0;
618 }
619
620 IMPL_LINK_NOARG(SvxRubyDialog, CharStyleHdl_Impl)
621 {
622 AssertOneEntry();
623 OUString sStyleName;
624 if(LISTBOX_ENTRY_NOTFOUND != m_pCharStyleLB->GetSelectEntryPos())
625 sStyleName = *(OUString*) m_pCharStyleLB->GetEntryData(m_pCharStyleLB->GetSelectEntryPos());
626 Sequence<PropertyValues>& aRubyValues = pImpl->GetRubyValues();
627 for(sal_Int32 nRuby = 0; nRuby < aRubyValues.getLength(); nRuby++)
628 {
629 Sequence<PropertyValue> &rProps = aRubyValues.getArray()[nRuby];
630 PropertyValue* pProps = rProps.getArray();
631 for(sal_Int32 nProp = 0; nProp < rProps.getLength(); nProp++)
632 {
633 if ( pProps[nProp].Name == cRubyCharStyleName )
634 {
635 pProps[nProp].Value <<= sStyleName;
636 }
637 }
638 SetModified(true);
639 }
640 return 0;
641 }
642
643 IMPL_LINK(SvxRubyDialog, EditModifyHdl_Impl, Edit*, pEdit)
644 {
645 for(sal_uInt16 i = 0; i < 8; i++)
646 {
647 if(pEdit == aEditArr[i])
648 {
649 nCurrentEdit = i / 2;
650 break;
651 }
652 }
653 m_pPreviewWin->Invalidate();
654 return 0;
655 }
656
657 IMPL_LINK(SvxRubyDialog, EditScrollHdl_Impl, sal_Int32*, pParam)
658 {
659 long nRet = 0;
660 if(m_pScrollSB->IsEnabled())
661 {
662 //scroll forward
663 if(*pParam > 0 && (aEditArr[7]->HasFocus() || aEditArr[6]->HasFocus() ))
664 {
665 if(m_pScrollSB->GetRangeMax() > m_pScrollSB->GetThumbPos())
666 {
667 m_pScrollSB->SetThumbPos(m_pScrollSB->GetThumbPos() + 1);
668 aEditArr[6]->GrabFocus();
669 nRet = 1;
670 }
671 }
672 //scroll backward
673 else if(m_pScrollSB->GetThumbPos() && (aEditArr[0]->HasFocus()||aEditArr[1]->HasFocus()) )
674 {
675 m_pScrollSB->SetThumbPos(m_pScrollSB->GetThumbPos() - 1);
676 aEditArr[1]->GrabFocus();
677 nRet = 1;
678 }
679 if(nRet)
680 ScrollHdl_Impl(m_pScrollSB);
681 }
682 return nRet;
683 }
684
685 IMPL_LINK(SvxRubyDialog, EditJumpHdl_Impl, sal_Int32*, pParam)
686 {
687 sal_uInt16 nIndex = USHRT_MAX;
688 for(sal_uInt16 i = 0; i < 8; i++)
689 {
690 if(aEditArr[i]->HasFocus())
691 nIndex = i;
692 }
693 if(nIndex < 8)
694 {
695 if(*pParam > 0)
696 {
697 if(nIndex < 6)
698 aEditArr[nIndex + 2]->GrabFocus();
699 else if( EditScrollHdl_Impl(pParam))
700 aEditArr[nIndex]->GrabFocus();
701 }
702 else
703 {
704 if(nIndex > 1)
705 aEditArr[nIndex - 2]->GrabFocus();
706 else if( EditScrollHdl_Impl(pParam))
707 aEditArr[nIndex]->GrabFocus();
708 }
709 }
710 return 0;
711 };
712
713 void SvxRubyDialog::AssertOneEntry()
714 {
715 pImpl->AssertOneEntry();
716 }
717
718
719
720 void SvxRubyDialog::UpdateColors( void )
721 {
722 const StyleSettings& rStyleSettings = GetSettings().GetStyleSettings();
723 svtools::ColorConfig aColorConfig;
724
725 Font aFnt( m_pPreviewWin->GetFont() );
726
727 Color aNewTextCol( aColorConfig.GetColorValue( svtools::FONTCOLOR ).nColor );
728 Color aNewFillCol( rStyleSettings.GetWindowColor() );
729
730 if( aNewFillCol != aFnt.GetFillColor() || aNewTextCol != aFnt.GetColor() )
731 {
732 aFnt.SetFillColor( aNewFillCol );
733 aFnt.SetColor( aNewTextCol );
734 m_pPreviewWin->SetFont( aFnt );
735
736 m_pPreviewWin->Invalidate();
737 }
738 }
739
740
741
742 void SvxRubyDialog::DataChanged( const DataChangedEvent& rDCEvt )
743 {
744 SfxModelessDialog::DataChanged( rDCEvt );
745
746 if( ( rDCEvt.GetType() == DATACHANGED_SETTINGS ) && ( rDCEvt.GetFlags() & SETTINGS_STYLE ) )
747 UpdateColors();
748 }
749
750 void SvxRubyDialog::EnableControls(bool bEnable)
751 {
752 get_content_area()->Enable(bEnable);
753 m_pApplyPB->Enable(bEnable);
754 }
755
756 RubyPreview::RubyPreview(Window *pParent)
757 : Window(pParent, WB_BORDER)
758 , m_pParentDlg(NULL)
759 {
760 SetMapMode(MAP_TWIP);
761 SetBorderStyle( WINDOW_BORDER_MONO );
762 }
763
764 extern "C" SAL_DLLPUBLIC_EXPORT Window* SAL_CALL makeRubyPreview(Window *pParent, VclBuilder::stringmap &)
765 {
766 return new RubyPreview(pParent);
767 }
768
769 void RubyPreview::Paint( const Rectangle& /* rRect */ )
770 {
771 Size aWinSize = GetOutputSize();
772
773 Font aSaveFont = GetFont();
774 aSaveFont.SetHeight(aWinSize.Height() / 4);
775 SetFont(aSaveFont);
776
777 Rectangle aRect(Point(0, 0), aWinSize);
778 SetLineColor();
779 SetFillColor( aSaveFont.GetFillColor() );
780 DrawRect(aRect);
781
782 OUString sBaseText, sRubyText;
783 m_pParentDlg->GetCurrentText(sBaseText, sRubyText);
784
785 long nTextHeight = GetTextHeight();
786 long nBaseWidth = GetTextWidth(sBaseText);
787
788 Font aRubyFont(aSaveFont);
789 aRubyFont.SetHeight(aRubyFont.GetHeight() * 70 / 100);
790 SetFont(aRubyFont);
791 long nRubyWidth = GetTextWidth(sRubyText);
792 SetFont(aSaveFont);
793
794 sal_uInt16 nAdjust = m_pParentDlg->m_pAdjustLB->GetSelectEntryPos();
795 //use center if no adjustment is available
796 if(nAdjust > 4)
797 nAdjust = 1;
798
799 //which part is stretched ?
800 bool bRubyStretch = nBaseWidth >= nRubyWidth;
801
802 long nCenter = aWinSize.Width() / 2;
803 long nLeftStart = nCenter - (bRubyStretch ? (nBaseWidth / 2) : (nRubyWidth / 2));
804 long nRightEnd = nCenter + (bRubyStretch ? (nBaseWidth / 2) : (nRubyWidth / 2));
805
806 long nYRuby = aWinSize.Height() / 4 - nTextHeight / 2;
807 long nYBase = aWinSize.Height() * 3 / 4 - nTextHeight / 2;
808
809 //use above also if no selection is set
810 bool bAbove = m_pParentDlg->m_pPositionLB->GetSelectEntryPos() != 1;
811 if(!bAbove)
812 {
813 long nTmp = nYRuby;
814 nYRuby = nYBase;
815 nYBase = nTmp;
816 }
817 long nYOutput, nOutTextWidth;
818 OUString sOutputText;
819
820
821 if(bRubyStretch)
822 {
823 DrawText( Point( nLeftStart , nYBase), sBaseText );
824 nYOutput = nYRuby;
825 sOutputText = sRubyText;
826 nOutTextWidth = nRubyWidth;
827 SetFont(aRubyFont);
828 }
829 else
830 {
831 SetFont(aRubyFont);
832 DrawText( Point( nLeftStart , nYRuby), sRubyText );
833 nYOutput = nYBase;
834 sOutputText = sBaseText;
835 nOutTextWidth = nBaseWidth;
836 SetFont(aSaveFont);
837 }
838
839 switch(nAdjust)
840 {
841 case RubyAdjust_LEFT:
842 DrawText( Point( nLeftStart , nYOutput), sOutputText );
843 break;
844 case RubyAdjust_RIGHT:
845 DrawText( Point( nRightEnd - nOutTextWidth, nYOutput), sOutputText );
846 break;
847 case RubyAdjust_INDENT_BLOCK:
848 {
849 long nCharWidth = GetTextWidth(OUString("X"));
850 if(nOutTextWidth < (nRightEnd - nLeftStart - nCharWidth))
851 {
852 nCharWidth /= 2;
853 nLeftStart += nCharWidth;
854 nRightEnd -= nCharWidth;
855 }
856 }
857 // no break!
858 case RubyAdjust_BLOCK:
859 if(sOutputText.getLength() > 1)
860 {
861 sal_Int32 nCount = sOutputText.getLength();
862 long nSpace = ((nRightEnd - nLeftStart) - GetTextWidth(sOutputText)) / (nCount - 1);
863 for(sal_Int32 i = 0; i < nCount; i++)
864 {
865 OUString sChar(sOutputText[i]);
866 DrawText( Point( nLeftStart , nYOutput), sChar);
867 long nCharWidth = GetTextWidth(sChar);
868 nLeftStart += nCharWidth + nSpace;
869 }
870 break;
871 }
872 //no break;
873 case RubyAdjust_CENTER:
874 DrawText( Point( nCenter - nOutTextWidth / 2 , nYOutput), sOutputText );
875 break;
876 }
877 SetFont(aSaveFont);
878 }
879
880 Size RubyPreview::GetOptimalSize() const
881 {
882 return LogicToPixel(Size(215, 50), MapMode(MAP_APPFONT));
883 }
884
885 void RubyEdit::GetFocus()
886 {
887 GetModifyHdl().Call(this);
888 Edit::GetFocus();
889 }
890
891 bool RubyEdit::PreNotify( NotifyEvent& rNEvt )
892 {
893 bool nHandled = false;
894 if ( rNEvt.GetType() == EVENT_KEYINPUT )
895 {
896 const KeyEvent* pKEvt = rNEvt.GetKeyEvent();
897 const KeyCode& rKeyCode = pKEvt->GetKeyCode();
898 sal_uInt16 nMod = rKeyCode.GetModifier();
899 sal_uInt16 nCode = rKeyCode.GetCode();
900 if( nCode == KEY_TAB && (!nMod || KEY_SHIFT == nMod))
901 {
902 sal_Int32 nParam = KEY_SHIFT == nMod ? -1 : 1;
903 if(aScrollHdl.IsSet() && aScrollHdl.Call(&nParam))
904 nHandled = true;
905 }
906 else if(KEY_UP == nCode || KEY_DOWN == nCode)
907 {
908 sal_Int32 nParam = KEY_UP == nCode ? -1 : 1;
909 aJumpHdl.Call(&nParam);
910 }
911 }
912 if(!nHandled)
913 nHandled = Edit::PreNotify(rNEvt);
914 return nHandled;
915 }
916
917 extern "C" SAL_DLLPUBLIC_EXPORT Window* SAL_CALL makeRubyEdit(Window *pParent, VclBuilder::stringmap &)
918 {
919 return new RubyEdit(pParent);
920 }
921
922 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */
FREE OFFICE SUITE