| /************************************************************** |
| * |
| * 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_sw.hxx" |
| #ifdef SW_DLLIMPLEMENTATION |
| #undef SW_DLLIMPLEMENTATION |
| #endif |
| |
| |
| #include <swtypes.hxx> |
| #include <sfx2/linkmgr.hxx> |
| #include <usrfld.hxx> |
| #include <docufld.hxx> |
| #include <expfld.hxx> |
| #include <ddefld.hxx> |
| #include <view.hxx> |
| #include <wrtsh.hxx> |
| #include <doc.hxx> |
| #include <docary.hxx> |
| #include <swmodule.hxx> |
| #include <fldvar.hxx> |
| #include <calc.hxx> |
| #include <svl/zformat.hxx> |
| #include <globals.hrc> |
| #include <fldui.hrc> |
| #include <fldtdlg.hrc> |
| |
| #define USER_DATA_VERSION_1 "1" |
| #define USER_DATA_VERSION USER_DATA_VERSION_1 |
| /*-------------------------------------------------------------------- |
| Beschreibung: |
| --------------------------------------------------------------------*/ |
| |
| SwFldVarPage::SwFldVarPage(Window* pParent, const SfxItemSet& rCoreSet ) : |
| SwFldPage ( pParent, SW_RES( TP_FLD_VAR ), rCoreSet ), |
| aTypeFT (this, SW_RES(FT_VARTYPE)), |
| aTypeLB (this, SW_RES(LB_VARTYPE)), |
| aSelectionFT (this, SW_RES(FT_VARSELECTION)), |
| aSelectionLB (this, SW_RES(LB_VARSELECTION)), |
| aNameFT (this, SW_RES(FT_VARNAME)), |
| aNameED (this, SW_RES(ED_VARNAME)), |
| aValueFT (this, SW_RES(FT_VARVALUE)), |
| aValueED (this, SW_RES(ED_VARVALUE)), |
| aFormatFT (this, SW_RES(FT_VARFORMAT)), |
| aNumFormatLB (this, SW_RES(LB_VARNUMFORMAT)), |
| aFormatLB (this, SW_RES(LB_VARFORMAT)), |
| aChapterHeaderFT(this, SW_RES(FT_VARCHAPTERHEADER)), |
| aChapterLevelFT (this, SW_RES(FT_VARCHAPTERLEVEL)), |
| aChapterLevelLB (this, SW_RES(LB_VARCHAPTERLEVEL)), |
| aInvisibleCB (this, SW_RES(CB_VARINVISIBLE)), |
| aSeparatorFT (this, SW_RES(FT_VARSEPARATOR)), |
| aSeparatorED (this, SW_RES(ED_VARSEPARATOR)), |
| aNewDelTBX (this, SW_RES(TBX_VARNEWDEL)), |
| bInit (sal_True) |
| { |
| FreeResource(); |
| |
| aNewDelTBX.SetSizePixel( aNewDelTBX.CalcWindowSizePixel() ); |
| |
| long nDelta = ( aValueED.GetSizePixel().Height() - |
| aNewDelTBX.GetSizePixel().Height() ) / 2; |
| Point aNewPnt = aNewDelTBX.GetPosPixel(); |
| aNewPnt.Y() += nDelta; |
| aNewDelTBX.SetPosPixel( aNewPnt ); |
| |
| sOldValueFT = aValueFT.GetText(); |
| sOldNameFT = aNameFT.GetText(); |
| |
| for (sal_uInt16 i = 1; i <= MAXLEVEL; i++) |
| aChapterLevelLB.InsertEntry(String::CreateFromInt32(i)); |
| |
| aChapterLevelLB.SelectEntryPos(0); |
| //enable 'active' language selection |
| aNumFormatLB.SetShowLanguageControl(sal_True); |
| } |
| |
| /*-------------------------------------------------------------------- |
| Beschreibung: |
| --------------------------------------------------------------------*/ |
| |
| SwFldVarPage::~SwFldVarPage() |
| { |
| } |
| |
| /*-------------------------------------------------------------------- |
| Beschreibung: |
| --------------------------------------------------------------------*/ |
| |
| void SwFldVarPage::Reset(const SfxItemSet& ) |
| { |
| SavePos(&aTypeLB); |
| |
| Init(); // Allgemeine initialisierung |
| |
| aTypeLB.SetUpdateMode(sal_False); |
| aTypeLB.Clear(); |
| |
| sal_uInt16 nPos, nTypeId; |
| |
| if (!IsFldEdit()) |
| { |
| // TypeListBox initialisieren |
| const SwFldGroupRgn& rRg = GetFldMgr().GetGroupRange(IsFldDlgHtmlMode(), GetGroup()); |
| |
| for (short i = rRg.nStart; i < rRg.nEnd; ++i) |
| { |
| nTypeId = GetFldMgr().GetTypeId(i); |
| nPos = aTypeLB.InsertEntry(GetFldMgr().GetTypeStr(i)); |
| aTypeLB.SetEntryData(nPos, reinterpret_cast<void*>(nTypeId)); |
| } |
| } |
| else |
| { |
| const SwField* pCurField = GetCurField(); |
| ASSERT( pCurField != NULL, |
| "<SwFldVarPage::Reset(..)> - <SwField> instance missing!" ); |
| nTypeId = pCurField->GetTypeId(); |
| if ( nTypeId == TYP_SETINPFLD ) |
| nTypeId = TYP_INPUTFLD; |
| nPos = aTypeLB.InsertEntry( GetFldMgr().GetTypeStr( GetFldMgr().GetPos( nTypeId ) ) ); |
| aTypeLB.SetEntryData( nPos, reinterpret_cast< void* >( nTypeId ) ); |
| aNumFormatLB.SetAutomaticLanguage( pCurField->IsAutomaticLanguage() ); |
| SwWrtShell *pSh = GetWrtShell(); |
| if ( !pSh ) |
| pSh = ::GetActiveWrtShell(); |
| if ( pSh ) |
| { |
| const SvNumberformat* pFormat = pSh->GetNumberFormatter()->GetEntry( pCurField->GetFormat() ); |
| if ( pFormat ) |
| aNumFormatLB.SetLanguage( pFormat->GetLanguage() ); |
| } |
| } |
| |
| // alte Pos selektieren |
| RestorePos(&aTypeLB); |
| |
| aTypeLB.SetDoubleClickHdl (LINK(this, SwFldVarPage, InsertHdl)); |
| aTypeLB.SetSelectHdl (LINK(this, SwFldVarPage, TypeHdl)); |
| aSelectionLB.SetSelectHdl (LINK(this, SwFldVarPage, SubTypeHdl)); |
| aSelectionLB.SetDoubleClickHdl (LINK(this, SwFldVarPage, InsertHdl)); |
| aFormatLB.SetDoubleClickHdl (LINK(this, SwFldVarPage, InsertHdl)); |
| aNumFormatLB.SetDoubleClickHdl (LINK(this, SwFldVarPage, InsertHdl)); |
| aNameED.SetModifyHdl (LINK(this, SwFldVarPage, ModifyHdl)); |
| aValueED.SetModifyHdl (LINK(this, SwFldVarPage, ModifyHdl)); |
| aNewDelTBX.SetClickHdl (LINK(this, SwFldVarPage, TBClickHdl)); |
| aChapterLevelLB.SetSelectHdl (LINK(this, SwFldVarPage, ChapterHdl)); |
| aSeparatorED.SetModifyHdl (LINK(this, SwFldVarPage, SeparatorHdl)); |
| |
| if( !IsRefresh() ) |
| { |
| String sUserData = GetUserData(); |
| if(!IsRefresh() && sUserData.GetToken(0, ';').EqualsIgnoreCaseAscii(USER_DATA_VERSION_1)) |
| { |
| String sVal = sUserData.GetToken(1, ';'); |
| sal_uInt16 nVal = (sal_uInt16)sVal.ToInt32(); |
| if( USHRT_MAX != nVal ) |
| { |
| for(sal_uInt16 i = 0; i < aTypeLB.GetEntryCount(); i++) |
| if(nVal == (sal_uInt16)(sal_uLong)aTypeLB.GetEntryData(i)) |
| { |
| aTypeLB.SelectEntryPos(i); |
| break; |
| } |
| } |
| } |
| } |
| TypeHdl(0); |
| |
| aTypeLB.SetUpdateMode(sal_True); |
| |
| if (IsFldEdit()) |
| { |
| aSelectionLB.SaveValue(); |
| aFormatLB.SaveValue(); |
| nOldFormat = aNumFormatLB.GetFormat(); |
| aNameED.SaveValue(); |
| aValueED.SaveValue(); |
| aInvisibleCB.SaveValue(); |
| aChapterLevelLB.SaveValue(); |
| aSeparatorED.SaveValue(); |
| } |
| } |
| |
| /*-------------------------------------------------------------------- |
| Beschreibung: |
| --------------------------------------------------------------------*/ |
| |
| IMPL_LINK( SwFldVarPage, TypeHdl, ListBox *, EMPTYARG ) |
| { |
| // Alte ListBoxPos sichern |
| const sal_uInt16 nOld = GetTypeSel(); |
| |
| // Aktuelle ListBoxPos |
| SetTypeSel(aTypeLB.GetSelectEntryPos()); |
| |
| if(GetTypeSel() == LISTBOX_ENTRY_NOTFOUND) |
| { |
| SetTypeSel(0); |
| aTypeLB.SelectEntryPos(0); |
| } |
| |
| if (nOld != GetTypeSel() || nOld == LISTBOX_ENTRY_NOTFOUND) |
| { |
| bInit = sal_True; |
| if (nOld != LISTBOX_ENTRY_NOTFOUND) |
| { |
| aNameED.SetText(aEmptyStr); |
| aValueED.SetText(aEmptyStr); |
| } |
| |
| aValueED.SetDropEnable(sal_False); |
| UpdateSubType(); // Auswahl-Listboxen initialisieren |
| } |
| |
| bInit = sal_False; |
| |
| return 0; |
| } |
| |
| /*-------------------------------------------------------------------- |
| Beschreibung: |
| --------------------------------------------------------------------*/ |
| |
| IMPL_LINK( SwFldVarPage, SubTypeHdl, ListBox *, pBox ) |
| { |
| sal_uInt16 nTypeId = (sal_uInt16)(sal_uLong)aTypeLB.GetEntryData(GetTypeSel()); |
| sal_uInt16 nSelPos = aSelectionLB.GetSelectEntryPos(); |
| |
| if (nSelPos != LISTBOX_ENTRY_NOTFOUND) |
| nSelPos = (sal_uInt16)(sal_uLong)aSelectionLB.GetEntryData(nSelPos); |
| |
| if (IsFldEdit() && (!pBox || bInit)) |
| { |
| if (nTypeId != TYP_FORMELFLD) |
| aNameED.SetText(GetFldMgr().GetCurFldPar1()); |
| |
| aValueED.SetText(GetFldMgr().GetCurFldPar2()); |
| } |
| |
| if (aNameFT.GetText() != sOldNameFT) |
| aNameFT.SetText(sOldNameFT); |
| if (aValueFT.GetText() != sOldValueFT) |
| aValueFT.SetText(sOldValueFT); |
| |
| aNumFormatLB.SetUpdateMode(sal_False); |
| aFormatLB.SetUpdateMode(sal_False); |
| FillFormatLB(nTypeId); |
| |
| sal_uInt16 nSize = aFormatLB.GetEntryCount(); |
| |
| sal_Bool bValue = sal_False, bName = sal_False, bNumFmt = sal_False, |
| bInvisible = sal_False, bSeparator = sal_False, bChapterLevel = sal_False; |
| sal_Bool bFormat = nSize != 0; |
| |
| switch ( nTypeId ) |
| { |
| case TYP_USERFLD: |
| { |
| // Benutzertyp aendern oder anlegen |
| SwUserFieldType* pType = (SwUserFieldType*) |
| GetFldMgr().GetFldType( RES_USERFLD, nSelPos ); |
| |
| if ( pType ) |
| { |
| if ( !IsFldEdit() ) |
| { |
| if ( pBox || ( bInit && !IsRefresh() ) ) // Nur bei Interaktion mit Maus |
| { |
| aNameED.SetText( pType->GetName() ); |
| |
| if ( pType->GetType() == UF_STRING ) |
| { |
| aValueED.SetText( pType->GetContent() ); |
| aNumFormatLB.SelectEntryPos( 0 ); |
| } |
| else |
| aValueED.SetText( pType->GetContent() ); |
| // aValueED.SetText(pType->GetContent(aNumFormatLB.GetFormat())); |
| } |
| } |
| else |
| aValueED.SetText( pType->GetContent() ); |
| } |
| else |
| { |
| if ( pBox ) // Nur bei Interaktion mit Maus |
| { |
| aNameED.SetText( aEmptyStr ); |
| aValueED.SetText( aEmptyStr ); |
| } |
| } |
| bValue = bName = bNumFmt = bInvisible = sal_True; |
| |
| aValueED.SetDropEnable( sal_True ); |
| break; |
| } |
| |
| case TYP_SETFLD: |
| bValue = sal_True; |
| |
| bNumFmt = bInvisible = sal_True; |
| |
| if ( !IsFldDlgHtmlMode() ) |
| bName = sal_True; |
| else |
| { |
| aNumFormatLB.Clear(); |
| sal_uInt16 nPos = aNumFormatLB.InsertEntry( SW_RESSTR( FMT_SETVAR_TEXT ), 0 ); |
| aNumFormatLB.SetEntryData( nPos, (void *) ULONG_MAX ); |
| aNumFormatLB.SelectEntryPos( 0 ); |
| } |
| // gibt es ein entprechendes SetField |
| if ( IsFldEdit() || pBox ) // Nur bei Interaktion mit Maus |
| { |
| if ( nSelPos != LISTBOX_ENTRY_NOTFOUND ) |
| { |
| String sName( aSelectionLB.GetSelectEntry() ); |
| aNameED.SetText( sName ); |
| |
| if ( !IsFldDlgHtmlMode() ) |
| { |
| SwWrtShell *pSh = GetWrtShell(); |
| if ( !pSh ) |
| pSh = ::GetActiveWrtShell(); |
| if ( pSh ) |
| { |
| SwSetExpFieldType* pSetTyp = (SwSetExpFieldType*) |
| pSh->GetFldType( RES_SETEXPFLD, sName ); |
| |
| if ( pSetTyp && pSetTyp->GetType() == nsSwGetSetExpType::GSE_STRING ) |
| aNumFormatLB.SelectEntryPos( 0 ); // Textuell |
| } |
| } |
| } |
| } |
| if ( GetCurField() != NULL && IsFldEdit() ) |
| { |
| // GetFormula fuehrt bei Datumsformaten zu Problemen, |
| // da nur der numerische Wert ohne Formatierung returned wird. |
| // Muss aber verwendet werden, da sonst bei GetPar2 nur der vom |
| // Kalkulator errechnete Wert angezeigt werden wuerde |
| // (statt test2 = test + 1) |
| aValueED.SetText( ( (SwSetExpField*) GetCurField() )->GetFormula() ); |
| } |
| aValueED.SetDropEnable( sal_True ); |
| break; |
| |
| case TYP_FORMELFLD: |
| { |
| bValue = sal_True; |
| bNumFmt = sal_True; |
| aValueFT.SetText( SW_RESSTR( STR_FORMULA ) ); |
| aValueED.SetDropEnable( sal_True ); |
| } |
| break; |
| |
| case TYP_GETFLD: |
| { |
| if ( !IsFldEdit() ) |
| { |
| aNameED.SetText( aEmptyStr ); |
| aValueED.SetText( aEmptyStr ); |
| } |
| |
| if ( nSelPos != LISTBOX_ENTRY_NOTFOUND ) |
| { |
| String sName( aSelectionLB.GetSelectEntry() ); |
| if ( !IsFldEdit() ) |
| aNameED.SetText( sName ); |
| |
| // gibt es ein entprechendes SetField |
| SwWrtShell *pSh = GetWrtShell(); |
| if ( !pSh ) |
| pSh = ::GetActiveWrtShell(); |
| if ( pSh ) |
| { |
| SwSetExpFieldType* pSetTyp = (SwSetExpFieldType*) |
| pSh->GetFldType( RES_SETEXPFLD, sName ); |
| |
| if ( pSetTyp ) |
| { |
| if ( pSetTyp->GetType() & nsSwGetSetExpType::GSE_STRING ) // Textuell? |
| bFormat = sal_True; |
| else |
| // Numerisch |
| bNumFmt = sal_True; |
| } |
| } |
| } |
| else |
| bFormat = sal_False; |
| |
| EnableInsert( bFormat | bNumFmt ); |
| } |
| break; |
| |
| case TYP_INPUTFLD: |
| aValueFT.SetText( SW_RESSTR( STR_PROMPT ) ); |
| |
| if ( nSelPos != LISTBOX_ENTRY_NOTFOUND ) |
| { |
| bValue = bNumFmt = sal_True; |
| |
| String sName; |
| |
| sName = aSelectionLB.GetSelectEntry(); |
| aNameED.SetText( sName ); |
| |
| // User- oder SetField ? |
| sal_uInt16 nInpType = 0; |
| nInpType = static_cast< sal_uInt16 >( GetFldMgr().GetFldType( RES_USERFLD, sName ) ? 0 : TYP_SETINPFLD ); |
| |
| if ( nInpType ) // SETEXPFLD |
| { |
| // gibt es ein entprechendes SetField |
| SwSetExpFieldType* pSetTyp = (SwSetExpFieldType*) |
| GetFldMgr().GetFldType( RES_SETEXPFLD, sName ); |
| |
| if ( pSetTyp ) |
| { |
| if ( pSetTyp->GetType() == nsSwGetSetExpType::GSE_STRING ) // Textuell? |
| { |
| aNumFormatLB.Clear(); |
| |
| sal_uInt16 nPos = aNumFormatLB.InsertEntry( SW_RESSTR( FMT_USERVAR_TEXT ), 0 ); |
| aNumFormatLB.SetEntryData( nPos, (void *) ULONG_MAX ); |
| aNumFormatLB.SelectEntryPos( 0 ); |
| } |
| } |
| if ( GetCurField() != NULL |
| && IsFldEdit() && ( !pBox || bInit ) ) |
| { |
| aValueED.SetText( ( (SwSetExpField*) GetCurField() )->GetPromptText() ); |
| } |
| } |
| else |
| // USERFLD |
| bFormat = bNumFmt = sal_False; |
| } |
| break; |
| |
| case TYP_DDEFLD: |
| aValueFT.SetText( SW_RESSTR( STR_DDE_CMD ) ); |
| |
| if ( IsFldEdit() || pBox ) // Nur bei Interaktion mit Maus |
| { |
| if ( nSelPos != LISTBOX_ENTRY_NOTFOUND ) |
| { |
| SwDDEFieldType* pType = |
| (SwDDEFieldType*) GetFldMgr().GetFldType( RES_DDEFLD, nSelPos ); |
| |
| if ( pType ) |
| { |
| aNameED.SetText( pType->GetName() ); |
| |
| //JP 28.08.95: DDE-Topics/-Items koennen Blanks in ihren |
| // Namen haben! Wird hier noch nicht beachtet |
| String sCmd( pType->GetCmd() ); |
| sal_uInt16 nTmpPos = sCmd.SearchAndReplace( sfx2::cTokenSeperator, ' ' ); |
| sCmd.SearchAndReplace( sfx2::cTokenSeperator, ' ', nTmpPos ); |
| |
| aValueED.SetText( sCmd ); |
| aFormatLB.SelectEntryPos( pType->GetType() ); |
| } |
| } |
| } |
| bName = bValue = sal_True; |
| break; |
| |
| case TYP_SEQFLD: |
| { |
| // aNumRB.Check(sal_True); |
| bName = bValue = bSeparator = bChapterLevel = sal_True; |
| |
| SwFieldType* pFldTyp; |
| if ( GetCurField() != NULL && IsFldEdit() ) |
| pFldTyp = GetCurField()->GetTyp(); |
| else |
| { |
| String sFldTypeName( aSelectionLB.GetEntry( nSelPos ) ); |
| if ( sFldTypeName.Len() ) |
| pFldTyp = GetFldMgr().GetFldType( RES_SETEXPFLD, sFldTypeName ); |
| else |
| pFldTyp = 0; |
| } |
| |
| if ( GetCurField() != NULL && IsFldEdit() ) |
| aValueED.SetText( ( (SwSetExpField*) GetCurField() )-> GetFormula() ); |
| |
| if ( IsFldEdit() || pBox ) // Nur bei Interaktion mit Maus |
| aNameED.SetText( aSelectionLB.GetSelectEntry() ); |
| |
| if ( pFldTyp ) |
| { |
| sal_uInt8 nLevel = ( (SwSetExpFieldType*) pFldTyp )->GetOutlineLvl(); |
| if ( 0x7f == nLevel ) |
| aChapterLevelLB.SelectEntryPos( 0 ); |
| else |
| aChapterLevelLB.SelectEntryPos( nLevel + 1 ); |
| String sDelim = ( (SwSetExpFieldType*) pFldTyp )->GetDelimiter(); |
| aSeparatorED.SetText( sDelim ); |
| ChapterHdl(); |
| } |
| } |
| break; |
| |
| case TYP_SETREFPAGEFLD: |
| { |
| bValue = sal_False; |
| aValueFT.SetText( SW_RESSTR( STR_OFFSET ) ); |
| |
| if ( IsFldEdit() || pBox ) // Nur bei Interaktion mit Maus |
| aNameED.SetText( aEmptyStr ); |
| |
| if ( nSelPos != 0 && nSelPos != LISTBOX_ENTRY_NOTFOUND ) |
| { |
| bValue = sal_True; // SubType OFF - kennt keinen Offset |
| if ( GetCurField() != NULL && IsFldEdit() ) |
| aValueED.SetText( String::CreateFromInt32( ( (SwRefPageSetField*) GetCurField() )->GetOffset() ) ); |
| } |
| } |
| break; |
| |
| case TYP_GETREFPAGEFLD: |
| aNameED.SetText( aEmptyStr ); |
| aValueED.SetText( aEmptyStr ); |
| break; |
| } |
| |
| aNumFormatLB.Show( bNumFmt ); |
| aFormatLB.Show( !bNumFmt ); |
| |
| if ( IsFldEdit() ) |
| bName = sal_False; |
| |
| aFormatLB.Enable( bFormat ); |
| aFormatFT.Enable( bFormat | bNumFmt ); |
| aNameFT.Enable( bName ); |
| aNameED.Enable( bName ); |
| aValueFT.Enable( bValue ); |
| aValueED.Enable( bValue ); |
| |
| Size aSz( aFormatLB.GetSizePixel() ); |
| if ( bChapterLevel ) |
| aSz.Height() = aFormatLB.LogicToPixel( Size( 1, 94 ), MAP_APPFONT ).Height(); |
| else |
| aSz.Height() = aFormatLB.LogicToPixel( Size( 1, 123 ), MAP_APPFONT ).Height(); |
| aFormatLB.SetSizePixel( aSz ); |
| |
| aInvisibleCB.Show( !bSeparator ); |
| aSeparatorFT.Show( bSeparator ); |
| aSeparatorED.Show( bSeparator ); |
| aChapterHeaderFT.Show( bChapterLevel ); |
| aChapterLevelFT.Show( bChapterLevel ); |
| aChapterLevelLB.Show( bChapterLevel ); |
| aInvisibleCB.Enable( bInvisible ); |
| |
| ModifyHdl(); // Anwenden/Einfuegen/Loeschen Status update |
| |
| aNumFormatLB.SetUpdateMode( sal_True ); |
| aFormatLB.SetUpdateMode( sal_True ); |
| |
| if ( aSelectionLB.IsCallAddSelection() ) |
| { |
| nTypeId = (sal_uInt16) (sal_uLong) aTypeLB.GetEntryData( GetTypeSel() ); |
| |
| switch ( nTypeId ) |
| { |
| case TYP_FORMELFLD: |
| { |
| nSelPos = aSelectionLB.GetSelectEntryPos(); |
| |
| if ( nSelPos != LISTBOX_ENTRY_NOTFOUND ) |
| nSelPos = (sal_uInt16) (sal_uLong) aSelectionLB.GetEntryData( nSelPos ); |
| |
| if ( nSelPos != LISTBOX_ENTRY_NOTFOUND && pBox && !bInit ) |
| { |
| aValueED.ReplaceSelected( aSelectionLB.GetSelectEntry() ); |
| ModifyHdl(); |
| } |
| } |
| break; |
| } |
| aSelectionLB.ResetCallAddSelection(); |
| } |
| return 0; |
| } |
| |
| /*-------------------------------------------------------------------- |
| Beschreibung: Typen in der SelectionBox erneuern |
| --------------------------------------------------------------------*/ |
| |
| void SwFldVarPage::UpdateSubType() |
| { |
| SetSelectionSel( aSelectionLB.GetSelectEntryPos() ); |
| |
| String sOldSel; |
| if ( GetSelectionSel() != LISTBOX_ENTRY_NOTFOUND ) |
| sOldSel = aSelectionLB.GetEntry( GetSelectionSel() ); |
| |
| // Auswahl-Listbox fuellen |
| aSelectionLB.SetUpdateMode( sal_False ); |
| aSelectionLB.Clear(); |
| |
| const sal_uInt16 nTypeId = (sal_uInt16) (sal_uLong) aTypeLB.GetEntryData( GetTypeSel() ); |
| SvStringsDtor aList; |
| GetFldMgr().GetSubTypes( nTypeId, aList ); |
| const sal_uInt16 nCount = aList.Count(); |
| for ( sal_uInt16 i = 0; i < nCount; ++i ) |
| { |
| if ( nTypeId != TYP_INPUTFLD || i ) |
| { |
| if ( !IsFldEdit() ) |
| { |
| const sal_uInt16 nPos = aSelectionLB.InsertEntry( *aList[i] ); |
| aSelectionLB.SetEntryData( nPos, reinterpret_cast< void* >( i ) ); |
| } |
| else |
| { |
| sal_Bool bInsert = sal_False; |
| |
| switch ( nTypeId ) |
| { |
| case TYP_INPUTFLD: |
| if ( GetCurField() != NULL && *aList[i] == GetCurField()->GetPar1() ) |
| bInsert = sal_True; |
| break; |
| |
| case TYP_FORMELFLD: |
| bInsert = sal_True; |
| break; |
| |
| case TYP_GETFLD: |
| if ( GetCurField() != NULL && *aList[i] == ( (SwFormulaField*) GetCurField() )->GetFormula() ) |
| bInsert = sal_True; |
| break; |
| |
| case TYP_SETFLD: |
| case TYP_USERFLD: |
| if ( GetCurField() != NULL && *aList[i] == GetCurField()->GetTyp()->GetName() ) |
| { |
| bInsert = sal_True; |
| if ( GetCurField()->GetSubType() & nsSwExtendedSubType::SUB_INVISIBLE ) |
| aInvisibleCB.Check(); |
| } |
| break; |
| |
| case TYP_SETREFPAGEFLD: |
| { |
| if ( GetCurField() != NULL |
| && ( ( ( (SwRefPageSetField*) GetCurField() )->IsOn() && i ) |
| || ( !( (SwRefPageSetField*) GetCurField() )->IsOn() && !i ) ) ) |
| { |
| sOldSel = *aList[i]; |
| } |
| |
| // Alle Eintr?ge zur Auswahl zulassen: |
| const sal_uInt16 nPos = aSelectionLB.InsertEntry( *aList[i] ); |
| aSelectionLB.SetEntryData( nPos, reinterpret_cast< void* >( i ) ); |
| } |
| break; |
| |
| default: |
| if ( GetCurField() != NULL && *aList[i] == GetCurField()->GetPar1() ) |
| bInsert = sal_True; |
| break; |
| } |
| |
| if ( bInsert ) |
| { |
| const sal_uInt16 nPos = aSelectionLB.InsertEntry( *aList[i] ); |
| aSelectionLB.SetEntryData( nPos, reinterpret_cast< void* >( i ) ); |
| if ( nTypeId != TYP_FORMELFLD ) |
| break; |
| } |
| } |
| } |
| } |
| |
| const sal_Bool bEnable = aSelectionLB.GetEntryCount() != 0; |
| ListBox *pLB = 0; |
| |
| if ( bEnable ) |
| { |
| aSelectionLB.SelectEntry( sOldSel ); |
| if ( !aSelectionLB.GetSelectEntryCount() ) |
| { |
| aSelectionLB.SelectEntryPos( 0 ); |
| pLB = &aSelectionLB; // Alle Controls neu initialisieren |
| } |
| } |
| |
| aSelectionLB.Enable( bEnable ); |
| aSelectionFT.Enable( bEnable ); |
| |
| SubTypeHdl( pLB ); |
| aSelectionLB.SetUpdateMode( sal_True ); |
| } |
| |
| /*-------------------------------------------------------------------- |
| Beschreibung: |
| --------------------------------------------------------------------*/ |
| |
| sal_uInt16 SwFldVarPage::FillFormatLB(sal_uInt16 nTypeId) |
| { |
| String sOldSel; |
| const sal_uInt16 nFormatSel = aFormatLB.GetSelectEntryPos(); |
| if ( nFormatSel != LISTBOX_ENTRY_NOTFOUND ) |
| sOldSel = aFormatLB.GetEntry( nFormatSel ); |
| |
| String sOldNumSel; |
| sal_uLong nOldNumFormat = 0; |
| sal_uInt16 nNumFormatSel = aNumFormatLB.GetSelectEntryPos(); |
| if ( nNumFormatSel != LISTBOX_ENTRY_NOTFOUND ) |
| { |
| sOldNumSel = aNumFormatLB.GetEntry( nNumFormatSel ); |
| nOldNumFormat = aNumFormatLB.GetFormat(); |
| } |
| |
| // Format-Listbox fuellen |
| aFormatLB.Clear(); |
| aNumFormatLB.Clear(); |
| bool bSpecialFmt = false; |
| |
| if ( TYP_GETREFPAGEFLD != nTypeId ) |
| { |
| if ( GetCurField() != NULL && IsFldEdit() ) |
| { |
| bSpecialFmt = GetCurField()->GetFormat() == SAL_MAX_UINT32; |
| |
| if ( !bSpecialFmt ) |
| { |
| aNumFormatLB.SetDefFormat( GetCurField()->GetFormat() ); |
| sOldNumSel = aEmptyStr; |
| } |
| else if ( nTypeId == TYP_GETFLD || nTypeId == TYP_FORMELFLD ) |
| { |
| aNumFormatLB.SetFormatType( NUMBERFORMAT_NUMBER ); |
| } |
| } |
| else |
| { |
| if ( nOldNumFormat && nOldNumFormat != ULONG_MAX ) |
| aNumFormatLB.SetDefFormat( nOldNumFormat ); |
| else |
| aNumFormatLB.SetFormatType( NUMBERFORMAT_NUMBER ); |
| } |
| } |
| |
| switch ( nTypeId ) |
| { |
| case TYP_USERFLD: |
| { |
| if ( !IsFldEdit() || bSpecialFmt ) |
| { |
| sal_uInt16 nPos = aNumFormatLB.InsertEntry( SW_RESSTR( FMT_MARK_TEXT ), 0 ); |
| aNumFormatLB.SetEntryData( nPos, (void *) ULONG_MAX ); |
| nPos = aNumFormatLB.InsertEntry( SW_RESSTR( FMT_USERVAR_CMD ), 1 ); |
| aNumFormatLB.SetEntryData( nPos, (void *) ULONG_MAX ); |
| } |
| } |
| break; |
| |
| case TYP_SETFLD: |
| { |
| if ( !IsFldEdit() || bSpecialFmt ) |
| { |
| sal_uInt16 nPos = aNumFormatLB.InsertEntry( SW_RESSTR( FMT_SETVAR_TEXT ), 0 ); |
| aNumFormatLB.SetEntryData( nPos, (void *) ULONG_MAX ); |
| } |
| } |
| break; |
| |
| case TYP_FORMELFLD: |
| { |
| sal_uInt16 nPos = aNumFormatLB.InsertEntry( SW_RESSTR( FMT_GETVAR_NAME ), 0 ); |
| aNumFormatLB.SetEntryData( nPos, (void *) ULONG_MAX ); |
| } |
| break; |
| |
| case TYP_GETFLD: |
| { |
| sal_uInt16 nPos = aNumFormatLB.InsertEntry( SW_RESSTR( FMT_GETVAR_NAME ), 0 ); |
| aNumFormatLB.SetEntryData( nPos, (void *) ULONG_MAX ); |
| } |
| break; |
| } |
| |
| if ( IsFldEdit() && bSpecialFmt ) |
| { |
| if ( nTypeId == TYP_USERFLD && ( GetCurField()->GetSubType() & nsSwExtendedSubType::SUB_CMD ) ) |
| aNumFormatLB.SelectEntryPos( 1 ); |
| else |
| aNumFormatLB.SelectEntryPos( 0 ); |
| } |
| else |
| { |
| if ( !nOldNumFormat && ( nNumFormatSel = aNumFormatLB.GetEntryPos( sOldNumSel ) ) != LISTBOX_ENTRY_NOTFOUND ) |
| aNumFormatLB.SelectEntryPos( nNumFormatSel ); |
| else if ( nOldNumFormat && nOldNumFormat == ULONG_MAX ) |
| aNumFormatLB.SelectEntry( sOldSel ); |
| } |
| |
| const sal_uInt16 nSize = GetFldMgr().GetFormatCount(nTypeId, sal_False, IsFldDlgHtmlMode()); |
| |
| for ( sal_uInt16 i = 0; i < nSize; i++ ) |
| { |
| const sal_uInt16 nPos = aFormatLB.InsertEntry( GetFldMgr().GetFormatStr( nTypeId, i ) ); |
| const sal_uInt16 nFldId = GetFldMgr().GetFormatId( nTypeId, i ); |
| aFormatLB.SetEntryData( nPos, reinterpret_cast< void* >( nFldId ) ); |
| if ( IsFldEdit() |
| && GetCurField() != NULL |
| && nFldId == GetCurField()->GetFormat() ) |
| { |
| aFormatLB.SelectEntryPos( nPos ); |
| } |
| } |
| |
| if ( nSize && ( !IsFldEdit() || !aFormatLB.GetSelectEntryCount() ) ) |
| { |
| aFormatLB.SelectEntry( sOldSel ); |
| |
| if ( !aFormatLB.GetSelectEntryCount() ) |
| { |
| aFormatLB.SelectEntry( SW_RESSTR( FMT_NUM_PAGEDESC ) ); |
| if ( !aFormatLB.GetSelectEntryCount() ) |
| { |
| aFormatLB.SelectEntry( SW_RESSTR( FMT_NUM_ARABIC ) ); |
| if ( !aFormatLB.GetSelectEntryCount() ) |
| aFormatLB.SelectEntryPos( 0 ); |
| } |
| } |
| } |
| |
| return nSize; |
| } |
| |
| /*-------------------------------------------------------------------- |
| Beschreibung: Modify |
| --------------------------------------------------------------------*/ |
| |
| IMPL_LINK( SwFldVarPage, ModifyHdl, Edit *, EMPTYARG ) |
| { |
| String sValue(aValueED.GetText()); |
| sal_Bool bHasValue = sValue.Len() != 0; |
| sal_uInt16 nTypeId = (sal_uInt16)(sal_uLong)aTypeLB.GetEntryData(GetTypeSel()); |
| sal_Bool bInsert = sal_False, bApply = sal_False, bDelete = sal_False; |
| |
| String sName( aNameED.GetText() ); |
| xub_StrLen nLen = sName.Len(); |
| |
| switch( nTypeId ) |
| { |
| case TYP_DDEFLD: |
| case TYP_USERFLD: |
| case TYP_SETFLD: |
| case TYP_SEQFLD: |
| SwCalc::IsValidVarName( sName, &sName ); |
| if( sName.Len() != nLen ) |
| { |
| nLen = sName.Len(); |
| Selection aSel(aNameED.GetSelection()); |
| aNameED.SetText( sName ); |
| aNameED.SetSelection( aSel ); // Cursorpos restaurieren |
| } |
| break; |
| } |
| |
| |
| // Buttons ueberpruefen |
| switch (nTypeId) |
| { |
| case TYP_DDEFLD: |
| if( nLen ) |
| { |
| // Gibts schon einen entsprechenden Type |
| bInsert = bApply = sal_True; |
| |
| SwFieldType* pType = GetFldMgr().GetFldType(RES_DDEFLD, sName); |
| |
| SwWrtShell *pSh = GetWrtShell(); |
| if(!pSh) |
| pSh = ::GetActiveWrtShell(); |
| if(pSh && pType) |
| bDelete = !pSh->IsUsed( *pType ); |
| } |
| break; |
| |
| case TYP_USERFLD: |
| if( nLen ) |
| { |
| // Gibts schon einen entsprechenden Type |
| SwFieldType* pType = GetFldMgr().GetFldType(RES_USERFLD, sName); |
| |
| SwWrtShell *pSh = GetWrtShell(); |
| if(!pSh) |
| pSh = ::GetActiveWrtShell(); |
| if(pSh && pType) |
| bDelete = !pSh->IsUsed( *pType ); |
| |
| pType = GetFldMgr().GetFldType(RES_SETEXPFLD, sName); |
| if (!pType) // Kein Namenskonflikt mit Variablen |
| { |
| // Benutzerfelder duerfen auch ohne Inhalt eingefuegt werden! |
| // Bug #56845 |
| bInsert = bApply = sal_True; |
| } |
| } |
| break; |
| |
| default: |
| bInsert = sal_True; |
| |
| if (nTypeId == TYP_SETFLD || nTypeId == TYP_SEQFLD) |
| { |
| SwSetExpFieldType* pFldType = (SwSetExpFieldType*) |
| GetFldMgr().GetFldType(RES_SETEXPFLD, sName); |
| |
| if (pFldType) |
| { |
| |
| SwWrtShell *pSh = GetWrtShell(); |
| if(!pSh) |
| pSh = ::GetActiveWrtShell(); |
| if(pSh) |
| { |
| const SwFldTypes* p = pSh->GetDoc()->GetFldTypes(); |
| sal_uInt16 i; |
| |
| for (i = 0; i < INIT_FLDTYPES; i++) |
| { |
| SwFieldType* pType = (*p)[ i ]; |
| if (pType == pFldType) |
| break; |
| } |
| |
| if (i >= INIT_FLDTYPES && !pSh->IsUsed(*pFldType)) |
| bDelete = sal_True; |
| |
| if (nTypeId == TYP_SEQFLD && !(pFldType->GetType() & nsSwGetSetExpType::GSE_SEQ)) |
| bInsert = sal_False; |
| |
| if (nTypeId == TYP_SETFLD && (pFldType->GetType() & nsSwGetSetExpType::GSE_SEQ)) |
| bInsert = sal_False; |
| } |
| } |
| if (GetFldMgr().GetFldType(RES_USERFLD, sName)) |
| bInsert = sal_False; |
| } |
| |
| if( !nLen && ( nTypeId == TYP_SETFLD || |
| (!IsFldEdit() && nTypeId == TYP_GETFLD ) ) ) |
| bInsert = sal_False; |
| |
| if( (nTypeId == TYP_SETFLD || nTypeId == TYP_FORMELFLD) && |
| !bHasValue ) |
| bInsert = sal_False; |
| break; |
| } |
| |
| aNewDelTBX.EnableItem(BT_VARAPPLY, bApply); |
| aNewDelTBX.EnableItem(BT_VARDELETE, bDelete); |
| EnableInsert(bInsert); |
| |
| return 0; |
| } |
| |
| /*-------------------------------------------------------------------- |
| Beschreibung: |
| --------------------------------------------------------------------*/ |
| |
| IMPL_LINK( SwFldVarPage, TBClickHdl, ToolBox *, pBox ) |
| { |
| sal_uInt16 nTypeId = (sal_uInt16)(sal_uLong)aTypeLB.GetEntryData(GetTypeSel()); |
| |
| switch (pBox->GetCurItemId()) |
| { |
| case BT_VARDELETE: |
| { |
| if( nTypeId == TYP_USERFLD ) |
| GetFldMgr().RemoveFldType(RES_USERFLD, aSelectionLB.GetSelectEntry()); |
| else |
| { |
| sal_uInt16 nWhich; |
| |
| switch(nTypeId) |
| { |
| case TYP_SETFLD: |
| case TYP_SEQFLD: |
| nWhich = RES_SETEXPFLD; |
| break; |
| default: |
| nWhich = RES_DDEFLD; |
| break; |
| } |
| |
| GetFldMgr().RemoveFldType(nWhich, aSelectionLB.GetSelectEntry()); |
| } |
| |
| UpdateSubType(); |
| SwWrtShell *pSh = GetWrtShell(); |
| if(!pSh) |
| pSh = ::GetActiveWrtShell(); |
| if(pSh) |
| { |
| pSh->SetModified(); |
| } |
| } |
| break; |
| |
| case BT_VARAPPLY: |
| { |
| String sName(aNameED.GetText()), sValue(aValueED.GetText()); |
| SwFieldType* pType = 0; |
| sal_uInt16 nId = 0; |
| sal_uInt16 nNumFormatPos = aNumFormatLB.GetSelectEntryPos(); |
| |
| switch (nTypeId) |
| { |
| case TYP_USERFLD: nId = RES_USERFLD; break; |
| case TYP_DDEFLD: nId = RES_DDEFLD; break; |
| case TYP_SETFLD: nId = RES_SETEXPFLD;break; |
| } |
| pType = GetFldMgr().GetFldType(nId, sName); |
| |
| sal_uLong nFormat = aFormatLB.GetSelectEntryPos(); |
| if (nFormat != LISTBOX_ENTRY_NOTFOUND) |
| nFormat = (sal_uLong)aFormatLB.GetEntryData((sal_uInt16)nFormat); |
| |
| if (pType) // Aendern |
| { |
| SwWrtShell *pSh = GetWrtShell(); |
| if(!pSh) |
| pSh = ::GetActiveWrtShell(); |
| if(pSh) |
| { |
| pSh->StartAllAction(); |
| |
| if (nTypeId == TYP_USERFLD) |
| { |
| if (nNumFormatPos != LISTBOX_ENTRY_NOTFOUND) |
| { |
| sal_uLong nFmt = nNumFormatPos == 0 ? 0 : aNumFormatLB.GetFormat(); |
| if (nFmt) |
| { // Sprache auf Office-Sprache umstellen, da String im Office |
| // Format vom Kalkulator erwartet wird und so in den Dlg |
| // eingegeben werden sollte |
| nFmt = SwValueField::GetSystemFormat(pSh->GetNumberFormatter(), nFmt); |
| } |
| ((SwUserFieldType*)pType)->SetContent(aValueED.GetText(), nFmt); |
| ((SwUserFieldType*)pType)->SetType( |
| nNumFormatPos == 0 ? nsSwGetSetExpType::GSE_STRING : nsSwGetSetExpType::GSE_EXPR ); |
| } |
| } |
| else |
| { |
| if (nFormat != LISTBOX_ENTRY_NOTFOUND) |
| { |
| //JP 28.08.95: DDE-Topics/-Items koennen Blanks in ihren |
| // Namen haben! Wird hier noch nicht beachtet. |
| sal_uInt16 nTmpPos = sValue.SearchAndReplace( ' ', sfx2::cTokenSeperator ); |
| sValue.SearchAndReplace( ' ', sfx2::cTokenSeperator, nTmpPos ); |
| ((SwDDEFieldType*)pType)->SetCmd(sValue); |
| ((SwDDEFieldType*)pType)->SetType((sal_uInt16)nFormat); |
| } |
| } |
| pType->UpdateFlds(); |
| |
| pSh->EndAllAction(); |
| } |
| } |
| else // Neu |
| { |
| if(nTypeId == TYP_USERFLD) |
| { |
| SwWrtShell *pSh = GetWrtShell(); |
| if(!pSh) |
| pSh = ::GetActiveWrtShell(); |
| if(pSh) |
| { |
| SwUserFieldType aType( pSh->GetDoc(), sName ); |
| |
| if (nNumFormatPos != LISTBOX_ENTRY_NOTFOUND) |
| { |
| aType.SetType(nNumFormatPos == 0 ? nsSwGetSetExpType::GSE_STRING : nsSwGetSetExpType::GSE_EXPR); |
| aType.SetContent( sValue, nNumFormatPos == 0 ? 0 : aNumFormatLB.GetFormat() ); |
| aSelectionLB.InsertEntry(sName); |
| aSelectionLB.SelectEntry(sName); |
| GetFldMgr().InsertFldType( aType ); // Userfld Neu |
| } |
| } |
| } |
| else |
| { |
| if (nFormat != LISTBOX_ENTRY_NOTFOUND) |
| { |
| //JP 28.08.95: DDE-Topics/-Items koennen Blanks in ihren |
| // Namen haben! Wird hier noch nicht beachtet. |
| sal_uInt16 nTmpPos = sValue.SearchAndReplace( ' ', sfx2::cTokenSeperator ); |
| sValue.SearchAndReplace( ' ', sfx2::cTokenSeperator, nTmpPos ); |
| |
| SwDDEFieldType aType(sName, sValue, (sal_uInt16)nFormat); |
| aSelectionLB.InsertEntry(sName); |
| aSelectionLB.SelectEntry(sName); |
| GetFldMgr().InsertFldType(aType); // DDE-Feld Neu |
| } |
| } |
| } |
| if (IsFldEdit()) |
| GetFldMgr().GetCurFld(); // FieldManager Updaten |
| |
| UpdateSubType(); |
| } |
| break; |
| } |
| |
| return sal_True; |
| } |
| |
| /*-------------------------------------------------------------------- |
| Beschreibung: |
| --------------------------------------------------------------------*/ |
| |
| IMPL_LINK( SwFldVarPage, ChapterHdl, ListBox *, EMPTYARG ) |
| { |
| sal_Bool bEnable = aChapterLevelLB.GetSelectEntryPos() != 0; |
| |
| aSeparatorED.Enable(bEnable); |
| aSeparatorFT.Enable(bEnable); |
| SeparatorHdl(); |
| |
| return 0; |
| } |
| |
| /*-------------------------------------------------------------------- |
| Beschreibung: |
| --------------------------------------------------------------------*/ |
| |
| IMPL_LINK( SwFldVarPage, SeparatorHdl, Edit *, EMPTYARG ) |
| { |
| sal_Bool bEnable = aSeparatorED.GetText().Len() != 0 || |
| aChapterLevelLB.GetSelectEntryPos() == 0; |
| EnableInsert(bEnable); |
| |
| return 0; |
| } |
| |
| /*-------------------------------------------------------------------- |
| Beschreibung: |
| --------------------------------------------------------------------*/ |
| |
| sal_Bool SwFldVarPage::FillItemSet(SfxItemSet& ) |
| { |
| sal_uInt16 nTypeId = (sal_uInt16)(sal_uLong)aTypeLB.GetEntryData(GetTypeSel()); |
| |
| String aVal(aValueED.GetText()); |
| String aName(aNameED.GetText()); |
| |
| sal_uInt16 nSubType = aSelectionLB.GetSelectEntryPos(); |
| if(nSubType == LISTBOX_ENTRY_NOTFOUND) |
| nSubType = 0; |
| else |
| nSubType = (sal_uInt16)(sal_uLong)aSelectionLB.GetEntryData(nSubType); |
| |
| sal_uLong nFormat; |
| |
| if (!aNumFormatLB.IsVisible()) |
| { |
| nFormat = aFormatLB.GetSelectEntryPos(); |
| |
| if(nFormat == LISTBOX_ENTRY_NOTFOUND) |
| nFormat = 0; |
| else |
| nFormat = (sal_uLong)aFormatLB.GetEntryData((sal_uInt16)nFormat); |
| } |
| else |
| { |
| nFormat = aNumFormatLB.GetFormat(); |
| |
| if (nFormat && nFormat != ULONG_MAX && aNumFormatLB.IsAutomaticLanguage()) |
| { |
| // Sprache auf Office-Sprache umstellen, da String im Office- |
| // Format vom Kalkulator erwartet wird und so in den Dlg |
| // eingegeben werden sollte |
| SwWrtShell *pSh = GetWrtShell(); |
| if(!pSh) |
| pSh = ::GetActiveWrtShell(); |
| if(pSh) |
| { |
| nFormat = SwValueField::GetSystemFormat(pSh->GetNumberFormatter(), nFormat); |
| } |
| } |
| } |
| sal_Unicode cSeparator = ' '; |
| switch (nTypeId) |
| { |
| case TYP_USERFLD: |
| { |
| nSubType = (nFormat == ULONG_MAX) ? nsSwGetSetExpType::GSE_STRING : nsSwGetSetExpType::GSE_EXPR; |
| |
| if (nFormat == ULONG_MAX && aNumFormatLB.GetSelectEntry() == SW_RESSTR(FMT_USERVAR_CMD)) |
| nSubType |= nsSwExtendedSubType::SUB_CMD; |
| |
| if (aInvisibleCB.IsChecked()) |
| nSubType |= nsSwExtendedSubType::SUB_INVISIBLE; |
| break; |
| } |
| case TYP_FORMELFLD: |
| { |
| nSubType = nsSwGetSetExpType::GSE_FORMULA; |
| if (aNumFormatLB.IsVisible() && nFormat == ULONG_MAX) |
| nSubType |= nsSwExtendedSubType::SUB_CMD; |
| break; |
| } |
| case TYP_GETFLD: |
| { |
| nSubType &= 0xff00; |
| if (aNumFormatLB.IsVisible() && nFormat == ULONG_MAX) |
| nSubType |= nsSwExtendedSubType::SUB_CMD; |
| break; |
| } |
| case TYP_INPUTFLD: |
| { |
| SwFieldType* pType = GetFldMgr().GetFldType(RES_USERFLD, aName); |
| nSubType = static_cast< sal_uInt16 >((nSubType & 0xff00) | ((pType) ? INP_USR : INP_VAR)); |
| break; |
| } |
| |
| case TYP_SETFLD: |
| { |
| if (IsFldDlgHtmlMode()) |
| { |
| nSubType = 0x0100; |
| nSubType = (nSubType & 0xff00) | nsSwGetSetExpType::GSE_STRING; |
| } |
| else |
| nSubType = (nSubType & 0xff00) | ((nFormat == ULONG_MAX) ? nsSwGetSetExpType::GSE_STRING : nsSwGetSetExpType::GSE_EXPR); |
| |
| if (aInvisibleCB.IsChecked()) |
| nSubType |= nsSwExtendedSubType::SUB_INVISIBLE; |
| break; |
| } |
| case TYP_SEQFLD: |
| { |
| // nSubType = nsSwGetSetExpType::GSE_SEQ; // nsSwGetSetExpType::GSE_SEQ wird im Fldmgr fest gesetzt, kann also entfallen |
| nSubType = aChapterLevelLB.GetSelectEntryPos(); |
| if (nSubType == 0) |
| nSubType = 0x7f; |
| else |
| { |
| nSubType--; |
| String sSeparator(aSeparatorED.GetText().GetChar(0)); |
| cSeparator = sSeparator.Len() ? sSeparator.GetChar(0) : ' '; |
| //nSubType |= (sal_uInt16)(((sal_uInt8)) << 8); |
| } |
| break; |
| } |
| case TYP_GETREFPAGEFLD: |
| if( SVX_NUM_CHAR_SPECIAL == nFormat ) |
| aVal = aValueED.GetText(); |
| break; |
| } |
| |
| if (!IsFldEdit() || |
| aNameED.GetSavedValue() != aNameED.GetText() || |
| aValueED.GetSavedValue() != aValueED.GetText() || |
| aSelectionLB.GetSavedValue() != aSelectionLB.GetSelectEntryPos() || |
| aFormatLB.GetSavedValue() != aFormatLB.GetSelectEntryPos() || |
| nOldFormat != aNumFormatLB.GetFormat() || |
| aInvisibleCB.GetState() != aInvisibleCB.GetSavedValue() || |
| aChapterLevelLB.GetSavedValue() != aChapterLevelLB.GetSelectEntryPos() || |
| aSeparatorED.GetSavedValue() != aSeparatorED.GetText()) |
| { |
| InsertFld( nTypeId, nSubType, aName, aVal, nFormat, |
| cSeparator, aNumFormatLB.IsAutomaticLanguage() ); |
| } |
| |
| UpdateSubType(); |
| |
| return sal_False; |
| } |
| |
| |
| /*-------------------------------------------------------------------- |
| Beschreibung: |
| --------------------------------------------------------------------*/ |
| |
| SfxTabPage* SwFldVarPage::Create( Window* pParent, |
| const SfxItemSet& rAttrSet ) |
| { |
| return ( new SwFldVarPage( pParent, rAttrSet ) ); |
| } |
| |
| /*-------------------------------------------------------------------- |
| Beschreibung: |
| --------------------------------------------------------------------*/ |
| |
| sal_uInt16 SwFldVarPage::GetGroup() |
| { |
| return GRP_VAR; |
| } |
| |
| /*-------------------------------------------------------------------- |
| Beschreibung: |
| --------------------------------------------------------------------*/ |
| |
| SelectionListBox::SelectionListBox( SwFldVarPage* pDialog, const ResId& rResId ) : |
| ListBox (pDialog, rResId), |
| pDlg (pDialog), |
| bCallAddSelection(sal_False) |
| { |
| } |
| |
| /*-------------------------------------------------------------------- |
| Beschreibung: |
| --------------------------------------------------------------------*/ |
| |
| long SelectionListBox::PreNotify( NotifyEvent& rNEvt ) |
| { |
| long nHandled = ListBox::PreNotify( rNEvt ); |
| //sal_Bool bAddSel = sal_False; |
| if ( rNEvt.GetType() == EVENT_KEYUP ) |
| { |
| const KeyEvent* pKEvt = rNEvt.GetKeyEvent(); |
| const KeyCode aKeyCode = pKEvt->GetKeyCode(); |
| const sal_uInt16 nModifier = aKeyCode.GetModifier(); |
| if( aKeyCode.GetCode() == KEY_SPACE && !nModifier) |
| // bAddSel = sal_True; |
| bCallAddSelection = sal_True; |
| } |
| if ( rNEvt.GetType() == EVENT_MOUSEBUTTONDOWN ) |
| { |
| const MouseEvent* pMEvt = rNEvt.GetMouseEvent(); |
| |
| if (pMEvt && (pMEvt->IsMod1() || pMEvt->IsMod2())) // Alt oder Ctrl |
| //bAddSel = sal_True; |
| bCallAddSelection = sal_True; |
| } |
| |
| // if (bAddSel) |
| // pDlg->AddSelection(this); |
| |
| return nHandled; |
| } |
| /* -----------------12.01.99 11:14------------------- |
| * |
| * --------------------------------------------------*/ |
| void SwFldVarPage::FillUserData() |
| { |
| String sData(String::CreateFromAscii(USER_DATA_VERSION)); |
| sData += ';'; |
| sal_uInt16 nTypeSel = aTypeLB.GetSelectEntryPos(); |
| if( LISTBOX_ENTRY_NOTFOUND == nTypeSel ) |
| nTypeSel = USHRT_MAX; |
| else |
| nTypeSel = (sal_uInt16)(sal_uLong)aTypeLB.GetEntryData( nTypeSel ); |
| sData += String::CreateFromInt32( nTypeSel ); |
| SetUserData(sData); |
| } |
| |
