Common Dialog Control

allyeric · May 9, 2000

I would like to use the common dialog control to get a picture file from the user, and insert the picture into an image box on the form.  I am not quite sure how to use this control, and I have searched MSDN, but, unfortunately, there is not much information there.  Can someone please help?  And, maybe recommend a site where I can learn more about this? Thanks in advance

NickBulka · May 9, 2000

In a nutshell: after putting a commondialog on your form, call commondialog1.showopen.  After the user has selected a file, it will be in commondialog1.filename.  You'll probably want to adjust the flags property before you open the commondialog. nick bulka <a href=mailto:nick@bulka.com>nick@bulka.com</a> <a href= > </a>

allyeric · May 9, 2000

I kinda figured that part out so far - but when I try that I get errors.  Here is my code: cdComDia.ShowOpen OpenFile (cdComDia.FileName)     imgPicture.Picture = cdComDia.FileName when I use this, it give me the error: wrong number of arguments or invalid property assignment  (this error is on the OpenFile line) If I remove that line, I get this error:  type mismatch  (this error is on .FileName) It looked pretty easy when I started, but not as easy as it looked.  Perhaps there is another way to achieve what I want to do here?

Guest_imported · May 9, 2000

Try this instead: 'Set Flags Here 'cdlDialog.Flags = ... cdlDialog.ShowOpen imgPicture.Picture = LoadPicture(cdlDialog.FileName) (You'll still need some error handling in case the file is not a valid image file, or in case it can't be read.) Kenny Acock Teacher's Pal, Inc. <A HREF="mailto:kennya@teacherspal.com">kennya@teacherspal.com</A>

NickBulka · May 10, 2000

Another thing you'll need to do is to deal with the fact that the user might cancel out of the common dialog.  You'll want to check out the cancelerror property, and add a handler for this case. nick bulka <a href=mailto:nick@bulka.com>nick@bulka.com</a> <a href= > </a>

allyeric · May 10, 2000

thank you both for your reply - I am trying to figure out the flags now.  Is there another - easier - way to accomplish what I need to do here?  And, if not, can you perhaps suggest a site where I can learn more about this control, and the flags?

Drone38 · May 10, 2000

