🚀 go-pugleaf

"A Whitesell" <awhitesell@attbi.com> wrote in message
news:3f04aaa7@newsgroups.borland.com...
> No offense Hans, but this reference is 4 years old to a news group that no
> longer exists.

Had to use Google's GROUP search....
Here's the Text of the thread...

            Search Result 1
      From: Damon Chandler (dmc27@cornell.edu)
      Subject: Re: Changing PageSize for a print job
            View: Complete Thread (2 articles)
            Original Format
      Newsgroups: borland.public.cppbuilder.winapi
      Date: 1999/10/18


Hi Klaus,
> How can I change the page size if my document without calling the
> printer setup dialogbox.

You can use the DocumentProperties() function to accomplish this.  Here's a
simple example...

    // get the default printer name, driver, and port
    char *def_string = "no printer";
    char buffer[MAX_PATH];
    GetProfileString("windows", "device", def_string,
                     buffer, MAX_PATH);

    AnsiString Abuffer(buffer);
    AnsiString Device, Driver, Port;

    // parse the buffer to extract individual properties
    int first_comma = Abuffer.Pos(",");
    Device = Abuffer.SubString(1, first_comma - 1);
    Abuffer = Abuffer.SubString(first_comma + 1,
        Abuffer.Length() - first_comma);
    int second_comma = Abuffer.Pos(",");
    Driver = Abuffer.SubString(1, second_comma - 1);
    Port = Abuffer.SubString(second_comma + 1,
                             Abuffer.Length() - second_comma);

    // open the printer
    HANDLE HPrinter;
    if (OpenPrinter(Device.c_str(), &HPrinter, NULL))
    {
        // call DocumentProerties() with a zero fMode parameter
        // to get the number of bytes required
        long int num_bytes;
        num_bytes = DocumentProperties(NULL, HPrinter, Device.c_str(),
                                       NULL, NULL, 0);

        // allocate the memory
        unsigned char *buffer = new unsigned char[num_bytes];

        // call DocumentProperties() again, this time to get the
        // device mode information
        DocumentProperties(NULL, HPrinter, Device.c_str(),
                           (PDEVMODE)buffer, NULL, DM_OUT_BUFFER);

        PDEVMODE pdm = (PDEVMODE)buffer;

        // modify the appropriate fields
        pdm->dmPaperSize = DMPAPER_10X14;  // for example

        // tell Windows which fields we changed
        pdm->dmFields = pdm->dmFields | DM_PAPERSIZE;

        // call DocumentProperties() yet again, this time to get
        // the final DEVMODE to pass into the CreateDC() function
        DocumentProperties(NULL, HPrinter, Device.c_str(),
                           pdm, pdm, DM_OUT_BUFFER | DM_IN_BUFFER);

 // CreateDC(...);
 // print...

        delete [] buffer;
        ClosePrinter(HPrinter);
    }


If you are using the VCL, the TPrinter::GetPrinter() method simplifies this
process.

Good luck.

--------------------------------------
Damon Chandler