libreoffice/svx/source/tbxctrls/lboxctrl.cxx

/*************************************************************************
 *
 *  $RCSfile: lboxctrl.cxx,v $
 *
 *  $Revision: 1.4 $
 *
 *  last change: $Author: tl $ $Date: 2001-04-10 11:02:17 $
 *
 *  The Contents of this file are made available subject to the terms of
 *  either of the following licenses
 *
 *         - GNU Lesser General Public License Version 2.1
 *         - Sun Industry Standards Source License Version 1.1
 *
 *  Sun Microsystems Inc., October, 2000
 *
 *  GNU Lesser General Public License Version 2.1
 *  =============================================
 *  Copyright 2000 by Sun Microsystems, Inc.
 *  901 San Antonio Road, Palo Alto, CA 94303, USA
 *
 *  This library is free software; you can redistribute it and/or
 *  modify it under the terms of the GNU Lesser General Public
 *  License version 2.1, as published by the Free Software Foundation.
 *
 *  This library is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 *  Lesser General Public License for more details.
 *
 *  You should have received a copy of the GNU Lesser General Public
 *  License along with this library; if not, write to the Free Software
 *  Foundation, Inc., 59 Temple Place, Suite 330, Boston,
 *  MA  02111-1307  USA
 *
 *
 *  Sun Industry Standards Source License Version 1.1
 *  =================================================
 *  The contents of this file are subject to the Sun Industry Standards
 *  Source License Version 1.1 (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.openoffice.org/license.html.
 *
 *  Software provided under this License is provided on an "AS IS" basis,
 *  WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING,
 *  WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS,
 *  MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING.
 *  See the License for the specific provisions governing your rights and
 *  obligations concerning the Software.
 *
 *  The Initial Developer of the Original Code is: Sun Microsystems, Inc.
 *
 *  Copyright: 2000 by Sun Microsystems, Inc.
 *
 *  All Rights Reserved.
 *
 *  Contributor(s): _______________________________________
 *
 *
 ************************************************************************/

#ifdef   _TOOLS_DEBUG_HXX
#include <tools/debug.hxx>
#endif
#ifndef _SV_LSTBOX_HXX
#include <vcl/lstbox.hxx>
#endif
#ifndef _SV_TOOLBOX_HXX
#include <vcl/toolbox.hxx>
#endif
#ifndef _SFXAPP_HXX
#include <sfx2/app.hxx>
#endif
#ifndef _SFXTBXCTRL_HXX
#include <sfx2/tbxctrl.hxx>
#endif
#ifndef _SFX_BINDINGS_HXX
#include <sfx2/bindings.hxx>
#endif
#ifndef _SFXDISPATCH_HXX
#include <sfx2/dispatch.hxx>
#endif
#ifndef _SV_GEN_HXX
#include <tools/gen.hxx>
#endif
#ifndef _SFXINTITEM_HXX
#include <svtools/intitem.hxx>
#endif
#ifndef _SFXENUMITEM_HXX
#include <svtools/eitem.hxx>
#endif
#ifndef _STDCTRL_HXX
#include <svtools/stdctrl.hxx>
#endif
#ifndef _SFXSLSTITM_HXX
#include <svtools/slstitm.hxx>
#endif
#ifndef _SFXSTRITEM_HXX
#include <svtools/stritem.hxx>
#endif

#ifndef _SVX_DIALMGR_HXX
#include <dialmgr.hxx>
#endif
#ifndef _SVX_LBOXCTRL_HXX_
#include <lboxctrl.hxx>
#endif

#include <svxids.hrc>
#include <dialogs.hrc>

#include "lboxctrl.hrc"

class SvxPopupWindowListBox;

/////////////////////////////////////////////////////////////////

class SvxPopupWindowListBox : public SfxPopupWindow
{
    FixedInfo       aInfo;
    ListBox *       pListBox;
    ToolBox &       rToolBox;
    USHORT          nItemId;
    BOOL            bUserSel;

    // disallow copy-constructor and assignment-operator
    SvxPopupWindowListBox( const & SvxPopupWindowListBox );
    SvxPopupWindowListBox & operator = ( const & SvxPopupWindowListBox );