Use this function if you won't give an ocx with your program.Many people don't like have many *.ocx on their PC Public Type OPENFILENAME         lStructSize As Long         hwndOwner As Long         hInstance As Long         lpstrFilter As String         lpstrCustomFilter As String         nMaxCustFilter As Long         nFilterIndex As Long         lpstrFile As String         nMaxFile As Long         lpstrFileTitle As String         nMaxFileTitle As Long         lpstrInitialDir As String         lpstrTitle As String         flags As Long         nFileOffset As Integer         nFileExtension As Integer         lpstrDefExt As String         lCustData As Long         lpfnHook As Long         lpTemplateName As String End Type ' Public Declare Function GetOpenFileName Lib "comdlg32.dll" Alias "GetOpenFileNameA" (pOpenfilename As OPENFILENAME) As Long Public Declare Function GetSaveFileName Lib "comdlg32.dll" Alias "GetSaveFileNameA" (pOpenfilename As OPENFILENAME) As Long ' ' Constant flags Public Const OFN_ALLOWMULTISELECT = &H200 Public Const OFN_CREATEPROMPT = &H2000 Public Const OFN_ENABLEHOOK = &H20 Public Const OFN_ENABLETEMPLATE = &H40 Public Const OFN_ENABLETEMPLATEHANDLE = &H80 Public Const OFN_EXPLORER = &H80000 Public Const OFN_EXTENSIONDIFFERENT = &H400 Public Const OFN_FILEMUSTEXIST = &H1000 Public Const OFN_HIDEREADONLY = &H4 Public Const OFN_LONGNAMES = &H200000 Public Const OFN_NOCHANGEDIR = &H8 Public Const OFN_NODEREFERENCELINKS = &H100000 Public Const OFN_NOLONGNAMES = &H40000 Public Const OFN_NONETWORKBUTTON = &H20000 Public Const OFN_NOREADONLYRETURN = &H8000 Public Const OFN_NOTESTFILECREATE = &H10000 Public Const OFN_NOVALIDATE = &H100 Public Const OFN_OVERWRITEPROMPT = &H2 Public Const OFN_PATHMUSTEXIST = &H800 Public Const OFN_READONLY = &H1 Public Const OFN_SHAREAWARE = &H4000 Public Const OFN_SHAREFALLTHROUGH = 2 Public Const OFN_SHARENOWARN = 1 Public Const OFN_SHAREWARN = 0 Public Const OFN_SHOWHELP = &H10 ' Global Dialogue As OPENFILENAME Public Function Dlg(Title As String, Filter As String, Hwnd As Long) As String Dim Fichier As String Dim Filtre As String Dim RetVal As Long Dialogue.lStructSize = Len(Dialogue) Dialogue.hwndOwner = Hwnd Dialogue.hInstance = App.hInstance Dialogue.lpstrFilter = Filter Dialogue.lpstrFile = Space(254) Dialogue.nMaxFile = 255 Dialogue.lpstrFileTitle = Space(254) Dialogue.nMaxFileTitle = 255 Dialogue.lpstrInitialDir = App.Path Dialogue.lpstrTitle = Title Dialogue.flags = 6148 ' RetVal = GetOpenFileName(Dialogue) If RetVal = 0 Then Dlg = "" Else Dlg = Dialogue.lpstrFile End If End Function If you want some help about the flags look at it : Flag Meaning OFN_ALLOWMULTISELECT Specifies that the File Name list box allows multiple selections. If you also set the OFN_EXPLORER flag, the dialog box uses the Explorer-style user interface; otherwise, it uses the old-style user interface. If the user selects more than one file, the lpstrFile buffer returns the path to the current directory followed by the filenames of the selected files. The nFileOffset member is the offset to the first filename, and the nFileExtension member is not used. For Explorer-style dialog boxes, the directory and filename strings are NULL separated, with an extra NULL character after the last filename. This format enables the Explorer-style dialogs to return long filenames that include spaces. For old-style dialog boxes, the directory and filename strings are separated by spaces and the function uses short filenames for filenames with spaces. You can use the FindFirstFile function to convert between long and short filenames. If you specify a custom template for an old-style dialog box, the definition of the File Name list box must contain the LBS_EXTENDEDSEL value.    OFN_CREATEPROMPT If the user specifies a file that does not exist, this flag causes the dialog box to prompt the user for permission to create the file. If the user chooses to create the file, the dialog box closes and the function returns the specified name; otherwise, the dialog box remains open. OFN_ENABLEHOOK Enables the hook function specified in the lpfnHook member. OFN_ENABLETEMPLATE Indicates that the lpTemplateName member points to the name of a dialog template resource in the module identified by the hInstance member.If the OFN_EXPLORER flag is set, the system uses the specified template to create a dialog box that is a child of the default Explorer-style dialog box. If the OFN_EXPLORER flag is not set, the system uses the template to create an old-style dialog box that replaces the default dialog box. OFN_ENABLETEMPLATEHANDLE Indicates that the hInstance member identifies a data block that contains a preloaded dialog box template. The system ignores the lpTemplateName if this flag is specified.If the OFN_EXPLORER flag is set, the system uses the specified template to create a dialog box that is a child of the default Explorer-style dialog box. If the OFN_EXPLORER flag is not set, the system uses the template to create an old-style dialog box that replaces the default dialog box. OFN_EXPLORER Indicates that any customizations made to the Open or Save As dialog box use the new Explorer-style customization methods. For more information, see the "Explorer-Style Hook Procedures" and "Explorer-Style Custom Templates" sections of the Common Dialog Box Library overview.By default, the Open and Save As dialog boxes use the Explorer-style user interface regardless of whether this flag is set. This flag is necessary only if you provide a hook procedure or custom template, or set the OFN_ALLOWMULTISELECT flag. If you want the old-style user interface, omit the OFN_EXPLORER flag and provide a replacement old-style template or hook procedure. If you want the old style but do not need a custom template or hook procedure, simply provide a hook procedure that always returns FALSE. OFN_EXTENSIONDIFFERENT Specifies that the user typed a filename extension that differs from the extension specified by lpstrDefExt. The function does not use this flag if lpstrDefExt is NULL. OFN_FILEMUSTEXIST Specifies that the user can type only names of existing files in the File Name entry field. If this flag is specified and the user enters an invalid name, the dialog box procedure displays a warning in a message box. If this flag is specified, the OFN_PATHMUSTEXIST flag is also used. OFN_HIDEREADONLY Hides the Read Only check box. OFN_LONGNAMES For old-style dialog boxes, this flag causes the dialog box to use long filenames. If this flag is not specified, or if the OFN_ALLOWMULTISELECT flag is also set, old-style dialog boxes use short filenames (8.3 format) for filenames with spaces. Explorer-style dialog boxes ignore this flag and always display long filenames. OFN_NOCHANGEDIR Restores the current directory to its original value if the user changed the directory while searching for files. OFN_NODEREFERENCELINKS Directs the dialog box to return the path and filename of the selected shortcut (.LNK) file. If this value is not given, the dialog box returns the path and filename of the file referenced by the shortcut OFN_NOLONGNAMES For old-style dialog boxes, this flag causes the dialog box to use short filenames (8.3 format). Explorer-style dialog boxes ignore this flag and always display long filenames. OFN_NONETWORKBUTTON Hides and disables the Network button. OFN_NOREADONLYRETURN Specifies that the returned file does not have the Read Only check box checked and is not in a write-protected directory. OFN_NOTESTFILECREATE Specifies that the file is not created before the dialog box is closed. This flag should be specified if the application saves the file on a create-nonmodify network sharepoint. When an application specifies this flag, the library does not check for write protection, a full disk, an open drive door, or network protection. Applications using this flag must perform file operations carefully, because a file cannot be reopened once it is closed. OFN_NOVALIDATE Specifies that the common dialog boxes allow invalid characters in the returned filename. Typically, the calling application uses a hook procedure that checks the filename by using the FILEOKSTRING message. If the text box in the edit control is empty or contains nothing but spaces, the lists of files and directories are updated. If the text box in the edit control contains anything else, nFileOffset and nFileExtension are set to values generated by parsing the text. No default extension is added to the text, nor is text copied to the buffer specified by lpstrFileTitle. If the value specified by nFileOffset is less than zero, the filename is invalid. Otherwise, the filename is valid, and nFileExtension and nFileOffset can be used as if the OFN_NOVALIDATE flag had not been specified. OFN_OVERWRITEPROMPT Causes the Save As dialog box to generate a message box if the selected file already exists. The user must confirm whether to overwrite the file. OFN_PATHMUSTEXIST Specifies that the user can type only valid paths and filenames. If this flag is used and the user types an invalid path and filename in the File Name entry field, the dialog box function displays a warning in a message box. OFN_READONLY Causes the Read Only check box to be checked initially when the dialog box is created. This flag indicates the state of the Read Only check box when the dialog box is closed. OFN_SHAREAWARE Specifies that if a call to the OpenFile function fails because of a network sharing violation, the error is ignored and the dialog box returns the selected filename. If this flag is not set, the dialog box notifies your hook procedure when a network sharing violation occurs for the filename specified by the user. If you set the OFN_EXPLORER flag, the dialog box sends the CDN_SHAREVIOLATION message to the hook procedure. If you do not set OFN_EXPLORER, the dialog box sends the SHAREVISTRING registered message to the hook procedure. OFN_SHOWHELP Causes the dialog box to display the Help button. The hwndOwner member must specify the window to receive the HELPMSGSTRING registered messages that the dialog box sends when the user clicks the Help button.An Explorer-style dialog box sends a CDN_HELP notification message to your hook procedure when the user clicks the Help button. Send me remark at <A HREF="mailto:drone38@mageos.com">drone38@mageos.com</A>

Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

Common Dialog Control

allyeric

Programmer

NickBulka

Programmer

allyeric

Programmer

Guest_imported

New member

NickBulka

Programmer

allyeric

Programmer

Drone38

Programmer

Similar threads

Part and Inventory Search

Sponsor