Hallo zusammen,

ich hab da mal ein Problem.

In einer Delphi 10.4 Anwendung (unter Windows 10 in einer VM) sollen Etiketten auf einem Brother P-Touch Drucker ausgegeben werden. Treiber installiert, Editor installiert, SDK 32 Bit installiert, TLB Datei erstellt, einfaches Label erstellt. Testanwendung erstellt mit folgendem Code im Button onClick:

<--

const
TEMPLATE_DIRECTORY = 'c:\Test\test_text.lbx';

begin
FPTouchDocument := CreateComObject(CLASS_Document) as IDocument;

if FPTouchDocument.Open(TEMPLATE_DIRECTORY) then
begin
FPTouchDocument.StartPrint('', bpoDefault);

FPTouchDocument.PrintOut(1, bpoDefault);

FPTouchDocument.EndPrint();
FPTouchDocument.Close();

end;

-->


Wenn ich das teste wird das Etikett ausgegeben und geschnitten. Es ist aber leer bis auf ein dünnes Kreuz in einem dünnen Recheck. Jemand eine Idee woran das liegen könnte?

Drucken mit dem P-Touch Editor funktioniert. SDK in einer anderen VM installiert und die Beispiele von Brother mit C# unter VS 2019 ausprobiert, funktioniert auch.



Danke für jede Hilfe
Stefan Menten