LCOV - code coverage report
Current view: top level - sdext/source/minimizer - unodialog.cxx (source / functions) Hit Total Coverage
Test: commit c8344322a7af75b84dd3ca8f78b05543a976dfd5 Lines: 0 126 0.0 %
Date: 2015-06-13 12:38:46 Functions: 0 19 0.0 %
Legend: Lines: hit not hit

          Line data    Source code
       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             : 
      21             : #include "unodialog.hxx"
      22             : #include <com/sun/star/awt/MessageBoxButtons.hpp>
      23             : #include <com/sun/star/awt/Toolkit.hpp>
      24             : #include <com/sun/star/awt/UnoControlDialog.hpp>
      25             : #include <com/sun/star/awt/XMessageBoxFactory.hpp>
      26             : #include <com/sun/star/container/XIndexAccess.hpp>
      27             : #include <com/sun/star/drawing/XShapes.hpp>
      28             : #include <com/sun/star/frame/XDispatch.hpp>
      29             : #include <com/sun/star/text/XTextRange.hpp>
      30             : #include <com/sun/star/view/XSelectionSupplier.hpp>
      31             : #include <com/sun/star/view/XControlAccess.hpp>
      32             : 
      33             : 
      34             : // - UnoDialog -
      35             : 
      36             : 
      37             : using namespace ::com::sun::star::awt;
      38             : using namespace ::com::sun::star::uno;
      39             : using namespace ::com::sun::star::util;
      40             : using namespace ::com::sun::star::lang;
      41             : using namespace ::com::sun::star::view;
      42             : using namespace ::com::sun::star::frame;
      43             : using namespace ::com::sun::star::beans;
      44             : using namespace ::com::sun::star::script;
      45             : 
      46           0 : UnoDialog::UnoDialog( const Reference< XComponentContext > &rxContext, Reference< XFrame >& rxFrame ) :
      47             :     mxContext( rxContext ),
      48           0 :     mxController( rxFrame->getController() ),
      49           0 :     mxDialogModel( mxContext->getServiceManager()->createInstanceWithContext( OUString(
      50           0 :         "com.sun.star.awt.UnoControlDialogModel" ), mxContext ), UNO_QUERY_THROW ),
      51             :     mxDialogModelMultiPropertySet( mxDialogModel, UNO_QUERY_THROW ),
      52             :     mxDialogModelPropertySet( mxDialogModel, UNO_QUERY_THROW ),
      53             :     mxDialogModelMSF( mxDialogModel, UNO_QUERY_THROW ),
      54             :     mxDialogModelNameContainer( mxDialogModel, UNO_QUERY_THROW ),
      55             :     mxDialogModelNameAccess( mxDialogModel, UNO_QUERY_THROW ),
      56             :     mxControlModel( mxDialogModel, UNO_QUERY_THROW ),
      57             :     mxDialog( UnoControlDialog::create(rxContext) ),
      58             :     mxControl( mxDialog, UNO_QUERY_THROW ),
      59           0 :     mbStatus( false )
      60             : {
      61           0 :     mxControl->setModel( mxControlModel );
      62             : 
      63           0 :     Reference< XFrame > xFrame( mxController->getFrame() );
      64           0 :     Reference< XWindow > xContainerWindow( xFrame->getContainerWindow() );
      65           0 :     mxWindowPeer = Reference< XWindowPeer >( xContainerWindow, UNO_QUERY_THROW );
      66           0 :     createWindowPeer( mxWindowPeer );
      67           0 : }
      68             : 
      69             : 
      70             : 
      71           0 : UnoDialog::~UnoDialog()
      72             : {
      73             : 
      74           0 : }
      75             : 
      76             : 
      77             : 
      78           0 : void UnoDialog::execute()
      79             : {
      80           0 :     mxDialog->setEnable( sal_True );
      81           0 :     mxDialog->setVisible( sal_True );
      82           0 :     mxDialog->execute();
      83           0 : }
      84             : 
      85           0 : void UnoDialog::endExecute( bool bStatus )
      86             : {
      87           0 :     mbStatus = bStatus;
      88           0 :     mxDialog->endExecute();
      89           0 : }
      90             : 
      91             : 
      92             : 
      93           0 : Reference< XWindowPeer > UnoDialog::createWindowPeer( Reference< XWindowPeer > xParentPeer )
      94             :     throw ( Exception )
      95             : {
      96           0 :     mxDialog->setVisible( sal_False );
      97           0 :     Reference< XToolkit > xToolkit( Toolkit::create( mxContext ), UNO_QUERY_THROW  );
      98           0 :     if ( !xParentPeer.is() )
      99           0 :         xParentPeer = xToolkit->getDesktopWindow();
     100           0 :     mxReschedule = Reference< XReschedule >( xToolkit, UNO_QUERY );
     101           0 :     mxDialog->createPeer( xToolkit, xParentPeer );
     102             : //  xWindowPeer = xControl.getPeer();
     103           0 :     return mxDialog->getPeer();
     104             : }
     105             : 
     106             : 
     107             : 
     108           0 : Reference< XInterface > UnoDialog::insertControlModel( const OUString& rServiceName, const OUString& rName,
     109             :                                                         const Sequence< OUString >& rPropertyNames, const Sequence< Any >& rPropertyValues )
     110             : {
     111           0 :     Reference< XInterface > xControlModel;
     112             :     try
     113             :     {
     114           0 :         xControlModel = mxDialogModelMSF->createInstance( rServiceName );
     115           0 :         Reference< XMultiPropertySet > xMultiPropSet( xControlModel, UNO_QUERY_THROW );
     116           0 :         xMultiPropSet->setPropertyValues( rPropertyNames, rPropertyValues );
     117           0 :         mxDialogModelNameContainer->insertByName( rName, Any( xControlModel ) );
     118             :     }
     119           0 :     catch( Exception& )
     120             :     {
     121             :     }
     122           0 :     return xControlModel;
     123             : }
     124             : 
     125             : 
     126             : 
     127           0 : void UnoDialog::setVisible( const OUString& rName, bool bVisible )
     128             : {
     129             :     try
     130             :     {
     131           0 :         Reference< XInterface > xControl( mxDialog->getControl( rName ), UNO_QUERY_THROW );
     132           0 :         Reference< XWindow > xWindow( xControl, UNO_QUERY_THROW );
     133           0 :         xWindow->setVisible( bVisible );
     134             :     }
     135           0 :     catch ( Exception& )
     136             :     {
     137             :     }
     138           0 : }
     139             : 
     140             : 
     141             : 
     142           0 : Reference< XButton > UnoDialog::insertButton( const OUString& rName, Reference< XActionListener > xActionListener,
     143             :             const Sequence< OUString >& rPropertyNames, const Sequence< Any >& rPropertyValues )
     144             : {
     145           0 :     Reference< XButton > xButton;
     146             :     try
     147             :     {
     148             :         Reference< XInterface > xButtonModel( insertControlModel( OUString( "com.sun.star.awt.UnoControlButtonModel" ),
     149           0 :             rName, rPropertyNames, rPropertyValues ) );
     150           0 :         Reference< XPropertySet > xPropertySet( xButtonModel, UNO_QUERY_THROW );
     151           0 :         xPropertySet->setPropertyValue("Name", Any( rName ) );
     152           0 :         xButton = Reference< XButton >( mxDialog->getControl( rName ), UNO_QUERY_THROW );
     153             : 
     154           0 :         if ( xActionListener.is() )
     155             :         {
     156           0 :             xButton->addActionListener( xActionListener );
     157           0 :             xButton->setActionCommand( rName );
     158             :         }
     159           0 :         return xButton;
     160             :     }
     161           0 :     catch( Exception& )
     162             :     {
     163             :     }
     164           0 :     return xButton;
     165             : }
     166             : 
     167             : 
     168             : 
     169           0 : Reference< XFixedText > UnoDialog::insertFixedText( const OUString& rName, const Sequence< OUString >& rPropertyNames, const Sequence< Any >& rPropertyValues )
     170             : {
     171           0 :     Reference< XFixedText > xFixedText;
     172             :     try
     173             :     {
     174             :         Reference< XPropertySet > xPropertySet( insertControlModel( OUString( "com.sun.star.awt.UnoControlFixedTextModel" ),
     175           0 :             rName, rPropertyNames, rPropertyValues ), UNO_QUERY_THROW );
     176           0 :         xPropertySet->setPropertyValue("Name", Any( rName ) );
     177           0 :         xFixedText = Reference< XFixedText >( mxDialog->getControl( rName ), UNO_QUERY_THROW );
     178             :     }
     179           0 :     catch ( Exception& )
     180             :     {
     181             :     }
     182           0 :     return xFixedText;
     183             : }
     184             : 
     185             : 
     186             : 
     187           0 : Reference< XCheckBox > UnoDialog::insertCheckBox( const OUString& rName, const Sequence< OUString >& rPropertyNames, const Sequence< Any >& rPropertyValues )
     188             : {
     189           0 :     Reference< XCheckBox > xCheckBox;
     190             :     try
     191             :     {
     192             :         Reference< XPropertySet > xPropertySet( insertControlModel( OUString( "com.sun.star.awt.UnoControlCheckBoxModel" ),
     193           0 :             rName, rPropertyNames, rPropertyValues ), UNO_QUERY_THROW );
     194           0 :         xPropertySet->setPropertyValue("Name", Any( rName ) );
     195           0 :         xCheckBox = Reference< XCheckBox >( mxDialog->getControl( rName ), UNO_QUERY_THROW );
     196             :     }
     197           0 :     catch ( Exception& )
     198             :     {
     199             :     }
     200           0 :     return xCheckBox;
     201             : }
     202             : 
     203             : 
     204             : 
     205           0 : Reference< XControl > UnoDialog::insertFormattedField( const OUString& rName, const Sequence< OUString >& rPropertyNames, const Sequence< Any >& rPropertyValues )
     206             : {
     207           0 :     Reference< XControl > xControl;
     208             :     try
     209             :     {
     210             :         Reference< XPropertySet > xPropertySet( insertControlModel( OUString( "com.sun.star.awt.UnoControlFormattedFieldModel" ),
     211           0 :             rName, rPropertyNames, rPropertyValues ), UNO_QUERY_THROW );
     212           0 :         xPropertySet->setPropertyValue("Name", Any( rName ) );
     213           0 :         xControl = Reference< XControl >( mxDialog->getControl( rName ), UNO_QUERY_THROW );
     214             :     }
     215           0 :     catch ( Exception& )
     216             :     {
     217             :     }
     218           0 :     return xControl;
     219             : }
     220             : 
     221             : 
     222             : 
     223           0 : Reference< XComboBox > UnoDialog::insertComboBox( const OUString& rName, const Sequence< OUString >& rPropertyNames, const Sequence< Any >& rPropertyValues )
     224             : {
     225           0 :     Reference< XComboBox > xControl;
     226             :     try
     227             :     {
     228             :         Reference< XPropertySet > xPropertySet( insertControlModel( OUString( "com.sun.star.awt.UnoControlComboBoxModel" ),
     229           0 :             rName, rPropertyNames, rPropertyValues ), UNO_QUERY_THROW );
     230           0 :         xPropertySet->setPropertyValue("Name", Any( rName ) );
     231           0 :         xControl = Reference< XComboBox >( mxDialog->getControl( rName ), UNO_QUERY_THROW );
     232             :     }
     233           0 :     catch ( Exception& )
     234             :     {
     235             :     }
     236           0 :     return xControl;
     237             : }
     238             : 
     239             : 
     240             : 
     241           0 : Reference< XRadioButton > UnoDialog::insertRadioButton( const OUString& rName, const Sequence< OUString >& rPropertyNames, const Sequence< Any >& rPropertyValues )
     242             : {
     243           0 :     Reference< XRadioButton > xControl;
     244             :     try
     245             :     {
     246             :         Reference< XPropertySet > xPropertySet( insertControlModel( OUString( "com.sun.star.awt.UnoControlRadioButtonModel" ),
     247           0 :             rName, rPropertyNames, rPropertyValues ), UNO_QUERY_THROW );
     248           0 :         xPropertySet->setPropertyValue("Name", Any( rName ) );
     249           0 :         xControl = Reference< XRadioButton >( mxDialog->getControl( rName ), UNO_QUERY_THROW );
     250             :     }
     251           0 :     catch ( Exception& )
     252             :     {
     253             :     }
     254           0 :     return xControl;
     255             : }
     256             : 
     257             : 
     258             : 
     259           0 : Reference< XListBox > UnoDialog::insertListBox( const OUString& rName, const Sequence< OUString >& rPropertyNames, const Sequence< Any >& rPropertyValues )
     260             : {
     261           0 :     Reference< XListBox > xControl;
     262             :     try
     263             :     {
     264             :         Reference< XPropertySet > xPropertySet( insertControlModel( OUString( "com.sun.star.awt.UnoControlListBoxModel" ),
     265           0 :             rName, rPropertyNames, rPropertyValues ), UNO_QUERY_THROW );
     266           0 :         xPropertySet->setPropertyValue("Name", Any( rName ) );
     267           0 :         xControl = Reference< XListBox >( mxDialog->getControl( rName ), UNO_QUERY_THROW );
     268             :     }
     269           0 :     catch ( Exception& )
     270             :     {
     271             :     }
     272           0 :     return xControl;
     273             : }
     274             : 
     275             : 
     276             : 
     277           0 : Reference< XControl > UnoDialog::insertImage( const OUString& rName, const Sequence< OUString >& rPropertyNames, const Sequence< Any >& rPropertyValues )
     278             : {
     279           0 :     Reference< XControl > xControl;
     280             :     try
     281             :     {
     282             :         Reference< XPropertySet > xPropertySet( insertControlModel( OUString( "com.sun.star.awt.UnoControlImageControlModel" ),
     283           0 :             rName, rPropertyNames, rPropertyValues ), UNO_QUERY_THROW );
     284           0 :         xPropertySet->setPropertyValue("Name", Any( rName ) );
     285           0 :         xControl = Reference< XControl >( mxDialog->getControl( rName ), UNO_QUERY_THROW );
     286             :     }
     287           0 :     catch ( Exception& )
     288             :     {
     289             :     }
     290           0 :     return xControl;
     291             : }
     292             : 
     293             : 
     294             : 
     295           0 : void UnoDialog::setControlProperty( const OUString& rControlName, const OUString& rPropertyName, const Any& rPropertyValue )
     296             : {
     297             :     try
     298             :     {
     299           0 :         if ( mxDialogModelNameAccess->hasByName( rControlName ) )
     300             :         {
     301           0 :             Reference< XPropertySet > xPropertySet( mxDialogModelNameAccess->getByName( rControlName ), UNO_QUERY_THROW );
     302           0 :             xPropertySet->setPropertyValue( rPropertyName, rPropertyValue );
     303             :         }
     304             :     }
     305           0 :     catch ( Exception& )
     306             :     {
     307             :     }
     308           0 : }
     309             : 
     310             : 
     311             : 
     312           0 : Any UnoDialog::getControlProperty( const OUString& rControlName, const OUString& rPropertyName )
     313             : {
     314           0 :     Any aRet;
     315             :     try
     316             :     {
     317           0 :         if ( mxDialogModelNameAccess->hasByName( rControlName ) )
     318             :         {
     319           0 :             Reference< XPropertySet > xPropertySet( mxDialogModelNameAccess->getByName( rControlName ), UNO_QUERY_THROW );
     320           0 :             aRet = xPropertySet->getPropertyValue( rPropertyName );
     321             :         }
     322             :     }
     323           0 :     catch ( Exception& )
     324             :     {
     325             :     }
     326           0 :     return aRet;
     327             : }
     328             : 
     329             : 
     330             : 
     331           0 : void UnoDialog::enableControl( const OUString& rControlName )
     332             : {
     333           0 :     const OUString sEnabled( "Enabled" );
     334           0 :     setControlProperty( rControlName, sEnabled, Any( sal_True ) );
     335           0 : }
     336             : 
     337             : 
     338             : 
     339           0 : void UnoDialog::disableControl( const OUString& rControlName )
     340             : {
     341           0 :     const OUString sEnabled( "Enabled" );
     342           0 :     setControlProperty( rControlName, sEnabled, Any( sal_False ) );
     343           0 : }
     344             : 
     345             : 
     346             : 
     347             : /* vim:set shiftwidth=4 softtabstop=4 expandtab: */

Generated by: LCOV version 1.11