对于特定任务,我想选择合适的字体。为此,我想比较文本 \xe2\x80\x9cE G PM\xe2\x80\x9d 我安装的所有字体(甚至更多)。特别是字体的粗体(如果有的话)更可能符合我的要求。
\n\n快速的视觉查看可能已经解决了 90% 的问题,因此我正在考虑查看系统上可用的不同字体的字符串列表。
\n\n我尝试过的字体查看器/管理器无法胜任该任务。哪个应用程序可以在这里帮助我,或者我怎样才能快速解决我的问题?
\n\n我尝试过的应用程序有:
\n\n/usr/share
为字体目录会使程序变慢gnome-terminal
当您选择Edit
-> Profile Preferences
->时Custom Font
:
然而,在我的系统上,它不会显示“EG PM”,尽管它会让你误以为它会显示。
小智 -1
下面是 libreoffice 的一个小宏,它会询问您一个示例句子,并生成一个示例文件,其中包含系统中安装的所有字体以及字体名称。\n非常有用!
\n只需将其复制并作为空 LibreOffice Writer 文档中的宏运行即可。\n此致。
\n'********************************************************************************\n'Copyright (C) 2003 Laurent Godard - adaptation l\xc3\xa9g\xc3\xa8re P. Quaglia 2021\n'dev.godard@wanadoo.fr\n\n'This library is free software; you can redistribute it and/or\n'modify it under the terms of the GNU Lesser General Public\n'License as published by the Free Software Foundation; either\n'version 2.1 of the License, or (at your option) any later version.\n\n'This library is distributed in the hope that it will be useful,\n'but WITHOUT ANY WARRANTY; without even the implied warranty of\n'MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU\n'Lesser General Public License for more details.\n'http://www.opensource.org/licenses/lgpl-license.php\n\n'You should have received a copy of the GNU Lesser General Public\n'License along with this library; if not, write to the Free Software\n'Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA\n'******************************************************************************\n\nSub ListingPolicesSystem()\n\n'**Sub Macro1 \n\nphrase=InputBox("phrase de test :","Liste des polices","Voix ambigu\xc3\xab d'un c\xc5\x93ur qui, au z\xc3\xa9phyr, pr\xc3\xa9f\xc3\xa8re les jattes de kiwis.") \n\noText=thisComponent.getText() \noCursor = oText.createTextCursor() \n\n'Liste des fontes \n\nDim oToolkit As Object \noToolkit = CreateUnoService("com.sun.star.awt.Toolkit") \nDim oDevice as Variant \noDevice = oToolkit.createScreenCompatibleDevice(0, 0) \nDim oFontDescriptors As Variant \noFontDescriptors = oDevice.FontDescriptors \nDim oFontDescriptor As Object \n\nthiscomponent.lockcontrollers \noCursor.string="Liste des polices install\xc3\xa9es sur le syst\xc3\xa8me"+chr(10)+chr(10)\nvalide=oCursor.gotoEnd(false)\nfor i= LBound(oFontDescriptors) to UBound(oFontDescriptors) \n oCursor.CharFontName=oFontDescriptors(i).Name \n oCursor.string=cstr(i)+". "+oFontDescriptors(i).Name+" : " \n valide=oCursor.gotoEnd(false) \n oCursor.string=phrase+chr(10)\n valide=oCursor.gotoEnd(false) \nnext i \nthiscomponent.unlockcontrollers \n\nEnd Sub \n
Run Code Online (Sandbox Code Playgroud)\n
归档时间: |
|
查看次数: |
1394 次 |
最近记录: |