mir/libreoffice
2
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity
Files
0fecc3a242f8fa9fac12ce7ee5cb6bcc70676d24
libreoffice/sw/source/ui/misc/srtdlg.cxx
Frank Meies 88e9759680 Fix #86988#: Redesign of dialogs
2001-06-01 10:04:53 +00:00

638 lines
18 KiB
C++
Raw Blame History

/*************************************************************************
*
* $RCSfile: srtdlg.cxx,v $
*
* $Revision: 1.7 $
*
* last change: $Author: fme $ $Date: 2001-06-01 11:04:53 $
*
* 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 PRECOMPILED
#include "ui_pch.hxx"
#endif
#pragma hdrstop
#ifndef _MSGBOX_HXX //autogen
#include <vcl/msgbox.hxx>
#endif
#ifndef _SFXINTITEM_HXX //autogen
#include <svtools/intitem.hxx>
#endif
#ifndef _SFXENUMITEM_HXX //autogen
#include <svtools/eitem.hxx>
#endif
#ifndef _SFXDISPATCH_HXX //autogen
#include <sfx2/dispatch.hxx>
#endif
#ifndef _SVX_SVXIDS_HRC //autogen
#include <svx/svxids.hrc>
#endif
#ifndef _UNO_LINGU_HXX
#include <svx/unolingu.hxx>
#endif
#ifndef _SVX_CHARMAP_HXX
#include <svx/charmap.hxx>
#endif
#ifndef _UNOTOOLS_COLLATORWRAPPER_HXX
#include <unotools/collatorwrapper.hxx>
#endif
#ifndef SVTOOLS_COLLATORRESSOURCE_HXX
#include <svtools/collatorres.hxx>
#endif
#ifndef _SWWAIT_HXX
#include <swwait.hxx>
#endif
#ifndef _VIEW_HXX
#include <view.hxx>
#endif
#ifndef _CMDID_H
#include <cmdid.h>
#endif
#ifndef _WRTSH_HXX
#include <wrtsh.hxx>
#endif
#ifndef _SRTDLG_HXX
#include <srtdlg.hxx>
#endif
#ifndef _SORTOPT_HXX
#include <sortopt.hxx>
#endif
#ifndef _MISC_HRC
#include <misc.hrc>
#endif
#ifndef _SRTDLG_HRC
#include <srtdlg.hrc>
#endif
#ifndef _SWTABLE_HXX
#include <swtable.hxx>
#endif
#ifndef _NODE_HXX
#include <node.hxx>
#endif
#ifndef _TBLSEL_HXX
#include <tblsel.hxx>
#endif
static BOOL bCheck1 = TRUE;
static BOOL bCheck2 = FALSE;
static BOOL bCheck3 = FALSE;
static USHORT nCol1 = 1;
static USHORT nCol2 = 1;
static USHORT nCol3 = 1;
static USHORT nType1 = 0;
static USHORT nType2 = 0;
static USHORT nType3 = 0;
static USHORT nLang = LANGUAGE_NONE;
static BOOL bAsc1 = TRUE;
static BOOL bAsc2 = TRUE;
static BOOL bAsc3 = TRUE;
static BOOL bCol = FALSE;
static BOOL bCsSens= FALSE;
static sal_Unicode cDeli = '\t';
using namespace ::com::sun::star::lang;
using namespace ::com::sun::star::uno;
using namespace ::rtl;
void lcl_ClearLstBoxAndDelUserData( ListBox& rLstBox )
{
void* pDel;
for( USHORT n = 0, nEnd = rLstBox.GetEntryCount(); n < nEnd; ++n )
if( 0 != ( pDel = rLstBox.GetEntryData( n )) )
delete (String*)pDel;
rLstBox.Clear();
}
/*--------------------------------------------------------------------
Beschreibung: Fuer Tabellenselektion sel. Zeilen und Spalten
feststellen
--------------------------------------------------------------------*/
BOOL lcl_GetSelTbl( SwWrtShell &rSh, USHORT& rX, USHORT& rY )
{
const SwTableNode* pTblNd = rSh.IsCrsrInTbl();
if( !pTblNd )
return FALSE;
_FndBox aFndBox( 0, 0 );
// suche alle Boxen / Lines
{
SwSelBoxes aSelBoxes;
::GetTblSel( rSh, aSelBoxes );
_FndPara aPara( aSelBoxes, &aFndBox );
const SwTable& rTbl = pTblNd->GetTable();
((SwTableLines&)rTbl.GetTabLines()).ForEach( &_FndLineCopyCol, &aPara );
}
rX = aFndBox.GetLines().Count();
if( !rX )
return FALSE;
rY = aFndBox.GetLines()[0]->GetBoxes().Count();
return TRUE;
}
/*--------------------------------------------------------------------
Beschreibung: Init-Liste
--------------------------------------------------------------------*/
SwSortDlg::SwSortDlg(Window* pParent, SwWrtShell &rShell) :
SvxStandardDialog(pParent, SW_RES(DLG_SORTING)),
rSh(rShell),
aOkBtn(this, SW_RES(BT_OK )),
aCancelBtn(this, SW_RES(BT_CANCEL)),
aHelpBtn(this, SW_RES(BT_HELP )),
aColLbl(this, SW_RES(FT_COL )),
aTypLbl(this, SW_RES(FT_KEYTYP)),
aDirLbl(this, SW_RES(FT_DIR )),
aKeyCB1(this, SW_RES(CB_KEY1 )),
aColEdt1(this, SW_RES(ED_KEY1 )),
aTypDLB1(this, SW_RES(DLB_KEY1 )),
aSortUpRB(this, SW_RES(RB_UP )),
aSortDnRB(this, SW_RES(RB_DN )),
aKeyCB2(this, SW_RES(CB_KEY2 )),
aColEdt2(this, SW_RES(ED_KEY2 )),
aTypDLB2(this, SW_RES(DLB_KEY2 )),
aSortUp2RB(this, SW_RES(RB_UP2 )),
aSortDn2RB(this, SW_RES(RB_DN2 )),
aKeyCB3(this, SW_RES(CB_KEY3 )),
aColEdt3(this, SW_RES(ED_KEY3 )),
aTypDLB3(this, SW_RES(DLB_KEY3 )),
aSortUp3RB(this, SW_RES(RB_UP3 )),
aSortDn3RB(this, SW_RES(RB_DN3 )),
aSortFL(this, SW_RES(FL_SORT_2 )),
aColumnRB(this, SW_RES(RB_COL )),
aRowRB(this, SW_RES(RB_ROW )),
aDirFL(this, SW_RES(FL_DIR )),
aDelimTabRB(this, SW_RES(RB_TAB )),
aDelimFreeRB(this, SW_RES(RB_TABCH )),
aDelimEdt(this, SW_RES(ED_TABCH )),
aDelimFL(this, SW_RES(FL_DELIM )),
aDelimPB(this, SW_RES( PB_DELIM)),
aLangFL(this, SW_RES( FL_LANG )),
aLangLB(this, SW_RES( LB_LANG )),
aSortOptFL(this, SW_RES( FL_SORT )),
aCaseCB(this, SW_RES( CB_CASE )),
aNumericTxt( SW_RES(STR_NUMERIC)),
aColTxt( SW_RES(STR_COL)),
aRowTxt( SW_RES(STR_ROW)),
nX( 99 ),
nY( 99 ),
pColRes( 0 )
{
aDelimEdt.SetMaxTextLen( 1 );
if(rSh.GetSelectionType() &
(SwWrtShell::SEL_TBL|SwWrtShell::SEL_TBL_CELLS) )
{
aColumnRB.Check(bCol);
aColLbl.SetText(bCol ? aRowTxt : aColTxt);
aRowRB.Check(!bCol);
aDelimTabRB.Enable(FALSE);
aDelimFreeRB.Enable(FALSE);
aDelimEdt.Enable(FALSE);
}
else
{
aColumnRB.Enable(FALSE);
aRowRB.Check(TRUE);
aColLbl.SetText(aColTxt);
}
// Initialisieren
Link aLk = LINK(this,SwSortDlg, CheckHdl);
aKeyCB1.SetClickHdl( aLk );
aKeyCB2.SetClickHdl( aLk );
aKeyCB3.SetClickHdl( aLk );
aColumnRB.SetClickHdl( aLk );
aRowRB.SetClickHdl( aLk );
aLk = LINK(this,SwSortDlg, DelimHdl);
aDelimFreeRB.SetClickHdl(aLk);
aDelimTabRB.SetClickHdl(aLk);
aDelimPB.SetClickHdl( LINK( this, SwSortDlg, DelimCharHdl ));
aKeyCB1.Check(bCheck1);
aKeyCB2.Check(bCheck2);
aKeyCB3.Check(bCheck3);
aColEdt1.SetValue(nCol1);
aColEdt2.SetValue(nCol2);
aColEdt3.SetValue(nCol3);
// first initialise the language, then select the
if( LANGUAGE_NONE == nLang || LANGUAGE_DONTKNOW == nLang )
nLang = (USHORT)GetAppLanguage();
aLangLB.SetLanguageList( LANG_LIST_ALL, TRUE, FALSE );
aLangLB.SelectLanguage( nLang );
LanguageHdl( 0 );
aLangLB.SetSelectHdl( LINK( this, SwSortDlg, LanguageHdl ));
aSortUpRB.Check(bAsc1);
aSortDnRB.Check(!bAsc1);
aSortUp2RB.Check(bAsc2);
aSortDn2RB.Check(!bAsc2);
aSortUp3RB.Check(bAsc3);
aSortDn3RB.Check(!bAsc3);
aCaseCB.Check( bCsSens );
aDelimTabRB.Check(cDeli == '\t');
if(!aDelimTabRB.IsChecked())
{
aDelimEdt.SetText(cDeli);
aDelimFreeRB.Check(TRUE);
DelimHdl(&aDelimFreeRB);
}
else
DelimHdl(&aDelimTabRB);
FreeResource();
if( ::lcl_GetSelTbl( rSh, nX, nY) )
{
USHORT nMax = aRowRB.IsChecked()? nY : nX;
aColEdt1.SetMax(nMax);
aColEdt2.SetMax(nMax);
aColEdt3.SetMax(nMax);
}
}
SwSortDlg::~SwSortDlg()
{
::lcl_ClearLstBoxAndDelUserData( aTypDLB1 );
::lcl_ClearLstBoxAndDelUserData( aTypDLB2 );
::lcl_ClearLstBoxAndDelUserData( aTypDLB3 );
delete pColRes;
}
sal_Unicode SwSortDlg::GetDelimChar() const
{
sal_Unicode cDeli = '\t';
if( !aDelimTabRB.IsChecked() )
{
String aTmp( aDelimEdt.GetText() );
if( aTmp.Len() )
cDeli = aTmp.GetChar( 0 );
}
return cDeli;
}
/*--------------------------------------------------------------------
Beschreibung: An die Core weiterreichen
--------------------------------------------------------------------*/
void SwSortDlg::Apply()
{
// Alte Einstellung speichern
//
bCheck1 = aKeyCB1.IsChecked();
bCheck2 = aKeyCB2.IsChecked();
bCheck3 = aKeyCB3.IsChecked();
nCol1 = (USHORT)aColEdt1.GetValue();
nCol2 = (USHORT)aColEdt2.GetValue();
nCol3 = (USHORT)aColEdt3.GetValue();
nType1 = aTypDLB1.GetSelectEntryPos();
nType2 = aTypDLB2.GetSelectEntryPos();
nType3 = aTypDLB3.GetSelectEntryPos();
bAsc1 = aSortUpRB.IsChecked();
bAsc2 = aSortUp2RB.IsChecked();
bAsc3 = aSortUp3RB.IsChecked();
bCol = aColumnRB.IsChecked();
nLang = aLangLB.GetSelectLanguage();
cDeli = GetDelimChar();
bCsSens = aCaseCB.IsChecked();
void* pUserData;
SwSortOptions aOptions;
if( bCheck1 )
{
String sEntry( aTypDLB1.GetSelectEntry() );
if( sEntry == aNumericTxt )
sEntry.Erase();
else if( 0 != (pUserData = aTypDLB1.GetEntryData(
aTypDLB1.GetSelectEntryPos())) )
sEntry = *(String*)pUserData;
SwSortKey *pKey = new SwSortKey( nCol1, sEntry,
bAsc1 ? SRT_ASCENDING : SRT_DESCENDING );
aOptions.aKeys.C40_INSERT(SwSortKey, pKey, aOptions.aKeys.Count());
}
if( bCheck2 )
{
String sEntry( aTypDLB2.GetSelectEntry() );
if( sEntry == aNumericTxt )
sEntry.Erase();
else if( 0 != (pUserData = aTypDLB2.GetEntryData(
aTypDLB2.GetSelectEntryPos())) )
sEntry = *(String*)pUserData;
SwSortKey *pKey = new SwSortKey( nCol2, sEntry,
bAsc2 ? SRT_ASCENDING : SRT_DESCENDING );
aOptions.aKeys.C40_INSERT( SwSortKey, pKey, aOptions.aKeys.Count() );
}
if( bCheck3 )
{
String sEntry( aTypDLB3.GetSelectEntry() );
if( sEntry == aNumericTxt )
sEntry.Erase();
else if( 0 != (pUserData = aTypDLB3.GetEntryData(
aTypDLB3.GetSelectEntryPos())) )
sEntry = *(String*)pUserData;
SwSortKey *pKey = new SwSortKey( nCol3, sEntry,
bAsc3 ? SRT_ASCENDING : SRT_DESCENDING );
aOptions.aKeys.C40_INSERT( SwSortKey, pKey, aOptions.aKeys.Count() );
}
aOptions.eDirection = bCol ? SRT_COLUMNS : SRT_ROWS;
aOptions.cDeli = cDeli;
aOptions.nLanguage = nLang;
aOptions.bTable = rSh.IsTableMode();
aOptions.bIgnoreCase = !bCsSens;
BOOL bRet;
{
SwWait aWait( *rSh.GetView().GetDocShell(), TRUE );
rSh.StartAllAction();
if( 0 != (bRet = rSh.Sort( aOptions )))
rSh.SetModified();
rSh.EndAllAction();
}
if( !bRet )
InfoBox( this->GetParent(), SW_RES(MSG_SRTERR)).Execute();
}
/* -----------------30.09.98 10:03-------------------
*
* --------------------------------------------------*/
IMPL_LINK( SwSortDlg, DelimHdl, RadioButton*, pButton )
{
BOOL bEnable = pButton == &aDelimFreeRB && aDelimFreeRB.IsEnabled();
aDelimEdt.Enable( bEnable );
aDelimPB.Enable( bEnable );
return 0;
}
IMPL_LINK( SwSortDlg, DelimCharHdl, PushButton*, pButton )
{
SvxCharacterMap* pMap = new SvxCharacterMap( &aDelimPB );
pMap->SetChar( GetDelimChar() );
if( RET_OK == pMap->Execute() )
aDelimEdt.SetText( pMap->GetChar() );
delete pMap;
return 0;
}
IMPL_LINK( SwSortDlg, CheckHdl, CheckBox *, pCheck )
{
if( pCheck == ( CheckBox* ) &aRowRB)
{
aColLbl.SetText(aColTxt);
aColEdt1.SetMax(nY);
aColEdt2.SetMax(nY);
aColEdt3.SetMax(nY);
}
else if( pCheck == ( CheckBox* ) &aColumnRB)
{
aColLbl.SetText(aRowTxt);
aColEdt1.SetMax(nX);
aColEdt2.SetMax(nX);
aColEdt3.SetMax(nX);
}
else if(!aKeyCB1.IsChecked() &&
!aKeyCB2.IsChecked() &&
!aKeyCB3.IsChecked())
pCheck->Check(TRUE);
return 0;
}
IMPL_LINK( SwSortDlg, LanguageHdl, ListBox*, pLBox )
{
Locale aLcl( SvxCreateLocale( aLangLB.GetSelectLanguage() ) );
Sequence < OUString > aSeq(
GetAppCollator().listCollatorAlgorithms( aLcl ));
if( !pColRes )
pColRes = new CollatorRessource();
const USHORT nLstBoxCnt = 3;
ListBox* aLstArr[ nLstBoxCnt ] = { &aTypDLB1, &aTypDLB2, &aTypDLB3 };
USHORT* aTypeArr[ nLstBoxCnt ] = { &nType1, &nType2, &nType3 };
String aOldStrArr[ nLstBoxCnt ];
USHORT n;
void* pUserData;
for( n = 0; n < nLstBoxCnt; ++n )
{
ListBox* pL = aLstArr[ n ];
if( 0 != (pUserData = pL->GetEntryData( pL->GetSelectEntryPos())) )
aOldStrArr[ n ] = *(String*)pUserData;
::lcl_ClearLstBoxAndDelUserData( *pL );
}
USHORT nInsPos;
String sAlg, sUINm;
for( long nCnt = 0, nEnd = aSeq.getLength(); nCnt <= nEnd; ++nCnt )
{
if( nCnt < nEnd )
sUINm = pColRes->GetTranslation( sAlg = aSeq[ nCnt ] );
else
sUINm = sAlg = aNumericTxt;
for( n = 0; n < nLstBoxCnt; ++n )
{
ListBox* pL = aLstArr[ n ];
nInsPos = pL->InsertEntry( sUINm );
pL->SetEntryData( nInsPos, new String( sAlg ));
if( pLBox && sAlg == aOldStrArr[ n ] )
pL->SelectEntryPos( nInsPos );
}
}
for( n = 0; n < nLstBoxCnt; ++n )
{
ListBox* pL = aLstArr[ n ];
if( !pLBox )
pL->SelectEntryPos( *aTypeArr[n] );
else if( LISTBOX_ENTRY_NOTFOUND == pL->GetSelectEntryPos() )
pL->SelectEntryPos( 0 );
}
return 0;
}
/*------------------------------------------------------------------------
$Log: not supported by cvs2svn $
Revision 1.6 2001/04/24 18:11:39 jp
use CollatorResource
Revision 1.5 2001/04/06 08:59:00 jp
changes for international (CJK)-sorting
Revision 1.4 2001/04/04 08:18:54 jp
changes for CJK sorting
Revision 1.3 2000/12/15 14:46:49 os
#80953# SortOptions-delimiter: char->sal_Unicode
Revision 1.2 2000/11/30 11:47:50 jp
Bug #80930#: handle the return value correct
Revision 1.1.1.1 2000/09/18 17:14:45 hr
initial import
Revision 1.58 2000/09/18 16:06:00 willem.vandorp
OpenOffice header added.
Revision 1.57 2000/05/26 07:21:31 os
old SW Basic API Slots removed
Revision 1.56 2000/02/11 14:56:48 hr
#70473# changes for unicode ( patched by automated patchtool )
Revision 1.55 1998/09/30 08:29:10 OS
#52654# Sortable und SortDescriptor eingebaut, auf- und absteigend fuer jeden Schluessel
Rev 1.54 30 Sep 1998 10:29:10 OS
#52654# Sortable und SortDescriptor eingebaut, auf- und absteigend fuer jeden Schluessel
Rev 1.53 07 Apr 1998 13:04:20 OM
#49223 Infobox nicht mit hidden Parent executen
Rev 1.52 24 Nov 1997 16:47:48 MA
includes
Rev 1.51 21 Nov 1997 13:50:44 OS
richtigen Schluesseltext setzen #45697#
Rev 1.50 03 Nov 1997 13:22:42 MA
precomp entfernt
Rev 1.49 25 Jul 1997 15:39:10 HJS
includes
Rev 1.48 11 Nov 1996 11:05:44 MA
ResMgr
Rev 1.47 24 Oct 1996 13:36:36 JP
String Umstellung: [] -> GetChar()
Rev 1.46 02 Oct 1996 18:29:32 MA
Umstellung Enable/Disable
Rev 1.45 11 Sep 1996 17:23:46 NF
add: svxids.hrc
Rev 1.44 28 Aug 1996 14:12:24 OS
includes
Rev 1.43 26 Jun 1996 15:25:54 OS
Aufruf von Dispatcher.Execute an 324 angepasst
Rev 1.42 25 Jun 1996 18:39:38 HJS
includes
Rev 1.41 07 Jun 1996 14:25:56 OS
SelectionType auf SEL_TBL* testen, nicht auf SEL_TXT
Rev 1.40 06 Feb 1996 15:21:14 JP
Link Umstellung 305
Rev 1.39 24 Nov 1995 16:58:46 OM
PCH->PRECOMPILED
Rev 1.38 13 Nov 1995 10:52:46 OM
Neues Seg
Rev 1.37 13 Nov 1995 10:51:34 OM
static entfernt
Rev 1.36 08 Nov 1995 13:31:48 JP
Umstellung zur 301: Change -> Set
Rev 1.35 24 Oct 1995 17:05:52 OS
Sorting recordable und dazu ueber Slot imlementiert
Rev 1.34 12 Sep 1995 17:30:20 OM
Helpbutton eingefuegt
------------------------------------------------------------------------*/
Reference in New Issue View Git Blame Copy Permalink