LibreOffice/core
1
0
Fork 0
mirror of https://github.com/LibreOffice/core.git synced 2025-08-06 17:34:24 +00:00
Code Issues Packages Projects Releases Wiki Activity
Files
f78a20ea166123c6891c06b50b6a2394e4fcae06
core/svx/source/form/fmcontrollayout.cxx
Michael Weghorn 7247f3ad59 tdf#153343 Show settings for the actual default font in control properties 
Since

    commit ea36e0502c
    Date:   Tue Oct 4 12:42:33 2022 +0100

        tdf#150786 use a 'standard' theme for form controls

, form controls in Writer/Calc/Impress documents are
supposed to no longer make use of the system style,
but use style settings independent of the platform
and system style/theme.

Edits in forms actually use the standard font (set
in `ImplStyleData::SetStandardStyles`) by default
since that commit.

However, the font dialog in the control properties
was still showing data for the application default
font that depends on the system style for font
attributes not explicitly set for the control, which
was incorrect and inconsistent with the visual
appearance of the font actually used.

Take `PROPERTY_STANDARD_THEME` introduced in the
above-mentioned commit into account for the dialog
as well when deciding what default font to use.
Add inline comments that the 2 places setting and
making assumptions about the default style of
controls need to be kept in sync.

With this in place, the actually used font height
of 8 (as set in `ImplStyleData::SetStandardStyles`)
is now displayed in the dialog for a newly inserted
edit in Writer instead of something dependent on the
style (e.g. 10 for the kf5 VCL plugin with the Breeze
style in use, or 9 for the qt6 VCL plugin with the Fusion
style).

