【发布时间】:2015-11-04 23:44:11
【问题描述】:
我在 Delphi 中使用TDymoDrucker 类来打印标签。我使用 Dymo Label v.8 创建了标准标签字段。
在 Labelform 中,我通过单击按钮将变量发送到 TDymo Drucker 类
procedure TFormButton.Button1Click(Sender: TObject);
var
Print : TDymoData;
begin
PrintData.selected := 'Button1';
PrintData.Nummber := 1234;
PrintData.Name :='Example1';
DymoData.Print(PrintData); //Passing parameters to Dymodrucker classwhere it checks for printer status and label fields
end;
我处理所有操作以检查是否安装在 DymoDrucker 类中的所有字段和驱动程序,最后使用 DymoAddIn.Print(1, true) 我能够打印标签。
但是在单击相同表单中的另一个按钮时
procedure TFormButton.Button2Click(Sender: TObject);
var
Print : TDymoData;
begin
PrintData.selected := 'Button2';
PrintData.Model := 4567;
PrintData.ModelName :='Example2';
DymoData.Print(PrintData);
end;
我处理所有操作以检查是否在 DymoDrucker 类中安装了所有字段和驱动程序,最后使用 DymoAddIn.Print(1, true),我无法打印标签。它不显示任何错误消息或失败。
有人可以告诉我为什么会这样吗?提前感谢您的帮助。
【问题讨论】: