blob: fcde502284c8238b772a2508ed5cf256204c1258 [file] [log] [blame]
/**************************************************************
*
* Licensed to the Apache Software Foundation (ASF) under one
* or more contributor license agreements. See the NOTICE file
* distributed with this work for additional information
* regarding copyright ownership. The ASF licenses this file
* to you under the Apache License, Version 2.0 (the
* "License"); you may not use this file except in compliance
* with the License. You may obtain a copy of the License at
*
* http://www.apache.org/licenses/LICENSE-2.0
*
* Unless required by applicable law or agreed to in writing,
* software distributed under the License is distributed on an
* "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
* KIND, either express or implied. See the License for the
* specific language governing permissions and limitations
* under the License.
*
*************************************************************/
// MARKER(update_precomp.py): autogen include statement, do not remove
#include "precompiled_svx.hxx"
#include <svx/rubydialog.hxx>
#include <tools/shl.hxx>
#include <svx/dialmgr.hxx>
#include <svx/dialogs.hrc>
#include <rubydialog.hrc>
#include <sfx2/app.hxx>
#include <sfx2/dispatch.hxx>
#include <sfx2/viewfrm.hxx>
#include <svl/eitem.hxx>
#include <com/sun/star/frame/XController.hpp>
#include <com/sun/star/style/XStyle.hpp>
#include <com/sun/star/text/XRubySelection.hpp>
#include <com/sun/star/beans/PropertyValues.hpp>
#include <com/sun/star/beans/XPropertySet.hpp>
#include <com/sun/star/beans/XPropertySetInfo.hpp>
#include <com/sun/star/container/XNameContainer.hpp>
#include <com/sun/star/style/XStyleFamiliesSupplier.hpp>
#include <com/sun/star/text/RubyAdjust.hpp>
#include <com/sun/star/view/XSelectionChangeListener.hpp>
#include <com/sun/star/view/XSelectionSupplier.hpp>
#ifndef _CPPUHELPER_IMPLBASE3_HXX_
#include <cppuhelper/implbase1.hxx>
#endif
#include <svtools/colorcfg.hxx>
using namespace com::sun::star::uno;
using namespace com::sun::star::frame;
using namespace com::sun::star::text;
using namespace com::sun::star::beans;
using namespace com::sun::star::style;
using namespace com::sun::star::text;
using namespace com::sun::star::view;
using namespace com::sun::star::lang;
using namespace com::sun::star::container;
using rtl::OUString;
#define C2U(cChar) rtl::OUString::createFromAscii(cChar)
SFX_IMPL_CHILDWINDOW( SvxRubyChildWindow, SID_RUBY_DIALOG );
static const sal_Char cRubyBaseText[] = "RubyBaseText";
static const sal_Char cRubyText[] = "RubyText";
static const sal_Char cCharacterStyles[] = "CharacterStyles";
static const sal_Char cRubyAdjust[] = "RubyAdjust";
static const sal_Char cRubyIsAbove[] = "RubyIsAbove";
static const sal_Char cDisplayName[] = "DisplayName";
static const sal_Char cRubyCharStyleName[] = "RubyCharStyleName";
static const sal_Char cRubies[] = "Rubies";
/* -----------------------------09.01.01 17:24--------------------------------
---------------------------------------------------------------------------*/
SvxRubyChildWindow::SvxRubyChildWindow( Window* _pParent, sal_uInt16 nId,
SfxBindings* pBindings, SfxChildWinInfo* pInfo) :
SfxChildWindow(_pParent, nId)
{
pWindow = new SvxRubyDialog( pBindings, this, _pParent, SVX_RES( RID_SVXDLG_RUBY ) );
SvxRubyDialog* pDlg = (SvxRubyDialog*) pWindow;
if ( pInfo->nFlags & SFX_CHILDWIN_ZOOMIN )
pDlg->RollUp();
eChildAlignment = SFX_ALIGN_NOALIGNMENT;
pDlg->Initialize( pInfo );
}
/* -----------------------------10.01.01 13:53--------------------------------
---------------------------------------------------------------------------*/
SfxChildWinInfo SvxRubyChildWindow::GetInfo() const
{
return SfxChildWindow::GetInfo();
}
/* -----------------------------09.01.01 17:17--------------------------------
---------------------------------------------------------------------------*/
class SvxRubyData_Impl : public cppu::WeakImplHelper1
< ::com::sun::star::view::XSelectionChangeListener >
{
Reference<XModel> xModel;
Reference<XRubySelection> xSelection;
Sequence<PropertyValues> aRubyValues;
Reference<XController> xController;
sal_Bool bHasSelectionChanged;
public:
SvxRubyData_Impl();
~SvxRubyData_Impl();
void SetController(Reference<XController> xCtrl);
Reference<XModel> GetModel()
{
if(!xController.is())
xModel = 0;
else
xModel = xController->getModel();
return xModel;
}
sal_Bool HasSelectionChanged() const{return bHasSelectionChanged;}
Reference<XRubySelection> GetRubySelection()
{
xSelection = Reference<XRubySelection>(xController, UNO_QUERY);
return xSelection;
}
void UpdateRubyValues(sal_Bool bAutoUpdate)
{
if(!xSelection.is())
aRubyValues.realloc(0);
else
aRubyValues = xSelection->getRubyList(bAutoUpdate);
bHasSelectionChanged = sal_False;
}
Sequence<PropertyValues>& GetRubyValues() {return aRubyValues;}
void AssertOneEntry();
virtual void SAL_CALL selectionChanged( const ::com::sun::star::lang::EventObject& aEvent ) throw (RuntimeException);
virtual void SAL_CALL disposing( const ::com::sun::star::lang::EventObject& Source ) throw (RuntimeException);
};
//-----------------------------------------------------------------------------
SvxRubyData_Impl::SvxRubyData_Impl() :
bHasSelectionChanged(sal_False)
{
}
//-----------------------------------------------------------------------------
SvxRubyData_Impl::~SvxRubyData_Impl()
{
}
//-----------------------------------------------------------------------------
void SvxRubyData_Impl::SetController(Reference<XController> xCtrl)
{
if(xCtrl.get() != xController.get())
{
try
{
Reference<XSelectionSupplier> xSelSupp(xController, UNO_QUERY);
if(xSelSupp.is())
xSelSupp->removeSelectionChangeListener(this);
bHasSelectionChanged = sal_True;
xController = xCtrl;
xSelSupp = Reference<XSelectionSupplier>(xController, UNO_QUERY);
if(xSelSupp.is())
xSelSupp->addSelectionChangeListener(this);
}
catch(Exception&)
{}
}
}
//-----------------------------------------------------------------------------
void SvxRubyData_Impl::selectionChanged( const EventObject& ) throw (RuntimeException)
{
bHasSelectionChanged = sal_True;
}
//-----------------------------------------------------------------------------
void SvxRubyData_Impl::disposing( const EventObject&) throw (RuntimeException)
{
try
{
Reference<XSelectionSupplier> xSelSupp(xController, UNO_QUERY);
if(xSelSupp.is())
xSelSupp->removeSelectionChangeListener(this);
}
catch(Exception&)
{}
xController = 0;
}
//-----------------------------------------------------------------------------
void SvxRubyData_Impl::AssertOneEntry()
{
//create one entry
if(!aRubyValues.getLength())
{
aRubyValues.realloc(1);
Sequence<PropertyValue>& rValues = aRubyValues.getArray()[0];
rValues.realloc(5);
PropertyValue* pValues = rValues.getArray();
pValues[0].Name = C2U(cRubyBaseText);
pValues[1].Name = C2U(cRubyText);
pValues[2].Name = C2U(cRubyAdjust);
pValues[3].Name = C2U(cRubyIsAbove);
pValues[4].Name = C2U(cRubyCharStyleName);
}
}
/* ---------------------------------------------------------------------------
---------------------------------------------------------------------------*/
SvxRubyDialog::SvxRubyDialog( SfxBindings *pBind, SfxChildWindow *pCW,
Window* _pParent, const ResId& rResId ) :
SfxModelessDialog( pBind, pCW, _pParent, rResId ),
aLeftFT(this, ResId(FT_LEFT,*rResId.GetResMgr() )),
aLeft1ED(this, ResId(ED_LEFT_1,*rResId.GetResMgr() )),
aRightFT(this, ResId(FT_RIGHT,*rResId.GetResMgr() )),
aRight1ED(this, ResId(ED_RIGHT_1,*rResId.GetResMgr() )),
aLeft2ED(this, ResId(ED_LEFT_2,*rResId.GetResMgr() )),
aRight2ED(this, ResId(ED_RIGHT_2,*rResId.GetResMgr() )),
aLeft3ED(this, ResId(ED_LEFT_3,*rResId.GetResMgr() )),
aRight3ED(this, ResId(ED_RIGHT_3,*rResId.GetResMgr() )),
aLeft4ED(this, ResId(ED_LEFT_4,*rResId.GetResMgr() )),
aRight4ED(this, ResId(ED_RIGHT_4,*rResId.GetResMgr() )),
aScrollSB(this, ResId(SB_SCROLL,*rResId.GetResMgr() )),
aAutoDetectionCB(this, ResId(CB_AUTO_DETECT,*rResId.GetResMgr() )),
aAdjustFT(this, ResId(FT_ADJUST,*rResId.GetResMgr() )),
aAdjustLB(this, ResId(LB_ADJUST,*rResId.GetResMgr() )),
aPositionFT(this, ResId(FT_POSITION,*rResId.GetResMgr() )),
aPositionLB(this, ResId(LB_POSITION,*rResId.GetResMgr() )),
aCharStyleFT(this, ResId(FT_CHAR_STYLE,*rResId.GetResMgr() )),
aCharStyleLB(this, ResId(LB_CHAR_STYLE,*rResId.GetResMgr() )),
aStylistPB(this, ResId(PB_STYLIST,*rResId.GetResMgr() )),
aPreviewFT(this, ResId(FT_PREVIEW,*rResId.GetResMgr() )),
aPreviewWin(*this, ResId(WIN_PREVIEW,*rResId.GetResMgr() )),
aApplyPB(this, ResId(PB_APPLY,*rResId.GetResMgr() )),
aClosePB(this, ResId(PB_CLOSE,*rResId.GetResMgr() )),
aHelpPB(this, ResId(PB_HELP,*rResId.GetResMgr() )),
nLastPos(0),
nCurrentEdit(0),
bModified(sal_False),
pBindings(pBind)
{
xImpl = pImpl = new SvxRubyData_Impl;
FreeResource();
//#85638# automatic detection not yet available
aAutoDetectionCB.Hide();
aEditArr[0] = &aLeft1ED; aEditArr[1] = &aRight1ED;
aEditArr[2] = &aLeft2ED; aEditArr[3] = &aRight2ED;
aEditArr[4] = &aLeft3ED; aEditArr[5] = &aRight3ED;
aEditArr[6] = &aLeft4ED; aEditArr[7] = &aRight4ED;
aApplyPB.SetClickHdl(LINK(this, SvxRubyDialog, ApplyHdl_Impl));
aClosePB.SetClickHdl(LINK(this, SvxRubyDialog, CloseHdl_Impl));
aStylistPB.SetClickHdl(LINK(this, SvxRubyDialog, StylistHdl_Impl));
aAutoDetectionCB.SetClickHdl(LINK(this, SvxRubyDialog, AutomaticHdl_Impl));
aAdjustLB.SetSelectHdl(LINK(this, SvxRubyDialog, AdjustHdl_Impl));
aPositionLB.SetSelectHdl(LINK(this, SvxRubyDialog, PositionHdl_Impl));
aCharStyleLB.SetSelectHdl(LINK(this, SvxRubyDialog, CharStyleHdl_Impl));
Link aScrLk(LINK(this, SvxRubyDialog, ScrollHdl_Impl));
aScrollSB.SetScrollHdl( aScrLk );
aScrollSB.SetEndScrollHdl( aScrLk );
Link aEditLk(LINK(this, SvxRubyDialog, EditModifyHdl_Impl));
Link aScrollLk(LINK(this, SvxRubyDialog, EditScrollHdl_Impl));
Link aJumpLk(LINK(this, SvxRubyDialog, EditJumpHdl_Impl));
for(sal_uInt16 i = 0; i < 8; i++)
{
aEditArr[i]->SetModifyHdl(aEditLk);
aEditArr[i]->SetJumpHdl(aJumpLk);
if(!i || 7 == i)
aEditArr[i]->SetScrollHdl(aScrollLk);
}
UpdateColors();
String leftLabelName = aLeftFT.GetText(), rightLabelName = aRightFT.GetText();
aLeft2ED.SetAccessibleName(leftLabelName);
aLeft3ED.SetAccessibleName(leftLabelName);
aLeft4ED.SetAccessibleName(leftLabelName);
aRight2ED.SetAccessibleName(rightLabelName);
aRight3ED.SetAccessibleName(rightLabelName);
aRight4ED.SetAccessibleName(rightLabelName);
}
/* -----------------------------09.01.01 17:17--------------------------------
---------------------------------------------------------------------------*/
SvxRubyDialog::~SvxRubyDialog()
{
ClearCharStyleList();
EventObject aEvent;
xImpl->disposing(aEvent);
}
/* -----------------------------01.02.01 10:29--------------------------------
---------------------------------------------------------------------------*/
void SvxRubyDialog::ClearCharStyleList()
{
for(sal_uInt16 i = 0; i < aCharStyleLB.GetEntryCount(); i++)
{
void* pData = aCharStyleLB.GetEntryData(i);
delete (OUString*)pData;
}
aCharStyleLB.Clear();
}
/* -----------------------------09.01.01 17:17--------------------------------
---------------------------------------------------------------------------*/
sal_Bool SvxRubyDialog::Close()
{
pBindings->GetDispatcher()->Execute( SID_RUBY_DIALOG,
SFX_CALLMODE_ASYNCHRON |
SFX_CALLMODE_RECORD);
return sal_True;
}
/* -----------------------------29.01.01 15:26--------------------------------
---------------------------------------------------------------------------*/
void SvxRubyDialog::Activate()
{
SfxModelessDialog::Activate();
SfxPoolItem* pState = 0;
SfxItemState eState = pBindings->QueryState( SID_STYLE_DESIGNER, pState );
sal_Bool bEnable = (eState < SFX_ITEM_AVAILABLE) || !pState || !((SfxBoolItem*)pState)->GetValue();
aStylistPB.Enable(bEnable);
//get selection from current view frame
SfxViewFrame* pCurFrm = SfxViewFrame::Current();
Reference< XController > xCtrl = pCurFrm->GetFrame().GetController();
pImpl->SetController(xCtrl);
if(pImpl->HasSelectionChanged())
{
Reference< XRubySelection > xRubySel = pImpl->GetRubySelection();
pImpl->UpdateRubyValues(aAutoDetectionCB.IsChecked());
EnableControls(xRubySel.is());
if(xRubySel.is())
{
Reference< XModel > xModel = pImpl->GetModel();
const String sCharStyleSelect = aCharStyleLB.GetSelectEntry();
ClearCharStyleList();
Reference<XStyleFamiliesSupplier> xSupplier(xModel, UNO_QUERY);
if(xSupplier.is())
{
try
{
Reference<XNameAccess> xFam = xSupplier->getStyleFamilies();
Any aChar = xFam->getByName(C2U(cCharacterStyles));
Reference<XNameContainer> xChar;
aChar >>= xChar;
Reference<XIndexAccess> xCharIdx(xChar, UNO_QUERY);
if(xCharIdx.is())
{
OUString sUIName(C2U(cDisplayName));
for(sal_Int32 nStyle = 0; nStyle < xCharIdx->getCount(); nStyle++)
{
Any aStyle = xCharIdx->getByIndex(nStyle);
Reference<XStyle> xStyle;
aStyle >>= xStyle;
Reference<XPropertySet> xPrSet(xStyle, UNO_QUERY);
OUString sName, sCoreName;
if(xPrSet.is())
{
Reference<XPropertySetInfo> xInfo = xPrSet->getPropertySetInfo();
if(xInfo->hasPropertyByName(sUIName))
{
Any aName = xPrSet->getPropertyValue(sUIName);
aName >>= sName;
}
}
Reference<XNamed> xNamed(xStyle, UNO_QUERY);
if(xNamed.is())
{
sCoreName = xNamed->getName();
if(!sName.getLength())
sName = sCoreName;
}
if(sName.getLength())
{
sal_uInt16 nPos = aCharStyleLB.InsertEntry(sName);
aCharStyleLB.SetEntryData( nPos, new OUString(sCoreName) );
}
}
}
}
catch(Exception&)
{
DBG_ERROR("exception in style access");
}
if(sCharStyleSelect.Len())
aCharStyleLB.SelectEntry(sCharStyleSelect);
}
aCharStyleLB.Enable(xSupplier.is());
aCharStyleFT.Enable(xSupplier.is());
}
Update();
aPreviewWin.Invalidate();
}
}
/* -----------------------------29.01.01 15:26--------------------------------
---------------------------------------------------------------------------*/
void SvxRubyDialog::Deactivate()
{
SfxModelessDialog::Deactivate();
}
/* -----------------------------30.01.01 15:35--------------------------------
---------------------------------------------------------------------------*/
void SvxRubyDialog::SetText(sal_Int32 nPos, Edit& rLeft, Edit& rRight)
{
OUString sLeft, sRight;
const Sequence<PropertyValues>& aRubyValues = pImpl->GetRubyValues();
sal_Bool bEnable = aRubyValues.getLength() > nPos;
if(bEnable)
{
const Sequence<PropertyValue> aProps = aRubyValues.getConstArray()[nPos];
const PropertyValue* pProps = aProps.getConstArray();
for(sal_Int32 nProp = 0; nProp < aProps.getLength(); nProp++)
{
if(pProps[nProp].Name.equalsAsciiL(RTL_CONSTASCII_STRINGPARAM(cRubyBaseText)))
pProps[nProp].Value >>= sLeft;
else if(pProps[nProp].Name.equalsAsciiL(RTL_CONSTASCII_STRINGPARAM(cRubyText)))
pProps[nProp].Value >>= sRight;
}
}
else if(!nPos)
bEnable = sal_True;
rLeft.Enable(bEnable);
rRight.Enable(bEnable);
rLeft.SetText(sLeft);
rRight.SetText(sRight);
rLeft.SaveValue();
rRight.SaveValue();
}
//-----------------------------------------------------------------------------
void SvxRubyDialog::GetText()
{
long nTempLastPos = GetLastPos();
for(int i = 0; i < 8; i+=2)
{
if(aEditArr[i]->IsEnabled() &&
(aEditArr[i]->GetText() != aEditArr[i]->GetSavedValue() ||
aEditArr[i + 1]->GetText() != aEditArr[i + 1]->GetSavedValue()))
{
Sequence<PropertyValues>& aRubyValues = pImpl->GetRubyValues();
DBG_ASSERT(aRubyValues.getLength() > (i / 2 + nTempLastPos), "wrong index" );
SetModified(sal_True);
Sequence<PropertyValue> &rProps = aRubyValues.getArray()[i / 2 + nTempLastPos];
PropertyValue* pProps = rProps.getArray();
for(sal_Int32 nProp = 0; nProp < rProps.getLength(); nProp++)
{
if(pProps[nProp].Name.equalsAsciiL(RTL_CONSTASCII_STRINGPARAM(cRubyBaseText)))
pProps[nProp].Value <<= OUString(aEditArr[i]->GetText());
else if(pProps[nProp].Name.equalsAsciiL(RTL_CONSTASCII_STRINGPARAM(cRubyText)))
pProps[nProp].Value <<= OUString(aEditArr[i + 1]->GetText());
}
}
}
}
//-----------------------------------------------------------------------------
void SvxRubyDialog::Update()
{
const Sequence<PropertyValues>& aRubyValues = pImpl->GetRubyValues();
sal_Int32 nLen = aRubyValues.getLength();
aScrollSB.Enable(nLen > 4);
aScrollSB.SetRange( Range(0, nLen > 4 ? nLen - 4 : 0));
aScrollSB.SetThumbPos(0);
SetLastPos(0);
SetModified(sal_False);
sal_Int16 nAdjust = -1;
sal_Int16 nPosition = -1;
OUString sCharStyleName, sTmp;
sal_Bool bCharStyleEqual = sal_True;
for(sal_Int32 nRuby = 0; nRuby < nLen; nRuby++)
{
const Sequence<PropertyValue> &rProps = aRubyValues.getConstArray()[nRuby];
const PropertyValue* pProps = rProps.getConstArray();
for(sal_Int32 nProp = 0; nProp < rProps.getLength(); nProp++)
{
if(nAdjust > -2 &&
pProps[nProp].Name.equalsAsciiL(RTL_CONSTASCII_STRINGPARAM(cRubyAdjust)))
{
sal_Int16 nTmp = sal_Int16();
pProps[nProp].Value >>= nTmp;
if(!nRuby)
nAdjust = nTmp;
else if(nAdjust != nTmp)
nAdjust = -2;
}
if(nPosition > -2 &&
pProps[nProp].Name.equalsAsciiL(RTL_CONSTASCII_STRINGPARAM(cRubyIsAbove)))
{
sal_Bool bTmp = *(sal_Bool*)pProps[nProp].Value.getValue();
if(!nRuby)
nPosition = bTmp ? 0 : 1;
else if( (!nPosition && !bTmp) || (nPosition == 1 && bTmp) )
nPosition = -2;
}
if(bCharStyleEqual &&
pProps[nProp].Name.equalsAsciiL(RTL_CONSTASCII_STRINGPARAM(cRubyCharStyleName)))
{
pProps[nProp].Value >>= sTmp;
if(!nRuby)
sCharStyleName = sTmp;
else if(sCharStyleName != sTmp)
bCharStyleEqual = sal_False;
}
}
}
if(!nLen)
{
//enable selection if the ruby list is empty
nAdjust = 0;
nPosition = 0;
}
if(nAdjust > -1)
aAdjustLB.SelectEntryPos(nAdjust);
else
aAdjustLB.SetNoSelection();
if(nPosition > -1)
aPositionLB.SelectEntryPos(nPosition ? 1 : 0);
if(!nLen || (bCharStyleEqual && !sCharStyleName.getLength()))
sCharStyleName = C2U(cRubies);
if(sCharStyleName.getLength())
{
for(sal_uInt16 i = 0; i < aCharStyleLB.GetEntryCount(); i++)
{
const OUString* pCoreName = (const OUString*)aCharStyleLB.GetEntryData(i);
if(pCoreName && sCharStyleName == *pCoreName)
{
aCharStyleLB.SelectEntryPos(i);
break;
}
}
}
else
aCharStyleLB.SetNoSelection();
ScrollHdl_Impl(&aScrollSB);
}
/* -----------------------------16.02.01 14:01--------------------------------
---------------------------------------------------------------------------*/
void SvxRubyDialog::GetCurrentText(String& rBase, String& rRuby)
{
rBase = aEditArr[nCurrentEdit * 2]->GetText();
rRuby = aEditArr[nCurrentEdit * 2 + 1]->GetText();
}
/* -----------------------------31.01.01 14:09--------------------------------
---------------------------------------------------------------------------*/
IMPL_LINK(SvxRubyDialog, ScrollHdl_Impl, ScrollBar*, pScroll)
{
long nPos = pScroll->GetThumbPos();
if(GetLastPos() != nPos)
{
GetText();
}
SetText(nPos++, aLeft1ED, aRight1ED);
SetText(nPos++, aLeft2ED, aRight2ED);
SetText(nPos++, aLeft3ED, aRight3ED);
SetText(nPos, aLeft4ED, aRight4ED);
SetLastPos(nPos - 3);
aPreviewWin.Invalidate();
return 0;
}
/* -----------------------------30.01.01 14:48--------------------------------
---------------------------------------------------------------------------*/
IMPL_LINK(SvxRubyDialog, ApplyHdl_Impl, PushButton*, EMPTYARG)
{
const Sequence<PropertyValues>& aRubyValues = pImpl->GetRubyValues();
if(!aRubyValues.getLength())
{
AssertOneEntry();
PositionHdl_Impl(&aPositionLB);
AdjustHdl_Impl(&aAdjustLB);
CharStyleHdl_Impl(&aCharStyleLB);
}
GetText();
//reset all edit fields - SaveValue is called
ScrollHdl_Impl(&aScrollSB);
Reference<XRubySelection> xSelection = pImpl->GetRubySelection();
if(IsModified() && xSelection.is())
{
try
{
xSelection->setRubyList(aRubyValues, aAutoDetectionCB.IsChecked());
}
catch(Exception& )
{
DBG_ERROR("Exception caught");
}
}
return 0;
}
/* -----------------------------29.01.01 09:38--------------------------------
---------------------------------------------------------------------------*/
IMPL_LINK(SvxRubyDialog, CloseHdl_Impl, PushButton*, EMPTYARG)
{
Close();
return 0;
}
/* -----------------------------29.01.01 15:10--------------------------------
---------------------------------------------------------------------------*/
IMPL_LINK(SvxRubyDialog, StylistHdl_Impl, PushButton*, EMPTYARG)
{
SfxPoolItem* pState = 0;
SfxItemState eState = pBindings->QueryState( SID_STYLE_DESIGNER, pState );
if(eState <= SFX_ITEM_SET || !pState || !((SfxBoolItem*)pState)->GetValue())
{
pBindings->GetDispatcher()->Execute( SID_STYLE_DESIGNER,
SFX_CALLMODE_ASYNCHRON |
SFX_CALLMODE_RECORD);
}
return 0;
}
/* -----------------------------30.01.01 15:32--------------------------------
---------------------------------------------------------------------------*/
IMPL_LINK(SvxRubyDialog, AutomaticHdl_Impl, CheckBox*, pBox)
{
pImpl->UpdateRubyValues(pBox->IsChecked());
Update();
return 0;
}
/* -----------------------------31.01.01 16:37--------------------------------
---------------------------------------------------------------------------*/
IMPL_LINK(SvxRubyDialog, AdjustHdl_Impl, ListBox*, pBox)
{
AssertOneEntry();
sal_Int16 nAdjust = pBox->GetSelectEntryPos();
Sequence<PropertyValues>& aRubyValues = pImpl->GetRubyValues();
for(sal_Int32 nRuby = 0; nRuby < aRubyValues.getLength(); nRuby++)
{
Sequence<PropertyValue> &rProps = aRubyValues.getArray()[nRuby];
PropertyValue* pProps = rProps.getArray();
for(sal_Int32 nProp = 0; nProp < rProps.getLength(); nProp++)
{
if(pProps[nProp].Name.equalsAsciiL(RTL_CONSTASCII_STRINGPARAM(cRubyAdjust)))
pProps[nProp].Value <<= nAdjust;
}
SetModified(sal_True);
}
aPreviewWin.Invalidate();
return 0;
}
/* -----------------------------01.06.01 10:24--------------------------------
---------------------------------------------------------------------------*/
IMPL_LINK(SvxRubyDialog, PositionHdl_Impl, ListBox*, pBox)
{
AssertOneEntry();
sal_Bool bAbove = !pBox->GetSelectEntryPos();
const Type& rType = ::getBooleanCppuType();
Sequence<PropertyValues>& aRubyValues = pImpl->GetRubyValues();
for(sal_Int32 nRuby = 0; nRuby < aRubyValues.getLength(); nRuby++)
{
Sequence<PropertyValue> &rProps = aRubyValues.getArray()[nRuby];
PropertyValue* pProps = rProps.getArray();
for(sal_Int32 nProp = 0; nProp < rProps.getLength(); nProp++)
{
if(pProps[nProp].Name.equalsAsciiL(RTL_CONSTASCII_STRINGPARAM(cRubyIsAbove)))
pProps[nProp].Value.setValue(&bAbove, rType);
}
SetModified(sal_True);
}
aPreviewWin.Invalidate();
return 0;
}
/* -----------------------------01.02.01 10:06--------------------------------
---------------------------------------------------------------------------*/
IMPL_LINK(SvxRubyDialog, CharStyleHdl_Impl, ListBox*, EMPTYARG )
{
AssertOneEntry();
OUString sStyleName;
if(LISTBOX_ENTRY_NOTFOUND != aCharStyleLB.GetSelectEntryPos())
sStyleName = *(OUString*) aCharStyleLB.GetEntryData(aCharStyleLB.GetSelectEntryPos());
Sequence<PropertyValues>& aRubyValues = pImpl->GetRubyValues();
for(sal_Int32 nRuby = 0; nRuby < aRubyValues.getLength(); nRuby++)
{
Sequence<PropertyValue> &rProps = aRubyValues.getArray()[nRuby];
PropertyValue* pProps = rProps.getArray();
for(sal_Int32 nProp = 0; nProp < rProps.getLength(); nProp++)
{
if(pProps[nProp].Name.equalsAsciiL(RTL_CONSTASCII_STRINGPARAM(cRubyCharStyleName)))
{
pProps[nProp].Value <<= sStyleName;
}
}
SetModified(sal_True);
}
return 0;
}
/* -----------------------------16.02.01 08:35--------------------------------
---------------------------------------------------------------------------*/
IMPL_LINK(SvxRubyDialog, EditModifyHdl_Impl, Edit*, pEdit)
{
for(sal_uInt16 i = 0; i < 8; i++)
{
if(pEdit == aEditArr[i])
{
nCurrentEdit = i / 2;
break;
}
}
aPreviewWin.Invalidate();
return 0;
}
/* -----------------------------17.07.01 09:11--------------------------------
---------------------------------------------------------------------------*/
IMPL_LINK(SvxRubyDialog, EditScrollHdl_Impl, sal_Int32*, pParam)
{
long nRet = 0;
if(aScrollSB.IsEnabled())
{
//scroll forward
if(*pParam > 0 && (aEditArr[7]->HasFocus() || aEditArr[6]->HasFocus() ))
{
if(aScrollSB.GetRangeMax() > aScrollSB.GetThumbPos())
{
aScrollSB.SetThumbPos(aScrollSB.GetThumbPos() + 1);
aEditArr[6]->GrabFocus();
nRet = 1;
}
}
//scroll backward
else if(aScrollSB.GetThumbPos() && (aEditArr[0]->HasFocus()||aEditArr[1]->HasFocus()) )
{
aScrollSB.SetThumbPos(aScrollSB.GetThumbPos() - 1);
aEditArr[1]->GrabFocus();
nRet = 1;
}
if(nRet)
ScrollHdl_Impl(&aScrollSB);
}
return nRet;
}
/* -----------------------------20.07.2001 15:18------------------------------
---------------------------------------------------------------------------*/
IMPL_LINK(SvxRubyDialog, EditJumpHdl_Impl, sal_Int32*, pParam)
{
sal_uInt16 nIndex = USHRT_MAX;
for(sal_uInt16 i = 0; i < 8; i++)
{
if(aEditArr[i]->HasFocus())
nIndex = i;
}
if(nIndex < 8)
{
if(*pParam > 0)
{
if(nIndex < 6)
aEditArr[nIndex + 2]->GrabFocus();
else if( EditScrollHdl_Impl(pParam))
aEditArr[nIndex]->GrabFocus();
}
else
{
if(nIndex > 1)
aEditArr[nIndex - 2]->GrabFocus();
else if( EditScrollHdl_Impl(pParam))
aEditArr[nIndex]->GrabFocus();
}
}
return 0;
};
/* -----------------------------19.06.01 11:33--------------------------------
---------------------------------------------------------------------------*/
void SvxRubyDialog::AssertOneEntry()
{
pImpl->AssertOneEntry();
}
// ----------------------------------------------------------------------------
void SvxRubyDialog::UpdateColors( void )
{
const StyleSettings& rStyleSettings = GetSettings().GetStyleSettings();
svtools::ColorConfig aColorConfig;
Font aFnt( aPreviewWin.GetFont() );
Color aNewTextCol( aColorConfig.GetColorValue( svtools::FONTCOLOR ).nColor );
Color aNewFillCol( rStyleSettings.GetWindowColor() );
if( aNewFillCol != aFnt.GetFillColor() || aNewTextCol != aFnt.GetColor() )
{
aFnt.SetFillColor( aNewFillCol );
aFnt.SetColor( aNewTextCol );
aPreviewWin.SetFont( aFnt );
aPreviewWin.Invalidate();
}
}
// ----------------------------------------------------------------------------
void SvxRubyDialog::DataChanged( const DataChangedEvent& rDCEvt )
{
SfxModelessDialog::DataChanged( rDCEvt );
if( ( rDCEvt.GetType() == DATACHANGED_SETTINGS ) && ( rDCEvt.GetFlags() & SETTINGS_STYLE ) )
UpdateColors();
}
/* -----------------------------29.01.01 15:44--------------------------------
---------------------------------------------------------------------------*/
void lcl_MoveBox(long nOffset, Edit& rLeft, Edit& rRight)
{
Size aLeftSz(rLeft.GetSizePixel());
Point aRightPos(rRight.GetPosPixel());
Size aRightSz(rRight.GetSizePixel());
aLeftSz.Width() += nOffset;
aRightSz.Width() -= nOffset;
aRightPos.X() += nOffset;
rLeft.SetSizePixel(aLeftSz);
rRight.SetPosSizePixel(aRightPos, aRightSz);
}
/* -----------------------------16.02.01 08:09--------------------------------
---------------------------------------------------------------------------*/
RubyPreview::RubyPreview(SvxRubyDialog& rParent, const ResId& rResId) :
Window(&rParent, rResId),
rParentDlg(rParent)
{
SetMapMode(MAP_TWIP);
Size aWinSize = GetOutputSize();
Font aFont = GetFont();
aFont.SetHeight(aWinSize.Height() / 4);
SetFont(aFont);
SetBorderStyle( WINDOW_BORDER_MONO );
}
/* -----------------------------29.01.01 14:05--------------------------------
---------------------------------------------------------------------------*/
void RubyPreview::Paint( const Rectangle& /* rRect */ )
{
Font aRubyFont = GetFont();
Font aSaveFont(aRubyFont);
aRubyFont.SetHeight(aRubyFont.GetHeight() * 70 / 100);
Size aWinSize = GetOutputSize();
Rectangle aRect(Point(0, 0), aWinSize);
SetLineColor();
SetFillColor( aSaveFont.GetFillColor() );
DrawRect(aRect);
String sBaseText, sRubyText;
rParentDlg.GetCurrentText(sBaseText, sRubyText);
long nTextHeight = GetTextHeight();
long nBaseWidth = GetTextWidth(sBaseText);
SetFont(aRubyFont);
long nRubyWidth = GetTextWidth(sRubyText);
SetFont(aSaveFont);
sal_uInt16 nAdjust = rParentDlg.aAdjustLB.GetSelectEntryPos();
//use center if no adjustment is available
if(nAdjust > 4)
nAdjust = 1;
//which part is stretched ?
sal_Bool bRubyStretch = nBaseWidth >= nRubyWidth;
long nCenter = aWinSize.Width() / 2;
long nLeftStart = nCenter - (bRubyStretch ? (nBaseWidth / 2) : (nRubyWidth / 2));
long nRightEnd = nCenter + (bRubyStretch ? (nBaseWidth / 2) : (nRubyWidth / 2));
long nYRuby = aWinSize.Height() / 4 - nTextHeight / 2;
long nYBase = aWinSize.Height() * 3 / 4 - nTextHeight / 2;
//use above also if no selection is set
sal_Bool bAbove = rParentDlg.aPositionLB.GetSelectEntryPos() != 1;
if(!bAbove)
{
long nTmp = nYRuby;
nYRuby = nYBase;
nYBase = nTmp;
}
long nYOutput, nOutTextWidth;
String sOutputText;
if(bRubyStretch)
{
DrawText( Point( nLeftStart , nYBase), sBaseText );
nYOutput = nYRuby;
sOutputText = sRubyText;
nOutTextWidth = nRubyWidth;
SetFont(aRubyFont);
}
else
{
SetFont(aRubyFont);
DrawText( Point( nLeftStart , nYRuby), sRubyText );
nYOutput = nYBase;
sOutputText = sBaseText;
nOutTextWidth = nBaseWidth;
SetFont(aSaveFont);
}
switch(nAdjust)
{
case RubyAdjust_LEFT:
DrawText( Point( nLeftStart , nYOutput), sOutputText );
break;
case RubyAdjust_RIGHT:
DrawText( Point( nRightEnd - nOutTextWidth, nYOutput), sOutputText );
break;
case RubyAdjust_INDENT_BLOCK:
{
long nCharWidth = GetTextWidth(String::CreateFromAscii("X"));
if(nOutTextWidth < (nRightEnd - nLeftStart - nCharWidth))
{
nCharWidth /= 2;
nLeftStart += nCharWidth;
nRightEnd -= nCharWidth;
}
}
// no break!
case RubyAdjust_BLOCK:
if(sOutputText.Len() > 1)
{
xub_StrLen nCount = sOutputText.Len();
long nSpace = ((nRightEnd - nLeftStart) - GetTextWidth(sOutputText)) / (nCount - 1);
for(xub_StrLen i = 0; i < nCount; i++)
{
sal_Unicode cChar = sOutputText.GetChar(i);
DrawText( Point( nLeftStart , nYOutput), cChar);
long nCharWidth = GetTextWidth(cChar);
nLeftStart += nCharWidth + nSpace;
}
break;
}
//no break;
case RubyAdjust_CENTER:
DrawText( Point( nCenter - nOutTextWidth / 2 , nYOutput), sOutputText );
break;
}
SetFont(aSaveFont);
}
/* -----------------------------16.02.01 15:12--------------------------------
---------------------------------------------------------------------------*/
void RubyEdit::GetFocus()
{
GetModifyHdl().Call(this);
Edit::GetFocus();
}
/* -----------------------------17.07.01 09:00--------------------------------
---------------------------------------------------------------------------*/
long RubyEdit::PreNotify( NotifyEvent& rNEvt )
{
long nHandled = 0;
if ( rNEvt.GetType() == EVENT_KEYINPUT )
{
const KeyEvent* pKEvt = rNEvt.GetKeyEvent();
const KeyCode& rKeyCode = pKEvt->GetKeyCode();
sal_uInt16 nMod = rKeyCode.GetModifier();
sal_uInt16 nCode = rKeyCode.GetCode();
if( nCode == KEY_TAB && (!nMod || KEY_SHIFT == nMod))
{
sal_Int32 nParam = KEY_SHIFT == nMod ? -1 : 1;
if(aScrollHdl.IsSet() && aScrollHdl.Call(&nParam))
nHandled = 1;
}
else if(KEY_UP == nCode || KEY_DOWN == nCode)
{
sal_Int32 nParam = KEY_UP == nCode ? -1 : 1;
aJumpHdl.Call(&nParam);
}
}
if(!nHandled)
nHandled = Edit::PreNotify(rNEvt);
return nHandled;
}