ShowFileOpenDialog
In Module PicMain
Too many parameters: ShowFileOpenDialog
Line too long: 296
Optional parameter never passed a value: DialogTitle
Optional parameter never passed a value: InitialDir
Optional parameter never passed a value: Flags
Optional parameter never passed a value: FilterIndex
117 Public Function ShowFileOpenDialog(ByVal hwndOwner As Long, ByVal DefaultExtension As String, ByVal Filter As String, Optional ByRef FilterIndex As Long, Optional ByVal InitialDir As String, Optional ByVal DialogTitle As String, Optional ByRef Flags As EFileDlgFlags = OFN_OPENDEFAULTS) As String
118 ' Show the Open file dialog box using comdlg32.dll
119 ' [hwndOwner] In. Window handle of owner window. Can be zero.
120 ' [DefaultExtension] In. Default file extension such as "txt".
121 ' [Filter] In. Filters in format "File type|*.ext;*.txt|All files|*.*".
122 ' [FilterIndex] In/out. Selected file type in filter. First filter is number 1.
123 ' [InitialDir] In. Initial directory. If not given or empty, uses system default initial directory. See FileDialog for explanation.
124 ' [DialogTitle] In. Dialog caption. If not given or empty, uses system default caption.
125 ' [Flags] In/out. Flags for the dialog. Should be given as "OFN_OPENDEFAULTS or ...". On return contains any altered flags.
126 ' Return value:
127 ' Selected file name if user pressed OK
128 ' Empty string if user pressed Cancel or there was an error
129 ' Caller can verify error status by calling CommDlgExtendedError
130
131 ShowFileOpenDialog = FileDialog(hwndOwner, DefaultExtension, Filter, FilterIndex, InitialDir, DialogTitle, Flags)
132
133 End Function
134
Called by
– OpenFile_Click in Form PicForm
Calls
> FileDialog