    DECL_LINK( SelectHdl, void * );

    SvxPopupWindowListBox( USHORT nSlotId,
                           ToolBox& rTbx, USHORT nTbxItemId );

public:
    SvxPopupWindowListBox( USHORT nSlotId,
                           ToolBox& rTbx, USHORT nTbxItemId,
                           SfxBindings &rBindings );
    virtual ~SvxPopupWindowListBox();

    // SfxPopupWindow
    virtual SfxPopupWindow *    Clone() const;
    virtual void                PopupModeEnd();
    virtual void                StateChanged( USHORT nSID, SfxItemState eState,
                                              const SfxPoolItem* pState );

    void                        StartSelection();
    inline ListBox &            GetListBox()    { return *pListBox; }
    inline FixedInfo &          GetInfo()       { return aInfo; }

    BOOL                        IsUserSelected() const          { return bUserSel; }
    void                        SetUserSelected( BOOL bVal )    { bUserSel = bVal; }
};

/////////////////////////////////////////////////////////////////

class PopupListBox : public ListBox
{
    SvxPopupWindowListBox &rPopupWin;

    // disallow use of copy-constructor and assignment-operator
    PopupListBox( const PopupListBox & );
    PopupListBox & operator = ( const PopupListBox & );

public:
    PopupListBox( SvxPopupWindowListBox &rParent, const ResId &rResId );
    virtual ~PopupListBox();

    virtual long        Notify( NotifyEvent &rEvt );
};


PopupListBox::PopupListBox( SvxPopupWindowListBox &rParent, const ResId &rResId ) :
        ListBox( &rParent, rResId ),
        rPopupWin   ( rParent )
{
}


PopupListBox::~PopupListBox()
{
}


long PopupListBox::Notify( NotifyEvent &rEvt )
{
    long nHandled = 0;
    rPopupWin.SetUserSelected( FALSE );

    if (IsWindowOrChild( rEvt.GetWindow() ))
    {
        USHORT nEvtType = rEvt.GetType();
        if (EVENT_MOUSEBUTTONUP == nEvtType )
        {
            nHandled = 1;
        }
        else if (EVENT_KEYINPUT == nEvtType)
        {
            const KeyEvent *pKeyEvt = rEvt.GetKeyEvent();
            if (pKeyEvt  &&  pKeyEvt->GetCharCode() == (sal_Unicode) '\r')
            {
                nHandled = 1;
                rPopupWin.SetUserSelected( TRUE );
                rPopupWin.EndPopupMode( 0 );
            }
        }
    }

    return nHandled;
}

/////////////////////////////////////////////////////////////////

SvxPopupWindowListBox::SvxPopupWindowListBox(
            USHORT nSlotId,
            ToolBox& rTbx, USHORT nTbxItemId,
            SfxBindings &rBindings ) :

    SfxPopupWindow( nSlotId, SVX_RES( RID_SVXTBX_UNDO_REDO_CTRL ), rBindings ),
    aInfo       ( this, ResId( FT_NUM_OPERATIONS ) ),
    rToolBox    ( rTbx ),
    nItemId     ( nTbxItemId ),
    bUserSel    ( FALSE )
{
    DBG_ASSERT( nSlotId == GetId(), "id mismatch" );
    pListBox = new PopupListBox( *this, SVX_RES( LB_SVXTBX_UNDO_REDO_CTRL ) );
    FreeResource();
    //pListBox->EnableMultiSelection( TRUE );
    SetBackground( GetSettings().GetStyleSettings().GetDialogColor() );
    pListBox->GrabFocus();
    pListBox->SetSelectHdl( LINK( this, SvxPopupWindowListBox, SelectHdl ) );
}


SvxPopupWindowListBox::~SvxPopupWindowListBox()
{
    delete pListBox;
}


SfxPopupWindow* SvxPopupWindowListBox::Clone() const
{
    return new SvxPopupWindowListBox( GetId(), rToolBox, nItemId,
                                      (SfxBindings &) GetBindings() );
}


void SvxPopupWindowListBox::PopupModeEnd()
{
    rToolBox.EndSelection();
    SfxPopupWindow::PopupModeEnd();
    //FloatingWindow::PopupModeEnd();
}


