Brother P-Touch QL-1060N gibt mit SDK nur leere Etiketten aus

[menten]

Hallo noch mal,

Fehler gefunden. Offensichtlich sind die Beispiele nicht ganz aktuell. Der Beispielcode in der Hilfe verwendet "StartPrint". Allerdings muss man dabei entgegen den Beispielen dem Parameter "docName" einen Wert geben. Sonst kommt Fehler 25. So funktioniert der Druck:

<--

procedure TForm1.Button2Click(Sender: TObject);
var
FPTouchDocument: bpac_TLB.IDocument;
begin

FPTouchDocument := CreateComObject(CLASS_Document) as bpac_TLB.IDocument;

if FPTouchDocument.Open('.\test2.lbx') then
begin

if FPTouchDocument.GetObject('Text2') <> nil then
FPTouchDocument.GetObject('Text2').Text := 'testtext';

if FPTouchDocument.StartPrint('Sample', bpoDefault) then
begin

if FPTouchDocument.PrintOut(1, bpoDefault) then
begin
FPTouchDocument.EndPrint;
FPTouchDocument.Close;
end
else
ShowMessage(FPTouchDocument.ErrorCode.ToString);
end
else
ShowMessage(FPTouchDocument.ErrorCode.ToString);
end
else
ShowMessage(FPTouchDocument.ErrorCode.ToString);

end;

-->




Gruß
Stefan