Files
libreoffice/sw/source/core/fields/scrptfld.cxx
Rüdiger Timm 0b9b1e055f INTEGRATION: CWS changefileheader (1.11.34); FILE MERGED
2008/04/01 15:57:06 thb 1.11.34.3: #i85898# Stripping all external header guards
2008/04/01 12:54:06 thb 1.11.34.2: #i85898# Stripping all external header guards
2008/03/31 16:54:05 rt 1.11.34.1: #i87441# Change license header to LPGL v3.
2008-04-10 12:59:38 +00:00

157 lines
4.2 KiB
C++

/*************************************************************************
*
* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
*
* Copyright 2008 by Sun Microsystems, Inc.
*
* OpenOffice.org - a multi-platform office productivity suite
*
* $RCSfile: scrptfld.cxx,v $
* $Revision: 1.12 $
*
* This file is part of OpenOffice.org.
*
* OpenOffice.org is free software: you can redistribute it and/or modify
* it under the terms of the GNU Lesser General Public License version 3
* only, as published by the Free Software Foundation.
*
* OpenOffice.org 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 version 3 for more details
* (a copy is included in the LICENSE file that accompanied this code).
*
* You should have received a copy of the GNU Lesser General Public License
* version 3 along with OpenOffice.org. If not, see
* <http://www.openoffice.org/license.html>
* for a copy of the LGPLv3 License.
*
************************************************************************/
// MARKER(update_precomp.py): autogen include statement, do not remove
#include "precompiled_sw.hxx"
#include <docufld.hxx>
#ifndef _UNOFLDMID_H
#include <unofldmid.h>
#endif
#ifndef _COMCORE_HRC
#include <comcore.hrc>
#endif
#include <tools/resid.hxx>
using namespace ::com::sun::star;
using ::rtl::OUString;
/*--------------------------------------------------------------------
Beschreibung: ScriptField
--------------------------------------------------------------------*/
SwScriptFieldType::SwScriptFieldType( SwDoc* pD )
: SwFieldType( RES_SCRIPTFLD ), pDoc( pD )
{}
SwFieldType* SwScriptFieldType::Copy() const
{
return new SwScriptFieldType( pDoc );
}
/*--------------------------------------------------------------------
Beschreibung: SwScriptField
--------------------------------------------------------------------*/
SwScriptField::SwScriptField( SwScriptFieldType* pInitType,
const String& rType, const String& rCode,
BOOL bURL )
: SwField( pInitType ), sType( rType ), sCode( rCode ), bCodeURL( bURL )
{
}
String SwScriptField::GetDescription() const
{
return SW_RES(STR_SCRIPT);
}
String SwScriptField::Expand() const
{
return aEmptyStr;
}
SwField* SwScriptField::Copy() const
{
return new SwScriptField( (SwScriptFieldType*)GetTyp(), sType, sCode, bCodeURL );
}
/*--------------------------------------------------------------------
Beschreibung: Type setzen
--------------------------------------------------------------------*/
void SwScriptField::SetPar1( const String& rStr )
{
sType = rStr;
}
const String& SwScriptField::GetPar1() const
{
return sType;
}
/*--------------------------------------------------------------------
Beschreibung: Code setzen
--------------------------------------------------------------------*/
void SwScriptField::SetPar2( const String& rStr )
{
sCode = rStr;
}
String SwScriptField::GetPar2() const
{
return sCode;
}
/*-----------------05.03.98 15:00-------------------
--------------------------------------------------*/
BOOL SwScriptField::QueryValue( uno::Any& rAny, USHORT nWhichId ) const
{
switch( nWhichId )
{
case FIELD_PROP_PAR1:
rAny <<= OUString( sType );
break;
case FIELD_PROP_PAR2:
rAny <<= OUString( sCode );
break;
case FIELD_PROP_BOOL1:
rAny.setValue(&bCodeURL, ::getBooleanCppuType());
break;
default:
DBG_ERROR("illegal property");
}
return TRUE;
}
/*-----------------05.03.98 15:00-------------------
--------------------------------------------------*/
BOOL SwScriptField::PutValue( const uno::Any& rAny, USHORT nWhichId )
{
switch( nWhichId )
{
case FIELD_PROP_PAR1:
::GetString( rAny, sType );
break;
case FIELD_PROP_PAR2:
::GetString( rAny, sCode );
break;
case FIELD_PROP_BOOL1:
bCodeURL = *(sal_Bool*)rAny.getValue();
break;
default:
DBG_ERROR("illegal property");
}
return TRUE;
}