很多人工作学习中经常需要做演示报告,如果自己没有笔记本,那么准备好的PPT文件就得手动转移了。这个过程中如果不能将文件中使用的特殊字体一起带走,到演示机器上的效果可能会让你的精心准备大打折扣。正是因为自己碰到过这个问题,所以希望做个简单的小工具将 PPT文件中使用到的字体都提取出来,方便携带到其他机器上安装。
简单介绍一下这个小工具制作的过程~
工作原理设想
很简单,分三步:
1. 解析PPT文件,收集其中的所有文字使用到的字体名称;
2. 通过这些字体名称,去系统的字体文件存放目录将相应的字体文件导出;
3. 生成一个字体安装脚本,以便在目标机器安装这些字体。
具体实现
有了这个简单设计,就用c#去着手实现了,可即使设计这么简单了,还是碰到一些问题:)
1. PPT文件解析
由于.net对office应用已经做了良好封装,这步做起来没有什么困难,基本只要查一查需要的查询接口就可以。只有一点需要注意一下,因为PPT文字格式的任意性,每一个文字都可以设置字体,所以我们需要让字体提取的粒度保持在单个的字符上,这样才不会有所遗漏。
首先在后台模式打开PPT文件:
PowerPoint.Application pptApplication = new PowerPoint.ApplicationClass();
PowerPoint.Presentation presentation = pptApplication.Presentations.Open2007(
_fileName,
Office.MsoTriState.msoTrue,
Office.MsoTriState.msoTrue,
Office.MsoTriState.msoFalse,
Office.MsoTriState.msoFalse);
然后遍历文字取得字体名,层次顺序是 slide > shape > text > character:
foreach (PowerPoint.Slide slide in presentation.Slides)
{
foreach (PowerPoint.Shape shape in slide.Shapes)
{
if (shape.HasTextFrame == Office.MsoTriState.msoTrue &&
shape.TextFrame.HasText == Office.MsoTriState.msoTrue)
{
PowerPoint.TextRange textRange = shape.TextFrame.TextRange;
for (int i = 0; i <>
{
PowerPoint.Font font = textRange.Characters(i, 1).Font;
if (!_fontNames.Contains(font.Name))
_fontNames.Add(font.Name);
}
}
}
}
这样就可以获得各种PPT文件中各种形式文本使用的每一个字体名(smartart形式的除外,因为微软没有开放相应的模型数据)。
别忘了关闭文件和PPT程序:
presentation.Close();
pptApplication.Quit();
……