20#include <com/sun/star/beans/XPropertySet.hpp>
21#include <com/sun/star/uno/XComponentContext.hpp>
22#include <com/sun/star/awt/XVclContainerPeer.hpp>
23#include <com/sun/star/lang/IllegalArgumentException.hpp>
54 Sequence< Reference< XControl > >& rControls,
55 const Sequence< Reference< XControlModel > >& rModels,
56 Sequence< Reference< XWindow > >& rComponents,
57 Sequence< Any>* pTabStops,
61 sal_Int32 nModels = rModels.getLength();
62 if (nModels != rControls.getLength())
64 Sequence< Reference< XControl > >
aSeq( nModels );
65 auto aSeqRange = asNonConstRange(
aSeq);
66 Reference< XControl > xCurrentControl;
68 sal_Int32 nRealControls = 0;
69 for (
const Reference< XControlModel >& rModel : rModels)
72 if (xCurrentControl.is())
73 aSeqRange[nRealControls++] = xCurrentControl;
75 aSeq.realloc(nRealControls);
80 assert(rControls.getLength() <= rModels.getLength());
82 sal_Int32 nCtrls = rControls.getLength();
83 rComponents.realloc( nCtrls );
84 Reference< XWindow > * pComps = rComponents.getArray();
90 *pTabStops = Sequence< Any>( nCtrls );
91 pTabs = pTabStops->getArray();
95 for (
const Reference< XControl >& xCtrl : std::as_const(rControls) )
100 SAL_WARN(
"toolkit",
"Control not found" );
106 pComps->set(xCtrl->getPeer(), UNO_QUERY);
108 pComps->set(xCtrl, UNO_QUERY);
114 static constexpr OUStringLiteral aTabStopName =
u"Tabstop";
116 Reference< XPropertySet > xPSet( xCtrl->getModel(), UNO_QUERY );
117 Reference< XPropertySetInfo > xInfo = xPSet->getPropertySetInfo();
118 if( xInfo->hasPropertyByName( aTabStopName ) )
119 *pTabs++ = xPSet->getPropertyValue( aTabStopName );
133 const Reference< XControl > * pControls = aCtrls.getConstArray();
134 sal_uInt32
nCount = aCtrls.getLength();
136 for ( sal_uInt32
n = bFirst ? 0 :
nCount; bFirst ?
n <
nCount :
n != 0; )
138 sal_uInt32 nCtrl = bFirst ?
n++ : --
n;
139 DBG_ASSERT( pControls[nCtrl].is(),
"Control not in Container!" );
140 if ( pControls[nCtrl].is() )
142 Reference< XWindowPeer > xCP = pControls[nCtrl]->getPeer();
159 Any aRet = ::cppu::queryInterface( rType,
160 static_cast< XTabController*
>(
this),
161 static_cast< XServiceInfo*
>(
this),
162 static_cast< XTypeProvider*
>(
this) );
163 return (aRet.hasValue() ? aRet : OWeakAggObject::queryAggregation( rType ));
171 static const css::uno::Sequence< css::uno::Type > aTypeList {
181 ::osl::Guard< ::osl::Mutex > aGuard(
GetMutex() );
188 ::osl::Guard< ::osl::Mutex > aGuard(
GetMutex() );
195 ::osl::Guard< ::osl::Mutex > aGuard(
GetMutex() );
202 ::osl::Guard< ::osl::Mutex > aGuard(
GetMutex() );
209 ::osl::Guard< ::osl::Mutex > aGuard(
GetMutex() );
211 Sequence< Reference< XControl > >
aSeq;
215 const Sequence< Reference< XControlModel > > aModels =
mxModel->getControlModels();
219 sal_Int32 nCtrls = aModels.getLength();
220 aSeq = Sequence< Reference< XControl > >( nCtrls );
221 std::transform(aModels.begin(), aModels.end(),
aSeq.getArray(),
222 [&xCtrls](
const Reference< XControlModel >& xCtrlModel) -> Reference< XControl > {
223 return FindControl( xCtrls, xCtrlModel ); });
232 css::awt::XWindow* pComponent;
240 ::osl::Guard< ::osl::Mutex > aGuard(
GetMutex() );
246 Sequence< Reference< XControlModel > >
aSeq =
mxModel->getControlModels();
247 Sequence< Reference< XWindow > > aCompSeq;
250 Sequence< Reference< XControl > > aControls =
getControls();
257 sal_uInt32 nCtrls = aCompSeq.getLength();
260 std::vector< ComponentEntry > aCtrls;
261 aCtrls.reserve(nCtrls);
262 for (
const Reference< XWindow >& rComponent : std::as_const(aCompSeq) )
264 XWindow* pC = rComponent.get();
265 ComponentEntry newEntry;
266 newEntry.pComponent = pC;
267 awt::Rectangle aPosSize = pC->getPosSize();
268 newEntry.aPos.setX( aPosSize.X );
269 newEntry.aPos.setY( aPosSize.Y );
271 decltype(aCtrls)::size_type
nPos;
274 ComponentEntry& rEntry = aCtrls[
nPos ];
275 if ( ( rEntry.aPos.Y() > newEntry.aPos.Y() ) ||
276 ( ( rEntry.aPos.Y() == newEntry.aPos.Y() ) && ( rEntry.aPos.X() > newEntry.aPos.X() ) ) )
279 if (
nPos < aCtrls.size() ) {
280 aCtrls.insert( aCtrls.begin() +
nPos, newEntry );
282 aCtrls.push_back( newEntry );
286 Sequence< Reference< XControlModel > > aNewSeq( nCtrls );
287 std::transform(aCtrls.begin(), aCtrls.end(), aNewSeq.getArray(),
288 [](
const ComponentEntry& rEntry) -> Reference< XControlModel > {
289 Reference< XControl > xUC( rEntry.pComponent, UNO_QUERY );
290 return xUC->getModel();
293 mxModel->setControlModels( aNewSeq );
298 ::osl::Guard< ::osl::Mutex > aGuard(
GetMutex() );
303 Reference< XVclContainerPeer > xVclContainerPeer;
305 xVclContainerPeer.set(xC->getPeer(), css::uno::UNO_QUERY);
306 if ( !xC.is() || !xVclContainerPeer.is() )
311 Reference<XTabController> xTabController(
static_cast<XTabController*
>(
this), UNO_QUERY );
314 Sequence< Reference< XControlModel > > aModels =
mxModel->getControlModels();
315 Sequence< Reference< XWindow > > aCompSeq;
316 Sequence< Any> aTabSeq;
321 Sequence< Reference< XControl > > aControls = xTabController->getControls();
328 xVclContainerPeer->setTabOrder( aCompSeq, aTabSeq,
mxModel->getGroupControl() );
331 Sequence< Reference< XControlModel > > aThisGroupModels;
332 Sequence< Reference< XWindow > > aControlComponents;
334 sal_uInt32 nGroups =
mxModel->getGroupCount();
335 for ( sal_uInt32 nG = 0; nG < nGroups; nG++ )
339 aControls = xTabController->getControls();
345 aControlComponents.realloc( 0 );
348 xVclContainerPeer->setGroup( aControlComponents );
355 ::osl::Guard< ::osl::Mutex > aGuard(
GetMutex() );
363 ::osl::Guard< ::osl::Mutex > aGuard(
GetMutex() );
370 return "stardiv.Toolkit.StdTabController";
380 return css::uno::Sequence<OUString>{
381 "com.sun.star.awt.TabController",
382 "stardiv.vcl.control.TabController"};
386 const Reference< XControlModel > & rxCtrlModel )
388 if (!rxCtrlModel.is())
389 throw lang::IllegalArgumentException(
"No valid XControlModel",
390 uno::Reference<uno::XInterface>(), 0);
392 auto pCtrl = std::find_if(std::cbegin(rCtrls), std::cend(rCtrls),
393 [&rxCtrlModel](
const Reference< XControl >& rCtrl) {
394 Reference< XControlModel >
xModel(rCtrl.is() ? rCtrl->getModel() : Reference< XControlModel > ());
395 return xModel.get() == rxCtrlModel.get();
397 if (pCtrl != std::cend(rCtrls))
399 auto n =
static_cast<sal_Int32
>(std::distance(std::cbegin(rCtrls), pCtrl));
400 Reference< XControl > xCtrl( *pCtrl );
401 ::comphelper::removeElementAt( rCtrls,
n );
404 return Reference< XControl > ();
407extern "C" SAL_DLLPUBLIC_EXPORT css::uno::XInterface *
409 css::uno::XComponentContext *,
410 css::uno::Sequence<css::uno::Any>
const &)
css::uno::Sequence< css::uno::Reference< css::awt::XControl > > SAL_CALL getControls() override
OUString SAL_CALL getImplementationName() override
css::uno::Any SAL_CALL queryAggregation(const css::uno::Type &rType) override
void SAL_CALL activateFirst() override
css::uno::Reference< css::awt::XTabControllerModel > mxModel
css::uno::Reference< css::awt::XTabControllerModel > SAL_CALL getModel() override
css::uno::Sequence< OUString > SAL_CALL getSupportedServiceNames() override
static css::uno::Reference< css::awt::XControl > FindControl(css::uno::Sequence< css::uno::Reference< css::awt::XControl > > &rCtrls, const css::uno::Reference< css::awt::XControlModel > &rxCtrlModel)
css::uno::Reference< css::awt::XControlContainer > mxControlContainer
void ImplActivateControl(bool bFirst) const
void SAL_CALL autoTabOrder() override
void SAL_CALL activateTabOrder() override
::osl::Mutex & GetMutex()
virtual ~StdTabController() override
static bool ImplCreateComponentSequence(css::uno::Sequence< css::uno::Reference< css::awt::XControl > > &rControls, const css::uno::Sequence< css::uno::Reference< css::awt::XControlModel > > &rModels, css::uno::Sequence< css::uno::Reference< css::awt::XWindow > > &rComponents, css::uno::Sequence< css::uno::Any > *pTabStops, bool bPeerComponent)
sal_Bool SAL_CALL supportsService(OUString const &ServiceName) override
css::uno::Reference< css::awt::XControlContainer > SAL_CALL getContainer() override
void SAL_CALL activateLast() override
void SAL_CALL setContainer(const css::uno::Reference< css::awt::XControlContainer > &Container) override
void SAL_CALL setModel(const css::uno::Reference< css::awt::XTabControllerModel > &Model) override
vcl::Window * GetWindow() const
css::uno::Type const & get()
#define DBG_ASSERT(sCon, aError)
Sequence< sal_Int8 > aSeq
#define SAL_WARN(area, stream)
#define IMPL_IMPLEMENTATION_ID(ClassName)
bool CPPUHELPER_DLLPUBLIC supportsService(css::lang::XServiceInfo *implementation, rtl::OUString const &name)
SAL_DLLPUBLIC_EXPORT css::uno::XInterface * stardiv_Toolkit_StdTabController_get_implementation(css::uno::XComponentContext *, css::uno::Sequence< css::uno::Any > const &)
Reference< XModel > xModel