2015-11-03 139 views
0

我在Delphi中使用TDymoDrucker类来打印标签。我已经使用Dymo Label v.8创建了标准标签字段。打印标签dymo不起作用

在Labelform,我发送按钮的点击变量TDymo德鲁克类

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),我无法打印标签。它不显示任何错误信息或失败。
有人能告诉我为什么是这样吗?感谢您的帮助提前。

回答

0

它现在可以工作了,我现在已经在DYMO SDK v.8中创建了一个使用现有示例的新标签(在我使用测试之前),并且使用地址字段(动态)而不是文本字段(静态)添加了字段是静态的。它现在按预期打印。