使用条形码打印标签的选项？ [关闭]答案

【问题标题】：Options to print label with barcode? [closed]使用条形码打印标签的选项？ [关闭]
【发布时间】：2010-11-15 17:46:41
【问题描述】：

我买了一台入门级的兄弟标签打印机，需要从德尔福打印这种类型的标签：

（条形码是使用free 3of9 TTY font 简单创建的，尽管一些 VCL 组件可用于直接创建条形码。）

我读到标准方法是使用 Rave Reports，但它看起来是一个相当大的工具，我以前从未使用过它。

在我继续花时间学习 Rave Reports 之前，我想问问经验丰富的 Delphi 开发人员是否有更简单的方法可以做到这一点。例如，如何即时创建一些图像并将其发送到打印机？

谢谢。

【问题讨论】：

也许这里的一些答案会有所帮助：stackoverflow.com/questions/919676
谢谢斯科特。我将进行试验，看看 Printers 对象是否足够好，或者我需要使用一些报告工具（我读到 FastReport 是比 QuickReports 或 Rave 更好的选择）。也许只打印一个 RichEdit 就可以了 :)

【解决方案1】：

如果您有可用作图像的条形码，您可以使用打印机单元中的打印机对象打印它。

uses
  Printers;
...
Printer.BeginDoc;
try
  Printer.Canvas.Draw (PosX, PosY, FBarcodeBitmap);
finally
  Printer.EndDoc;
end;

如果您只想打印条形码，这可能比让自己习惯 Rave Reports 更容易。

【讨论】：

【解决方案2】：

普通条形码包含 CRC，因此“条形码字体”不起作用。您必须使用一些报告引擎或使用一些条形码组件手动创建条形码。

【讨论】：

【解决方案3】：

您可以使用标准的 TRichEdit 组件。它有 Print 方法。简单地说：

  rich1.Print('title');

问候。

【讨论】：

【解决方案4】：

虽然您当然可以在代码中渲染您的画布，然后将其推送到打印机，但我认为您会发现使用报告工具的价值。多年来，我们一直使用 QuickReports 来生成我们的条码标签，并取得了巨大成功。

我看到的报告工具在代码中呈现给画布的最大价值是报告工具的所见即所得方面。您将能够在设计时在屏幕上进行大部分布局和调整。

【讨论】：