🚀 go-pugleaf

I will go to my client on Monday and try it out.

Thanks for all your help

John
"Bob Gonder" <notbg@notmindspring.invalid> wrote in message
news:7c9ftvgrpm87962diqh5csq8c89lpt30p7@4ax.com...
> John Scott wrote:
> >
> >I experimented and if I used:
> >    LPDEVMODE DevMode=(LPDEVMODE)GlobalLock(&ADeviceMode);
> >and:     GlobalUnlock(&ADeviceMode);
> >
> >it compiled clean. Does that look correct?
>
> No.  But the important question is "Does it work?"
> Try it and find out.
> Oh, and check return values for everything, too. You can use the
> ErrorBox routine I posted earlier to show the English version of
> GetLastError(), Something like
> ErrorBoxCancel(GetLastError(),"GetPrinter");
>
> This that you posted doesn't sound like what's in the vcl help, and
> the compiler is agreeing with the vcl help, not what you posted:
> >
> >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.
> Don't know where you got that, but it sounds like it's all wrong. So I
> now suspect it won't work that way.  I don't have vcl, and never used
> it.  All I can suggest if you really want to use it, is to use the
> debugger to see exactly what it returns for ADeviceMode. Dump the
> memory pointed to by the contents of ADeviceMode, and see if it looks
> like a DEVMODE structure.
>
> If it fails, fall back to my original suggestion (this *is* the API
> group after all).
>
> I think there's some way to get the proper printer handle out of
> TPrinter.
>
> num_bytes = DocumentProperties(NULL, printerHandle, &printer_name,
> NULL, NULL, 0);
> DevMode = (DEVMODE*)GlobalAlloc( GMEM_FIXED|GMEM_ZEROINIT,num_bytes);
> DocumentProperties(NULL, printerHandle, &printer_name, DevMode,
> NULL, DM_OUT_BUFFER);
>
> DevMode.dmDuplex = DMDUP_VERTICAL;
> DevMode.dmFields =  DM_DUPLEX;
>
> DocumentProperties(NULL, printerHandle, &printer_name, DevMode,
> DevMode, DM_OUT_BUFFER | DM_IN_BUFFER);
> {...}
> GlobalFree(DevMode);
>
>