🚀 go-pugleaf

Thanks again. I tried your corrections - it runs without error but the
WritePrinter() function does not seem to work. When I check in the debugger
the function returns 0 which indicates an error I believe.
I am testing by sending the PCL code to rotate text 90deg. Nothing is
printed.
The code I am using is:

  char *PCLSideTwo;
   PCLSideTwo="\x01B&a90P John Scott"; //"\x01b&a2G"; // string to make PCL
printer change to side two Ec&a2G
  //  \x01B&a90P   should rotate text by 90 degrees to test since my printer
will not duplex
...
    // First set printer to correct printer
    TLocateOptions Opt;
    DM->tblPrinters->Locate("PRINTERID", StrToInt(NoteType)+1, Opt);
    for (int i=0; i< Printer()->Printers->Count; i++)
    {
      if (Printer()->Printers->Strings[i]==DM->tblPrintersNAME->Value)
      {
         Printer()->PrinterIndex=i;
         break;
      }
    }
    // Nov 2003 to print double sided
    char ADevice[256]={0}, ADriver[256]={0}, APort[256]={0};
    THandle  ADeviceMode;
    Printer()->GetPrinter(ADevice, ADriver, APort, ADeviceMode);
    Printer()->SetPrinter(ADevice, ADriver, APort, ADeviceMode);
    // end of add Nov 2003
 ...
              //RECT Rect;
             // Rect.top=0;
             // Rect.left=0;
             // Rect.right=2*DpiX;
             // Rect.bottom=Rect.top+2*DpiY;
             // DrawText(Printer()->Handle, PCLSideTwo,-1,&Rect,
DT_NOCLIP+DT_NOPREFIX);
              unsigned long x;
              int
y=WritePrinter(Printer()->Handle,PCLSideTwo,sizeof(PCLSideTwo), &x);
When executed: ADevice contains the printer name, y is 0, x is 116 and
nothing is printed.
If I try the commented code using DrawText() then the \x01B prints as a
small square and the remaning text of PCLSideTwo is printed.
I appreciate your help - do you have any more suggestions about how I can
get a PCL code to print?

John

> A couple things. The pointer parameters must point to an
> allocated buffer. You can dyamically allocate one chunk from
> the heap and assign the pointers:
>
>     char* ADevice = new char[ 256 * 3 ];
>     char* ADriver = (char*)ADevice + 256;
>     char* APort   = (char*)ADriver + 256;
>
> The casting most likely isn't needed but I can't help myself.
> Don't forget to delete [] ADevice;
>
> OR ... you can allocate it from the stack:
>
>     char ADevice[ 256 ] = { 0 };
>     char ADriver[ 256 ] = { 0 };
>     char APort[ 256 ]   = { 0 };
>
> >    int  ADeviceMode;
>
> Although an int is most likely ok here, it should be a THandle:
>
>     THandle ADeviceMode;
>
> >    DEVMODE DMode;
>
> Get rid of this line.
>
> >    Printer()->GetPrinter(ADevice, ADriver, APort, DMode);
>
> Replace the DMode parameter with ADeviceMode:
>
>     Printer()->GetPrinter(ADevice, ADriver, APort, ADeviceMode);
>
> >    Printer()->SetPrinter(ADevice, ADriver, APort, DMode);
>
> Same here:
>
>     Printer()->SetPrinter(ADevice, ADriver, APort, ADeviceMode);
>
> You also didn't show that you were setting the Printer()->PrinterIndex.
> The final block of code should look something like this:
>
>     char ADevice[ 256 ] = { 0 };
>     char ADriver[ 256 ] = { 0 };
>     char APort[ 256 ]   = { 0 };
>     THandle ADeviceMode;
>
>     Printer()->PrinterIndex = a valid printer number
>     Printer()->GetPrinter( ADevice, ADriver, APort, ADeviceMode );
>     Printer()->SetPrinter( ADevice, ADriver, APort, ADeviceMode );
>
> ~ JD
>