🚀 go-pugleaf

Thomas J. wrote:

> I want to print labels on a label printer.

On what kind of paper ?

> And the aim should be to print a
> Label A and a Label B. After each second Label the cutter should cut.

So not endless with labels glued on it ?

 > I
> assumes taht each label is a page. So I called NewPage(). 

But then I would assume that every two labels constitute a page.

 > But the printer
> will create a new job for each call of NewPage 

No it will not make a new job. Just start on a new page.

 > and for each new job the
> cutter willl work. So Label A and Label B are not together anymore. (I want
> to print 300 labels).
> The label printer company told me to send the esacep sequence F which is
> 0x00c a form feed. And thats what I try to do for hours and hours.

If you want to send an escape sequence than you have to use
the printer in raw mode. As far as I know you cannot use TPrinter()
for that. A formfeed for TPrinter() is NewPage().

> I found out that another way it is possible to send escape sequnces. 

Forget about escape sequences. Use TextOut(X,Y, ...) to make new lines
and use NewPage() as formfeed.


>     OpenPrinter(printername, &PrnHandle, NULL);
>     if (PrnHandle != NULL) {

>        if (StartDocPrinter(PrnHandle,1,(LPSTR)&DocInfo) <= 0)
>           Application->MessageBox("StartDocPrinter", "Error", MB_OK);

>         printer->EndDoc();


Here you mixed the raw printer with TPrinter(). That seems a
bad idea to me.


>     TPrinter* printer = Printer();
>     printer->BeginDoc();
>     printer->Canvas->TextOut(300, 300, "First page");
>     Escape(printer->Canvas->Handle,

You did not show what function Escape() does.

Hans.