🚀 go-pugleaf

I have the following:

// in the header..........
typedef struct
{
     WORD wSize;
     BYTE bData[2];                  // placeholder
} PASSTHROUGHSTRUCT, FAR *LPPTS;

HANDLE m_dcPrint;
LPPTS m_lpPTS;

// in a button event handler
void __fastcall TForm1::Button1Click(TObject *Sender)
{
TPrinter *Prntr=Printer();

char device[MAX_PATH], driver[MAX_PATH], port[MAX_PATH];
HANDLE HMem;

// get default printer device, driver, and port names
Prntr->GetPrinter(device, driver, port, (unsigned int)HMem);

m_dcPrint=Prntr->Handle;

int x=PASSTHROUGH;
if (Escape(m_dcPrint, QUERYESCSUPPORT, sizeof(x), (LPCSTR) &x, NULL)<=0)

  {
  ShowMessage("Printer does not support passthrough");
  return;
  }

if (HMem)
  {
  PDEVMODE pDevMode=(PDEVMODE)GlobalLock(HMem);
  pDevMode->dmCopies =1;
  GlobalUnlock(HMem);
  }

if (!m_lpPTS)
  {
  m_lpPTS = (LPPTS)GlobalLock(GlobalAlloc(GPTR, sizeof(WORD) +
                                     2048));
  if (m_lpPTS==0)
    {
    ShowMessage("Print Aborted, cannot lock memory");
    return;
    }
  }

DOCINFO mydoc;
mydoc.cbSize=sizeof(mydoc);
mydoc.lpszDocName="MyDoc";
memset(&mydoc,0,sizeof(mydoc));
StartDoc(m_dcPrint,&mydoc);
StartPage(m_dcPrint);

char *PrintThis="Now is the time for all good men to come to the aid of
his country and Liz need not be offended.\r\n"
m_lpPTS->wSize = strlen(PrintThis);

memcpy (m_lpPTS->bData, PrintThis, strlen(PrintThis));

int rv=1;
for (int i=0;rv && i<30;++i)
  {
  rv=Escape(m_dcPrint,PASSTHROUGH,sizeof(m_lpPTS->wSize) +
m_lpPTS->wSize,
         (LPSTR)m_lpPTS,0);
  }

EndPage(m_dcPrint);
EndDoc(m_dcPrint);
GlobalUnlock(m_lpPTS);
}

The above executes from top to bottom, no ShowMessage occurs, while
stepping the code in debug, the port and device are correct strings....
and the loop executes 30 iterations....however, not a single byte is
printed, nor is the spooler ever activated.

Any of you folks have an explanation why there is no printed output?
or, alternatively, any of you ever use the Escape to attempt to send
data, for instance, PCL-5 commands, to a HP laser printer?

TIA

keith