最好不是这个。我试过了。调试通不过。用showmodal会出错---- 1. 新 建 一 个 窗 体, 设 置Name 为MyPreview。 ---- 2. 在 窗 体 上 添 加 一Toolbar 控 件, 模 仿 默 认 预 览 窗 口 创 建 相 应 的Toolbutton, 并 设
置 各 按 钮 的Hint 提 示。 ---- 3. 添 加 一Panel 控 件, 对 齐 方 式 置 为alBottom。 再 在 此Panel 上 放 一ProgressBar( 左 对 齐)
和Panel( 右 对 齐), 分 别 显 示 报 表 装 载 进 度 和 其 他 提 示 信 息。 ---- 4. 添 加QRPreview 控 件, 对 齐 方 式 置 为alClient。 ---- 5. 添 加OpenDialog, 设 置Filter 属 性 为*.QR; 添 加SaveDialog, 设 置Filter 属 性 为
*.QR|*.TXT|*.HTM|*.CSV, 设 置DefaultExt 属 性 为*.QR。 ---- 6. 双 击 各 个Toolbutton, 输 入 相 应 代 码。 ---- 可 以 按 以 下 方 法 调 用 自 定 义 预 览 窗 口。 ---- 重 载TQuickRep 的OnPreview 事 件, 输 入 如 下 代 码: 
可以运行,立即放分。[email protected]