void SvxPopupWindowListBox::StateChanged(
        USHORT nSID, SfxItemState eState, const SfxPoolItem* pState )
{
    rToolBox.EnableItem( GetId(), (GetItemState(pState) != SFX_ITEM_DISABLED) );
    SfxPopupWindow::StateChanged( nSID, eState, pState );
}


void SvxPopupWindowListBox::StartSelection()
{
    rToolBox.StartSelection();
}


IMPL_LINK( SvxPopupWindowListBox, SelectHdl, void *, EMPTYARG )
{
    return 0;
}

/////////////////////////////////////////////////////////////////

SFX_IMPL_TOOLBOX_CONTROL( SvxListBoxControl, SfxStringItem );


SvxListBoxControl::SvxListBoxControl(
        USHORT nId, ToolBox& rTbx, SfxBindings& rBind ) :

    SfxToolBoxControl( nId, rTbx, rBind ),
    nItemId     ( nId ),
    pPopupWin   ( 0 )
{
    ToolBox& rBox = GetToolBox();
    rBox.SetItemBits( nId, TIB_DROPDOWN | rBox.GetItemBits( nId ) );
    rBox.Invalidate();
}


SvxListBoxControl::~SvxListBoxControl()
{
}


SfxPopupWindow* SvxListBoxControl::CreatePopupWindow()
{
    DBG_ERROR( "not implemented" );
    return 0;
}


SfxPopupWindowType SvxListBoxControl::GetPopupWindowType() const
{
    return SFX_POPUPWINDOW_ONTIMEOUT;
}


void SvxListBoxControl::StateChanged(
        USHORT nSID, SfxItemState eState, const SfxPoolItem* pState )
{
    GetToolBox().EnableItem( GetId(), (GetItemState(pState) != SFX_ITEM_DISABLED) );
}


IMPL_LINK( SvxListBoxControl, PopupModeEndHdl, void *, EMPTYARG )
{
    if (pPopupWin  &&  0 == pPopupWin->GetPopupModeFlags()  &&
        pPopupWin->IsUserSelected() )
    {
        USHORT nPos = pPopupWin->GetListBox().GetSelectEntryPos();
        SfxUInt16Item aItem( GetId(), nPos + 1 );
        GetBindings().GetDispatcher()->Execute( GetId(),
                SFX_CALLMODE_SYNCHRON, &aItem, 0L );
    }
    return 0;
}

/////////////////////////////////////////////////////////////////

SFX_IMPL_TOOLBOX_CONTROL( SvxUndoControl, SfxStringItem );


SvxUndoControl::SvxUndoControl(
        USHORT nId, ToolBox& rTbx, SfxBindings& rBind ) :

    SvxListBoxControl( nId, rTbx, rBind /*, SID_GETUNDOSTRINGS*/ )
{
}


SvxUndoControl::~SvxUndoControl()
{
}


SfxPopupWindow* SvxUndoControl::CreatePopupWindow()
{
    DBG_ASSERT( SID_UNDO == GetId(), "mismatching ids" );

    SfxPoolItem* pState = 0;
    SfxBindings &rBindings = GetBindings();
    SfxDispatcher &rDispatch = *GetBindings().GetDispatcher();
    SfxItemState eState = rDispatch.QueryState( SID_GETUNDOSTRINGS, pState );

    if (eState >= SFX_ITEM_AVAILABLE  &&  pState)
    {
        ToolBox& rBox = GetToolBox();

        pPopupWin = new SvxPopupWindowListBox( GetId(), rBox, nItemId, rBindings );
        pPopupWin->SetPopupModeEndHdl( LINK( this, SvxUndoControl, PopupModeEndHdl ) );
        ListBox &rListBox = pPopupWin->GetListBox();

        SfxStringListItem &rItem = *(SfxStringListItem *) pState;
        String aStrList( rItem.GetString() );
        xub_StrLen nCount = aStrList.GetTokenCount( '\n' );
        xub_StrLen nIdx = 0;
        DBG_ASSERT( nCount > 0, "no undo actions available" );
        for (xub_StrLen i = 0;  i < nCount;  ++i)
            rListBox.InsertEntry( aStrList.GetToken( 0, '\n', nIdx ) );
        rListBox.SelectEntryPos( 0 );
        //pPopupWin->GetInfo().SetText( String::CreateFromAscii("Huhu...") );

//      rBox.SetItemDown( nId, TRUE );
        //Point aPt( rBox.OutputToScreenPixel( rBox.GetPointerPosPixel() ) );
        Rectangle aItemRect( rBox.GetItemRect( nItemId ) );
//      rBox.SetItemDown( nId, FALSE );

        ULONG nFlags = FLOATWIN_POPUPMODE_DOWN;
        pPopupWin->StartPopupMode( aItemRect, nFlags );
        pPopupWin->SetPosPixel( aItemRect.BottomLeft() );
        pPopupWin->StartSelection();
        pPopupWin->Show();
    }
    return pPopupWin;
}


