摘要： 定义 VDesktopName: PAnsiChar; //虚拟桌面名 VDesktop: HDESK; //虚拟桌面 创建 VDesktopName := 'MYDESK'; VDesktop := CreateDesktop(VDesktopName, nil, nil, 0, GENERIC_ALL, nil); 释放 CloseDesktop(VDesktop... 阅读全文

摘要： //例子 OpenOfficeExportToPDF('file:///C:/SourceFile.odt', 'file:///C:/TargetFile.pdf'); 必须为URL格式的路径 function urlconvertor(AFilePath: string): string; //本地路径转换成URL相对路径 begin result := 'file:... 阅读全文