# word2pdf

**Repository Path**: ujjldn/word2pdf

## Basic Information

- **Project Name**: word2pdf
- **Description**: No description available
- **Primary Language**: Delphi
- **License**: Not specified
- **Default Branch**: master
- **Homepage**: None
- **GVP Project**: No

## Statistics

- **Stars**: 0
- **Forks**: 0
- **Created**: 2026-04-23
- **Last Updated**: 2026-05-06

## Categories & Tags

**Categories**: Uncategorized

**Tags**: None

## README

# Word转PDF批量转换工具

## 项目说明

这是一个使用 Delphi 12 开发的批量 Word 文档转 PDF 工具，通过 Office COM 自动化实现高质量的 PDF 转换。

## 功能特性

✅ **多文件选择** - 支持一次性添加多个 Word 文档  
✅ **拖拽支持** - 🆕 支持直接将文件或文件夹拖拽到列表中  
✅ **转换状态显示** - 实时显示每个文件的转换状态（等待、转换中、成功、失败）  
✅ **进度条显示** - 可视化显示整体转换进度  
✅ **Office 原生导出** - 使用 Word 的 ExportAsFixedFormat 方法，保证最佳兼容性  
✅ **异步处理** - 转换在后台线程执行，不阻塞界面  
✅ **可取消操作** - 支持中途取消转换任务  
✅ **灵活管理** - 可添加、移除、清空文件列表  
✅ **智能过滤** - 自动识别并过滤非Word文件  
✅ **递归搜索** - 拖拽文件夹时自动搜索所有子目录中的Word文件  

## 系统要求

- Windows 7 及以上
- Microsoft Office 2010 或更高版本（必须安装 Word）
- Delphi 12（用于编译）

## 使用方法

### 方式一：传统按钮操作
1. 点击"添加文件"按钮，选择一个或多个 Word 文档（.doc 或 .docx）
2. 查看待转换文件列表
3. 点击"开始转换"按钮开始转换
4. 转换完成后，PDF 文件将保存在与 Word 文档相同的目录下
5. 可以通过状态列查看每个文件的转换结果

### 方式二：鼠标拖拽（推荐）🆕
1. 从Windows资源管理器中选择Word文件或文件夹
2. 直接拖拽到程序的文件列表区域
3. 释放鼠标，文件将自动添加到转换队列
4. 点击"开始转换"按钮开始转换

**拖拽优势：**
- 更快速便捷的操作体验
- 支持拖拽整个文件夹（自动递归搜索）
- 可以混合拖拽多个文件和文件夹
- 智能过滤非Word文件，避免误添加

详细使用说明请查看 [拖拽功能使用指南](DRAG_DROP_GUIDE.md)

## 技术实现

### 核心技术
- **COM 自动化**: 通过 `CreateOleObject('Word.Application')` 创建 Word 实例
- **ExportAsFixedFormat**: 使用 Word 官方的导出方法转换为 PDF
- **多线程**: 使用 `TThread.CreateAnonymousThread` 在后台执行转换
- **线程同步**: 通过 `TThread.Synchronize` 安全更新 UI
- **拖拽支持**: 使用 Windows API `DragQueryFile` 处理文件拖拽

### 关键代码说明

``pascal
// 初始化 Word 应用
FWordApp := CreateOleObject('Word.Application');
FWordApp.Visible := False;

// 转换核心代码
WordDoc.ExportAsFixedFormat(
  PDFFileName,     // 输出文件名
  17,              // wdExportFormatPDF
  False,           // 不自动打开
  0,               // 优化打印质量
  ...
);
```

## 文件结构

```
word2pdf/
├── Word2PDF.dpr      # 项目文件
├── MainFrm.pas       # 主窗体单元
├── MainFrm.dfm       # 窗体设计文件
└── README.md         # 说明文档
```

## 编译步骤

1. 使用 Delphi 12 打开 `Word2PDF.dpr`
2. 按 F9 或点击 Run → Run 编译并运行
3. 或在 IDE 中选择 Project → Build Word2PDF

## 注意事项

⚠️ **重要提示**:
- 必须安装 Microsoft Office Word 才能正常运行
- 转换后的 PDF 文件与源 Word 文件在同一目录
- 如果 PDF 文件已存在，将会被覆盖
- 建议在转换前保存所有 Word 文档
- 大文件或大量文件转换可能需要较长时间

## 许可证

本项目仅供学习和个人使用。

## 开发者

由 Delphi 12 开发

---

如有问题或建议，欢迎反馈！