For the font family, the dialog now shows
"Segoe UI;Tahoma;Arial Unicode MS;Lucida Sans Unicode;DejaVu Sans;Albany AMT;Albany;Arial;Nimbus Sans L;Interface User;Geneva;Dialog;Lucida;Helvetica;Helmet;Interface System;Sans Serif"
(and "This font has not been installed. The closest available
font will be used.") instead of "Noto Sans", which seems a bit
odd, but is presumably "correct" based on the standard style
font. (In order to change that, it would potentially be necessary
to adjust what style settings are set in the
"standard style settings" for controls.)

Change-Id: I1fbee69fdcd6f73a126df64294eb1bcc44078642
Reviewed-on: https://gerrit.libreoffice.org/c/core/+/171426
Reviewed-by: Michael Weghorn <m.weghorn@posteo.de>
Tested-by: Jenkins
2024-08-02 18:34:08 +02:00

312 lines
13 KiB
C++
Raw Blame History

/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
/*
* This file is part of the LibreOffice project.
*
* This Source Code Form is subject to the terms of the Mozilla Public
* License, v. 2.0. If a copy of the MPL was not distributed with this
* file, You can obtain one at http://mozilla.org/MPL/2.0/.
*
* This file incorporates work covered by the following license notice:
*
* 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 .
*/
#include <fmcontrollayout.hxx>
#include <fmprop.hxx>
#include <com/sun/star/form/FormComponentType.hpp>
#include <com/sun/star/awt/VisualEffect.hpp>
#include <com/sun/star/i18n/ScriptType.hpp>
#include <com/sun/star/lang/Locale.hpp>
#include <com/sun/star/awt/FontDescriptor.hpp>
#include <com/sun/star/style/XStyleFamiliesSupplier.hpp>
#include <com/sun/star/lang/XServiceInfo.hpp>
#include <com/sun/star/container/XChild.hpp>
#include <comphelper/processfactory.hxx>
#include <i18nlangtag/mslangid.hxx>
#include <i18nlangtag/languagetag.hxx>
#include <unotools/confignode.hxx>
#include <unotools/syslocale.hxx>
#include <unotools/localedatawrapper.hxx>
#include <toolkit/helper/vclunohelper.hxx>
#include <tools/debug.hxx>
#include <comphelper/diagnose_ex.hxx>
#include <vcl/outdev.hxx>
namespace svxform
{
using namespace ::utl;
using ::com::sun::star::uno::Reference;
using ::com::sun::star::uno::XInterface;
using ::com::sun::star::uno::UNO_QUERY;
using ::com::sun::star::uno::UNO_QUERY_THROW;
using ::com::sun::star::uno::UNO_SET_THROW;
using ::com::sun::star::uno::Exception;
using ::com::sun::star::uno::RuntimeException;
using ::com::sun::star::uno::Any;
using ::com::sun::star::beans::XPropertySet;
using ::com::sun::star::beans::XPropertySetInfo;
using ::com::sun::star::lang::Locale;
using ::com::sun::star::awt::FontDescriptor;
using ::com::sun::star::style::XStyleFamiliesSupplier;
using ::com::sun::star::lang::XServiceInfo;
using ::com::sun::star::container::XNameAccess;
using ::com::sun::star::container::XChild;
namespace FormComponentType = ::com::sun::star::form::FormComponentType;
namespace VisualEffect = ::com::sun::star::awt::VisualEffect;
namespace ScriptType = ::com::sun::star::i18n::ScriptType;
namespace
{
::utl::OConfigurationNode getLayoutSettings( DocumentType _eDocType )
{
OUString sConfigName = "/org.openoffice.Office.Common/Forms/ControlLayout/" +
DocumentClassification::getModuleIdentifierForDocumentType( _eDocType );
return OConfigurationTreeRoot::createWithComponentContext(
::comphelper::getProcessComponentContext(), // TODO
sConfigName );
}
template< class INTERFACE_TYPE >
Reference< INTERFACE_TYPE > getTypedModelNode( const Reference< XInterface >& _rxModelNode )
{
Reference< INTERFACE_TYPE > xTypedNode( _rxModelNode, UNO_QUERY );
if ( xTypedNode.is() )
return xTypedNode;
else
{
Reference< XChild > xChild( _rxModelNode, UNO_QUERY );
if ( xChild.is() )
return getTypedModelNode< INTERFACE_TYPE >( xChild->getParent() );
else
return nullptr;
}
}
bool lcl_getDocumentDefaultStyleAndFamily( const Reference< XInterface >& _rxDocument, OUString& _rFamilyName, OUString& _rStyleName )
{
bool bSuccess = true;
Reference< XServiceInfo > xDocumentSI( _rxDocument, UNO_QUERY );
if ( xDocumentSI.is() )
{
if ( xDocumentSI->supportsService(u"com.sun.star.text.TextDocument"_ustr)
|| xDocumentSI->supportsService(u"com.sun.star.text.WebDocument"_ustr)
)
{
_rFamilyName = "ParagraphStyles";
_rStyleName = "Standard";
}
else if ( xDocumentSI->supportsService(u"com.sun.star.sheet.SpreadsheetDocument"_ustr) )
{
_rFamilyName = "CellStyles";
_rStyleName = "Default";
}
else if ( xDocumentSI->supportsService(u"com.sun.star.drawing.DrawingDocument"_ustr)
|| xDocumentSI->supportsService(u"com.sun.star.presentation.PresentationDocument"_ustr)
)
{
_rFamilyName = "graphics";
_rStyleName = "standard";
}
else
bSuccess = false;
}
return bSuccess;
}
void lcl_initializeControlFont( const Reference< XPropertySet >& _rxModel )
{
try
{
Reference< XPropertySet > xStyle( ControlLayouter::getDefaultDocumentTextStyle( _rxModel ), UNO_SET_THROW );
Reference< XPropertySetInfo > xStylePSI( xStyle->getPropertySetInfo(), UNO_SET_THROW );
// determine the script type associated with the system locale
const SvtSysLocale aSysLocale;
const LocaleDataWrapper& rSysLocaleData = aSysLocale.GetLocaleData();
const sal_Int16 eSysLocaleScriptType = MsLangId::getScriptType( rSysLocaleData.getLanguageTag().getLanguageType() );
// depending on this script type, use the right property from the document's style which controls the
// default locale for document content
OUString sCharLocalePropertyName = u"CharLocale"_ustr;
switch ( eSysLocaleScriptType )
{
case ScriptType::LATIN:
// already defaulted above
break;
case ScriptType::ASIAN:
sCharLocalePropertyName = u"CharLocaleAsian"_ustr;
break;
case ScriptType::COMPLEX:
sCharLocalePropertyName = u"CharLocaleComplex"_ustr;
break;
default:
OSL_FAIL( "lcl_initializeControlFont: unexpected script type for system locale!" );
break;
}
Locale aDocumentCharLocale;
if ( xStylePSI->hasPropertyByName( sCharLocalePropertyName ) )
{
OSL_VERIFY( xStyle->getPropertyValue( sCharLocalePropertyName ) >>= aDocumentCharLocale );
}
// fall back to CharLocale property at the style
if ( aDocumentCharLocale.Language.isEmpty() )
{
sCharLocalePropertyName = "CharLocale";
if ( xStylePSI->hasPropertyByName( sCharLocalePropertyName ) )
{
OSL_VERIFY( xStyle->getPropertyValue( sCharLocalePropertyName ) >>= aDocumentCharLocale );
}
}
// fall back to the system locale
if ( aDocumentCharLocale.Language.isEmpty() )
{
aDocumentCharLocale = rSysLocaleData.getLanguageTag().getLocale();
}
// retrieve a default font for this locale, and set it at the control
vcl::Font aFont = OutputDevice::GetDefaultFont( DefaultFontType::SANS, LanguageTag::convertToLanguageType( aDocumentCharLocale ), GetDefaultFontFlags::OnlyOne );
FontDescriptor aFontDesc = VCLUnoHelper::CreateFontDescriptor( aFont );
_rxModel->setPropertyValue(u"FontDescriptor"_ustr, Any( aFontDesc )
);
}
catch( const Exception& )
{
DBG_UNHANDLED_EXCEPTION("svx");
}
}
}
//= ControlLayouter
Reference< XPropertySet > ControlLayouter::getDefaultDocumentTextStyle( const Reference< XPropertySet >& _rxModel )
{
// the style family collection
Reference< XStyleFamiliesSupplier > xSuppStyleFamilies( getTypedModelNode< XStyleFamiliesSupplier >( _rxModel ), UNO_SET_THROW );
Reference< XNameAccess > xStyleFamilies( xSuppStyleFamilies->getStyleFamilies(), UNO_SET_THROW );
// the names of the family, and the style - depends on the document type we live in
OUString sFamilyName, sStyleName;
if ( !lcl_getDocumentDefaultStyleAndFamily( xSuppStyleFamilies, sFamilyName, sStyleName ) )
throw RuntimeException(u"unknown document type!"_ustr);
// the concrete style
Reference< XNameAccess > xStyleFamily( xStyleFamilies->getByName( sFamilyName ), UNO_QUERY_THROW );
return Reference< XPropertySet >( xStyleFamily->getByName( sStyleName ), UNO_QUERY_THROW );
}
void ControlLayouter::initializeControlLayout( const Reference< XPropertySet >& _rxControlModel, DocumentType _eDocType )
{
DBG_ASSERT( _rxControlModel.is(), "ControlLayouter::initializeControlLayout: invalid model!" );
if ( !_rxControlModel.is() )
return;
try
{
Reference< XPropertySetInfo > xPSI( _rxControlModel->getPropertySetInfo(), UNO_SET_THROW );
// the control type
sal_Int16 nClassId = FormComponentType::CONTROL;
_rxControlModel->getPropertyValue( FM_PROP_CLASSID ) >>= nClassId;
// the document type
if ( _eDocType == eUnknownDocumentType )
_eDocType = DocumentClassification::classifyHostDocument( _rxControlModel );
// let's see what the configuration says about the visual effect
OConfigurationNode aConfig = getLayoutSettings( _eDocType );
Any aVisualEffect = aConfig.getNodeValue( u"VisualEffect"_ustr );
if ( aVisualEffect.hasValue() )
{
OUString sVisualEffect;
OSL_VERIFY( aVisualEffect >>= sVisualEffect );
sal_Int16 nVisualEffect = VisualEffect::NONE;
if ( sVisualEffect == "flat" )
nVisualEffect = VisualEffect::FLAT;
else if ( sVisualEffect == "3D" )
nVisualEffect = VisualEffect::LOOK3D;
if ( xPSI->hasPropertyByName( FM_PROP_BORDER ) )
{
if ( ( nClassId != FormComponentType::COMMANDBUTTON )
&& ( nClassId != FormComponentType::RADIOBUTTON )
&& ( nClassId != FormComponentType::CHECKBOX )
&& ( nClassId != FormComponentType::GROUPBOX )
&& ( nClassId != FormComponentType::FIXEDTEXT )
&& ( nClassId != FormComponentType::SCROLLBAR )
&& ( nClassId != FormComponentType::SPINBUTTON )
)
{
_rxControlModel->setPropertyValue( FM_PROP_BORDER, Any( nVisualEffect ) );
if ( ( nVisualEffect == VisualEffect::FLAT )
&& ( xPSI->hasPropertyByName( FM_PROP_BORDERCOLOR ) )
)
// light gray flat border
_rxControlModel->setPropertyValue( FM_PROP_BORDERCOLOR, Any( sal_Int32(0x00C0C0C0) ) );
}
}
if ( xPSI->hasPropertyByName( FM_PROP_VISUALEFFECT ) )
_rxControlModel->setPropertyValue( FM_PROP_VISUALEFFECT, Any( nVisualEffect ) );
}
// the font (only if we use the document's ref devices for rendering control text, otherwise, the
// default font from application or standard style is assumed to be fine)
if ( useDocumentReferenceDevice( _eDocType )
&& xPSI->hasPropertyByName( FM_PROP_FONT )
)
lcl_initializeControlFont( _rxControlModel );
}
catch( const Exception& )
{
TOOLS_WARN_EXCEPTION( "svx", "ControlLayouter::initializeControlLayout" );
}
}
bool ControlLayouter::useDynamicBorderColor( DocumentType _eDocType )
{
OConfigurationNode aConfig = getLayoutSettings( _eDocType );
Any aDynamicBorderColor = aConfig.getNodeValue( u"DynamicBorderColors"_ustr );
bool bDynamicBorderColor = false;
OSL_VERIFY( aDynamicBorderColor >>= bDynamicBorderColor );
return bDynamicBorderColor;
}
bool ControlLayouter::useDocumentReferenceDevice( DocumentType _eDocType )
{
if ( _eDocType == eUnknownDocumentType )
return false;
OConfigurationNode aConfig = getLayoutSettings( _eDocType );
Any aUseRefDevice = aConfig.getNodeValue( u"UseDocumentTextMetrics"_ustr );
bool bUseRefDevice = false;
OSL_VERIFY( aUseRefDevice >>= bUseRefDevice );
return bUseRefDevice;
}
}
/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
Reference in New Issue View Git Blame Copy Permalink