Solved

How can I open the printer "Preferences" dialog?

Posted on 2008-10-31
5
317 Views
Last Modified: 2008-11-08
Hello, Experts,

I have customized PageSetup and Print dialogs that emulate the standard dialogs.  I would like to be able to open the "Printer Preferences" dialog by clicking a button (just like can be done on the standard dialogs).  

(On some Print dialogs (such as in Word and Excel) this button is labelled "Properties".  And just to avoid being too consistent, it is labelled "Options" on the Excel PageSetup dialog.)

I thought that this would be trivial, but so far I haven't been able to figure out how to do this.  Does anyone know of an easy way to open this "Printer Preferences" dialog box?

Thanks,
Randy
0
Comment
Question by:omegaomega
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 3
  • 2
5 Comments
 
LVL 6

Expert Comment

by:RishadanPort
ID: 22853162
Have you tried using the PrintDialog Class?
0
 
LVL 6

Expert Comment

by:RishadanPort
ID: 22853203
Why can't you just do this:

            System.Windows.Forms.PrintDialog dialog = new System.Windows.Forms.PrintDialog();
            dialog.ShowDialog();   <-- in here the user can navigate to the advanced settings.
0
 
LVL 12

Author Comment

by:omegaomega
ID: 22853500
Hello, RishadanPort,

I am using a custom PrintDialog form.  I want to emulate the functionality of the "Preferences" button on the standard PrintDialog form.

Cheers,
Randy
0
 
LVL 12

Author Comment

by:omegaomega
ID: 22872225
For anyone else who may be interested, I finally found the answer here:

http://bytes.com/forum/thread389569.html

This answer is provided by (and with my thanks to)  Bart Mermuys.  The attached snippet shows the essence of the solution.

Cheers,
Randy

Imports System.Drawing.Printing
Public Class Form1
    Private Const DM_IN_BUFFER As Integer = 8
    Private Const DM_OUT_BUFFER As Integer = 2
    Private Const DM_IN_PROMPT As Integer = 4
 
    Private Declare Auto Function GlobalLock _
        Lib "kernel32.dll" (ByVal handle As IntPtr) As IntPtr
    Private Declare Auto Function GlobalUnlock _
        Lib "kernel32.dll" (ByVal handle As IntPtr) As Integer
    Private Declare Auto Function GlobalFree _
        Lib "kernel32.dll" (ByVal handle As IntPtr) As IntPtr
    Private Declare Auto Function DocumentProperties _
        Lib "winspool.drv" (ByVal hWnd As IntPtr, _
                            ByVal hPrinter As IntPtr, _
                            ByVal pDeviceName As String, _
                            ByVal pDevModeOutput As IntPtr, _
                            ByVal pDevModeInput As IntPtr, _
                            ByVal fMode As Int32) As Integer
 
    Sub OpenPrinterPropertiesDialog(ByVal Settings As PrinterSettings)
        ' PrinterSettings+PageSettings -> hDEVMODE
        Dim hDevMode As IntPtr
        hDevMode = Settings.GetHdevmode(Settings.DefaultPageSettings)
        ' Show Dialog ( [In,Out] pDEVMODE )
        Dim pDevMode As IntPtr = GlobalLock(hDevMode)
        DocumentProperties(Me.Handle, IntPtr.Zero, _
                Settings.PrinterName, pDevMode, pDevMode, _
                DM_OUT_BUFFER Or DM_IN_BUFFER Or DM_IN_PROMPT)
        GlobalUnlock(hDevMode)
        ' hDEVMODE -> PrinterSettings+PageSettings
        Settings.SetHdevmode(hDevMode)
        Settings.DefaultPageSettings.SetHdevmode(hDevMode)
        ' cleanup
        GlobalFree(hDevMode)
    End Sub
 
    Private Sub Button1_Click(ByVal sender As System.Object, _
                              ByVal e As System.EventArgs) _
                                        Handles Button1.Click
        If (Me.PrintDocument1.PrinterSettings.IsValid) Then
            Me.ShowPrinterProperties(Me.PrintDocument1.PrinterSettings)
        Else
            MsgBox("Invalid Printer Name!", MsgBoxStyle.Information)
        End If
    End Sub
 
End Class

Open in new window

0
 
LVL 12

Accepted Solution

by:
omegaomega earned 0 total points
ID: 22872276
Well, that is not quite it.  I seem to have slipped up with my copy and paste.  The name of the Sub should be changed from "OpenPrinterPropertiesDialog" to "ShowPrinterProperties" to correspond with what is called in the Button1 Click event.

Cheers,
Randy
0

Featured Post

Independent Software Vendors: We Want Your Opinion

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

For those of you who don't follow the news, or just happen to live under rocks, Microsoft Research released a beta SDK (http://www.microsoft.com/en-us/download/details.aspx?id=27876) for the Xbox 360 Kinect. If you don't know what a Kinect is (http:…
Today I had a very interesting conundrum that had to get solved quickly. Needless to say, it wasn't resolved quickly because when we needed it we were very rushed, but as soon as the conference call was over and I took a step back I saw the correct …
There's a multitude of different network monitoring solutions out there, and you're probably wondering what makes NetCrunch so special. It's completely agentless, but does let you create an agent, if you desire. It offers powerful scalability …
Michael from AdRem Software outlines event notifications and Automatic Corrective Actions in network monitoring. Automatic Corrective Actions are scripts, which can automatically run upon discovery of a certain undesirable condition in your network.…

729 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question