SfxPopupWindowType SvxUndoControl::GetPopupWindowType() const
{
    return SvxListBoxControl::GetPopupWindowType();
}


void SvxUndoControl::StateChanged(
        USHORT nSID, SfxItemState eState, const SfxPoolItem* pState )
{
    SvxListBoxControl::StateChanged( nSID, eState, pState );
}

/////////////////////////////////////////////////////////////////

SFX_IMPL_TOOLBOX_CONTROL( SvxRedoControl, SfxStringItem );


SvxRedoControl::SvxRedoControl(
        USHORT nId, ToolBox& rTbx, SfxBindings& rBind ) :

    SvxListBoxControl( nId, rTbx, rBind /*, SID_GETREDOSTRINGS*/ )
{
}


SvxRedoControl::~SvxRedoControl()
{
}


SfxPopupWindow* SvxRedoControl::CreatePopupWindow()
{
    DBG_ASSERT( SID_REDO == GetId(), "mismatching ids" );

    SfxPoolItem* pState = 0;
    SfxBindings &rBindings = GetBindings();
    SfxDispatcher &rDispatch = *GetBindings().GetDispatcher();
    SfxItemState eState = rDispatch.QueryState( SID_GETREDOSTRINGS, pState );

    if (eState >= SFX_ITEM_AVAILABLE  &&  pState)
    {
        ToolBox& rBox = GetToolBox();

        pPopupWin = new SvxPopupWindowListBox( GetId(), rBox, nItemId, rBindings );
        pPopupWin->SetPopupModeEndHdl( LINK( this, SvxRedoControl, PopupModeEndHdl ) );
        ListBox &rListBox = pPopupWin->GetListBox();

        SfxStringListItem &rItem = *(SfxStringListItem *) pState;
        String aStrList( rItem.GetString() );
        xub_StrLen nCount = aStrList.GetTokenCount( '\n' );
        xub_StrLen nIdx = 0;
        DBG_ASSERT( nCount > 0, "no undo actions available" );
        for (xub_StrLen i = 0;  i < nCount;  ++i)
            rListBox.InsertEntry( aStrList.GetToken( 0, '\n', nIdx ) );
        rListBox.SelectEntryPos( 0 );
        //pPopupWin->GetInfo().SetText( String::CreateFromAscii("Huhu...") );

//      rBox.SetItemDown( nId, TRUE );
        //Point aPt( rBox.OutputToScreenPixel( rBox.GetPointerPosPixel() ) );
        Rectangle aItemRect( rBox.GetItemRect( nItemId ) );
        Point aPt( rBox.OutputToScreenPixel( aItemRect.BottomLeft() ) );
        aItemRect.TopLeft() = rBox.ScreenToOutputPixel( aPt );
//      rBox.SetItemDown( nId, FALSE );

        pPopupWin->StartPopupMode( aItemRect );
        pPopupWin->StartSelection();
        pPopupWin->Show();
    }
    return pPopupWin;
}


SfxPopupWindowType SvxRedoControl::GetPopupWindowType() const
{
    return SvxListBoxControl::GetPopupWindowType();
}


void SvxRedoControl::StateChanged(
        USHORT nSID, SfxItemState eState, const SfxPoolItem* pState )
{
    SvxListBoxControl::StateChanged( nSID, eState, pState );
}

/////////////////////////////////////////////////////////////////