可以在 iPad 上计算 powerpoint 演示文稿的宽度/高度吗

Question

我有一个 ipad 应用程序，它在 UIWebView 中显示来自 NSData 的 powerpoint 演示文稿，我需要知道单张幻灯片的宽度/高度，以便知道在前进到下一张幻灯片时滚动多远。

在 PDF 中，我可以使用 CGPDFDocumentRef 进行计算，如下所示，但我找不到相应的 powerpoint API，而且由于它是 microsoft 格式，我什至怀疑它是否存在。

我可以使用 javascript 来确定整个演示文稿的宽度/高度，但这并不能帮助我知道一张幻灯片要前进多远，

为 PDF 做我需要的代码：

CFDataRef myPDFData = (CFDataRef)presentationContent;
CGDataProviderRef provider = CGDataProviderCreateWithCFData(myPDFData);
CGPDFDocumentRef pdf = CGPDFDocumentCreateWithProvider(provider);
CGPDFPageRef page = CGPDFDocumentGetPage(pdf, 1);
CGRect pageRect = CGPDFPageGetBoxRect(page, kCGPDFMediaBox);
int pageHeight=(int)pageRect.size.height;
int pageWidth=(int)pageRect.size.width;
//now I can advance to the proper page by doing a scrollto pageHeight*currentPage

Answer 1

想通了。

在这种情况下，UIWebView 就好像它是 HTML 页面上的 iFrame，它有一些 powerpoint 文件的源。因此，您可以对它执行某些操作，并公开某些属性。

我发现 document.all（一个数组）有元素——很多元素。我的 20 页 powerpoint 测试文件有 300 多个元素。查看它们的宽度/高度并没有太大帮助 - 有些是 iframe 本身的尺寸，有些是从幻灯片 1 的左上角像素到幻灯片 N 的右下角像素的尺寸，有些是 0x0，还有一些（隐藏中间）是幻灯片的尺寸。我发现的模式是您必须跳过 document.all 中的第一个元素，并遍历直到找到一个宽度/高度非零的元素，该元素具有相同的 clientHeight、offsetHeight、scrollHeight 值以及相同的值客户端宽度、偏移宽度和滚动宽度。其中第一个将为您提供单张幻灯片的高度/宽度，您可以从那里开始。当然，因为您使用的是 UIWebView，并且只有 stringByEvaluatingJavaScriptFromString 可以使用，所以您需要在一行返回值的 javascript 中完成所有操作。

因此，要提取 powerpoint 演示文稿的宽度/高度，您可以编写：

NSString *w=[webview stringByEvaluatingJavaScriptFromString:@"function x(){var rtn='';for (var i=1;i<document.all.length;i++){var a=document.all[i];if (((a.clientWidth>0)&&(a.clientHeight>0))&&(a.scrollHeight.toString()==a.offsetHeight.toString())&&(a.offsetHeight.toString()==a.clientHeight.toString())){return ''+a.offsetWidth; }}return rtn;};x();"];
NSString *h=[webview stringByEvaluatingJavaScriptFromString:@"function x(){var rtn='';for (var i=1;i<document.all.length;i++){var a=document.all[i];if (((a.clientWidth>0)&&(a.clientHeight>0))&&(a.scrollHeight.toString()==a.offsetHeight.toString())&&(a.offsetHeight.toString()==a.clientHeight.toString())){return ''+a.offsetHeight; }}return rtn;};x();"];

并从那时起对宽度/高度做任何你需要做的事情。

哦，文档加载后不会立即填充 document.all - UIWebView 似乎需要几毫秒来收集它并使其可用。我在我的 webview 完成加载后 1 秒运行这个，它在 ppt 和 pptx 文件上都很好用。不过，它不适用于 pdf。

Answer 2

其中，这些对象包含宽度和高度属性：

Sub Test()
Dim A As Application

    Set A = Application
    Debug.Print A.Width, A.Height
    Debug.Print A.Windows(1).Width, A.Windows(1).Height
    Debug.Print A.SlideShowWindows(1).Width, A.SlideShowWindows(1).Height

End Sub

最适合你的好像是最后一个。

1680 x 1050 屏幕的结果

PPT全屏

 1266          793,5 
 1245,75       699,75 
 1260          787,5 

大约 PPT。屏幕的 1/2

 711,75        551,25 
 691,5         457,5 
 1260          787,5  <-- same as above as slideshows always go full-screan at the selected aspect ratio