🚀 go-pugleaf

This uis what I tried
    // Nov 2003 to print double sided
    char ADevice[256]={0}, ADriver[256]={0}, APort[256]={0};
    THandle  ADeviceMode;
    Printer()->GetPrinter(ADevice, ADriver, APort, ADeviceMode);
    LPDEVMODE DevMode=(LPDEVMODE)GlobalLock(ADeviceMode);
// error at line above was: Cannot convert 'unsigned int' to 'void *'
// also Type missmatch in 'hMem' (Wanted 'voud 8' gor 'unsigned int')
    if (rgDuplex->ItemIndex==0) // Radio group to select duplex or simplex
    {
       DevMode->dmDuplex=DMDUP_VERTICAL;
       DevMode->dmFields=DM_DUPLEX;
    }
    else
    {
       DevMode->dmDuplex=DMDUP_SIMPLEX;
    }
    Printer()->SetPrinter(ADevice, ADriver, APort, ADeviceMode);
   // errors on line above:
  //   Type missmatch in parameter 'ADeviceMode'(wanted 'unsigned int', got
'unsigned int *')
  //   Cannot convert 'unsigned int' to 'void *'
    GlobalUnlock(ADeviceMode);
  // error in line above:
  //  Type missmatch in parameter 'hMem' (Wanted 'void *', got 'unsigned int
')
    // end of add Nov 2003

I experimented and if I used:
    LPDEVMODE DevMode=(LPDEVMODE)GlobalLock(&ADeviceMode);
and:     GlobalUnlock(&ADeviceMode);


it compiled clean. Does that look correct?

Sorry to be so dim about this but I rarely do this type of code.

>
>     THandle  ADeviceMode;
>     Printer()->GetPrinter(ADevice, ADriver, APort, ADeviceMode);
>  returns the HANDLE  ADeviceMode.
>
> HANDLES are NOT addresses.
> Turn the Handle into an address:
> LPDEVMODE DevMode = (LPDEVMODE)GlobalLock(ADeviceMode);
> Use the DEVMODE:
> DevMode->dmDuplex = DMDUP_VERTICAL;
> DevMode->dmFields = DM_DUPLEX;
> GlobalUnlock(ADeviceMode);
> Printer()->SetPrinter();
> I don't know if you need to unlock before or after the SetPrinter.
> Also don't know if you need to GlobalFree the handle, or if the VCL
> handles that. (VCL hides too much, that's one reason I don't use it)
>
>
>
>
>