Python调用CorelDRAW导出JPEG失败问题求助

我正在开发Python应用程序修改CorelDRAW模板文件（已添加设计图的CDR文件），需要生成用于邮件确认的JPEG文件和不同布局的打印JPEG文件（我的RIP打印软件仅支持JPEG格式）。目前邮件文件和打印文件的布局逻辑已调试正确，但JPEG导出功能异常：程序执行无报错，模板元素布局调整正常，但始终无法生成JPEG文件。

import comtypes.client
import os

# 创建CorelDRAW应用实例
cdr = comtypes.client.CreateObject('CorelDRAW.Application')

# 打开现有文档
fpath = os.path.join(os.path.join(os.environ['USERPROFILE']), 'Desktop\Corel Testing\\4 Panels.cdr')
doc = cdr.OpenDocument(fpath)
filename = fpath.split("\\")[-1].split(".")[0]

# 选中当前页面
page = doc.ActivePage
doc.Unit = 3
layer = page.ActiveLayer

# 获取页面宽高
width = page.SizeWidth
height = page.SizeHeight


def createSaveLayout():
    global layer
    # 获取当前图层的形状数量
    shape_count = layer.Shapes.Count

    # 初始化旋转角度
    rotation = 0

    # 根据形状数量处理布局
    if shape_count == 1:
        # 复制3次面板
        layer.Shapes.Item(1).Duplicate()
        layer.Shapes.Item(1).Duplicate()
        layer.Shapes.Item(1).Duplicate()

    elif shape_count == 2:
        page_rect = layer.CreateRectangle2(0, 0, width, height)
        page_rect.Name = "PageRect"
        for i in range(shape_count + 1):
            if layer.Shapes.Item(i + 1).Name != "PageRect":
                # 修正旋转角度
                layer.Shapes.Item(i + 1).RotationAngle = rotation
                # 对齐到页面矩形
                layer.Shapes.Item(i + 1).AlignToShape(Type=3, Shape=page_rect)
                layer.Shapes.Item(i + 1).AlignToShape(Type=12, Shape=page_rect)
        layer.Shapes.Item(2).Duplicate()
        layer.Shapes.Item(4).Duplicate()
        layer.Shapes.Item(1).Delete()
        layer.Shapes.Item(3).OrderForwardOne()

    elif shape_count == 4:
        page_rect = layer.CreateRectangle2(0, 0, width, height)
        page_rect.Name = "PageRect"
        for i in range(shape_count + 1):
            if layer.Shapes.Item(i + 1).Name != "PageRect":
                # 修正旋转角度
                layer.Shapes.Item(i + 1).RotationAngle = rotation
                # 对齐到页面矩形
                layer.Shapes.Item(i + 1).AlignToShape(Type=3, Shape=page_rect)
                layer.Shapes.Item(i + 1).AlignToShape(Type=12, Shape=page_rect)
        layer.Shapes.Item(1).Delete()

    shape_count = layer.Shapes.Count

    # 移动形状调整布局
    for i in range(shape_count):
        shape = layer.Shapes.Item(i + 1)
        if i % 2 == 0:
            shape.PositionX += shape.SizeWidth

        if i == 0 or i == 1:
            shape.PositionY += shape.SizeHeight + 50
            shape.RotationAngle = 180

    # 选中特定形状并分组
    layer.Shapes.Item(1).AddToSelection()
    layer.Shapes.Item(3).AddToSelection()

    cdr.ActiveDocument.BeginCommandGroup("Group Selection")
    cdr.ActiveSelection.Group()
    cdr.ActiveDocument.EndCommandGroup()

    # 旋转分组并对齐，然后取消分组
    layer.Shapes.Item(1).RotationAngle = 90
    layer.Shapes.Item(1).AlignToShape(Type=3, Shape=layer.Shapes.Item(2))

    layer.Shapes.Item(1).Ungroup()
    layer.Shapes.Item(2).OrderBackOne()

    # 取消所有选中
    for i in range(shape_count):
        layer.Shapes.Item(i + 1).RemoveFromSelection()
    # doc.Save()


def createEmailFile():
    global filename, cdr, filename, page, width, height
    page.Autofit()

    # 创建导出目录
    export_dir = os.path.join(os.path.dirname(fpath), 'exports')
    if not os.path.exists(export_dir):
        os.makedirs(export_dir)

    print(fpath)

    # 导出文件路径
    file_name = os.path.join(export_dir, f"{filename}.jpg")

    # 导出JPEG
    export_result = cdr.ActiveDocument.ExportBitmap(FileName=file_name,
                                                    Filter=774,
                                                    ResolutionX=72,
                                                    ResolutionY=72,
                                                    ImageType=5,
                                                    Width=1000,
                                                    Height=1000,
                                                    AntiAliasingType=1,
                                                    Dithered=False,
                                                    Transparent=False,
                                                    UseColorProfile=False,
                                                    MaintainLayers=False,
                                                    Compression=8)

    # 打印导出结果
    if export_result:
        print(f"Export succeeded! Result: {export_result}")
    else:
        print("Export failed.")
    # 恢复页面尺寸
    page.SizeWidth = width
    page.SizeHeight = height
    createSaveLayout()


# 执行布局调整和导出
createSaveLayout()
createEmailFile()

• 检查导出路径有效性：打印file_name变量，确认路径是否包含特殊字符（如空格、非ASCII字符），以及当前用户是否有该路径的写入权限。同时验证export_dir是否确实创建成功（可添加print(os.path.exists(export_dir))确认）。
• 核对ExportBitmap参数：
  • Filter=774对应CorelDRAW的cdrJPG枚举值，需确认当前CorelDRAW版本是否匹配；建议改用枚举名称（需导入对应的comtypes枚举）避免数值错误。
  • ImageType=5对应cdrRGBColor，确认是否为正确的色彩模式，若文档是CMYK模式可能需要转换后再导出。
• 确认CorelDCOM运行权限：确保CorelDRAW以管理员身份启动，且COM对象拥有文件写入权限；若CorelDRAW在后台静默运行，尝试激活应用窗口后再导出。
• 文档状态检查：导出前尝试调用doc.Save()保存文档，部分情况下未保存的文档可能无法正常导出。
• 排查异步导出问题：CorelDRAW的COM导出操作可能为异步，可添加短暂延迟（如time.sleep(2)）后再检查文件是否生成。
• 获取CorelDRAW错误信息：调用cdr.GetLastError()或检查cdr.Application.Status获取更详细的导出错误，而非仅依赖export_result返回值。
• 版本兼容性：确认comtypes版本与CorelDRAW版本兼容，部分旧版本CorelDRAW的ExportBitmap参数可能存在差异。

内容的提问来源于stack exchange，提问作者Chamkey