🚀 go-pugleaf

I guess I was confused. The help for the TPrinter object shows the
GetPrinter() method as using a pointer to a DEVMODE as the last parameter.
Retrieves information about the current printer.

void __fastcall GetPrinter(char * ADevice, char * ADriver, char * APort, int
&ADeviceMode);

Description

Call GetPrinter to obtain information about the current printer.

ADevice is a buffer that receives the device name of the current printer.
This is the name that appears in the Print Manager (for example, "Epson
FX-80"). It is not the printer model name.

ADriver is a buffer that receives the driver name for the current printer.
Some versions of Windows do not use printer driver names, in which case this
buffer is unused. On versions of Windows that support printer driver names,
this is the name of a printer driver (usually '
WINSPOOL').

APort is a buffer that receives the port used by the current printer. It is
not used on 32-bit versions of Windows, but is included for backward
compatibility.

DeviceMode returns the handle to a memory buffer containing a DEVMODE
structure, which contains device-specific initialization data for the device
driver. Use the GlobalLock function to convert this handle into a pointer to
the structure.

I Guess I need to explore that GlobalLock function. I want to stick with the
VCL as much as possible since the existing code is VCL.
>
> I have no idea what GetPrinter() does (I don't do VCL), but it is
> obvious that ADeviceMode is a THandle, not a DEVMODE.
>
> AS I posted before, you need to use DocumentProperties() or the VCL
> equiv. to get/set the devmode.
>
> num_bytes = DocumentProperties(NULL, printerHandle, &printerfile_port,
> NULL, NULL, 0);
> DevMode = (DEVMODE*)GlobalAlloc( GMEM_FIXED |GMEM_ZEROINIT,num_bytes);
> DocumentProperties(NULL, printerHandle, &printerfile_port, DevMode,
> NULL, DM_OUT_BUFFER);
> // modify the appropriate fields
> DevMode->dmFields = DM_ORIENTATION | DM_PRINTQUALITY ;
> DevMode->dmOrientation = printer_direction=='L'? DMORIENT_LANDSCAPE:
> DMORIENT_PORTRAIT;
> DevMode->dmPrintQuality = DMRES_HIGH;
> // call DocumentProperties() yet again, this time to get the
> final DEVMODE to pass into the CreateDC() function
> DocumentProperties(NULL, printerHandle, &printerfile_port, DevMode,
> DevMode, DM_OUT_BUFFER | DM_IN_BUFFER);
> // create a printer device context
> printerDC = CreateDC( NULL/*Driver.c_str()*/, &printerfile_port, NULL,
> DevMode);
> GlobalFree(DevMode);
>
>
> >One final thing how does Printer()->NewPage; differ from the StartPage()
and
> >EndPage()?
>
> Don't know, but it probably calls them.
>
>