精华内容
下载资源
问答
  • 2021-05-24 07:54:32

    打开文件对话框const char pszFilter[] = _T("EXE File (*.txt)|*.txt|All Files (*.*)|*.*||");

    CFileDialog dlg(TRUE, NULL, NULL, OFN_HIDEREADONLY | OFN_OVERWRITEPROMPT,

    pszFilter, this);

    dlg.m_ofn.lpstrInitialDir = "c:\\WINDOWS\\";  //设置对话框默认呈现的路径

    if(dlg.DoModal() == IDOK)

    {

    CString strFilePath = dlg.GetPathName();

    /*如果有多个文件,则

    for(POSITION pos = dlg.GetStartPosition(); pos!=NULL; )

    {

    CString strFilePathName = dlg.GetNextPathName(pos);

    */

    }

    保存文件对话框const char pszFilter[] = _T("EXE Files (*.txt)|*.txt||");

    CFileDialog dlgSave( FALSE,   //FALSE为保存

    _T(".txt"), //自动加上的扩展名

    _T("Output.txt"),  //默认保存的文件名

    OFN_HIDEREADONLY | OFN_OVERWRITEPROMPT,

    pszFilter, this);

    目录选择对话框

    BROWSEINFO bi;

    char szPathName[MAX_PATH];

    char szTitle[] = "选择路径";

    ZeroMemory(&bi, sizeof(BROWSEINFO));

    bi.hwndOwner = GetSafeHwnd();

    bi.pszDisplayName = szPathName;

    bi.lpszTitle = szTitle;

    bi.ulFlags = 0x0040 ;

    CString str;

    CString strDir;  //选择的目录

    LPITEMIDLIST idl = SHBrowseForFolder(&bi);

    if(idl == NULL)

    {

    strDir= "";

    return;

    }

    SHGetPathFromIDList(idl, str.GetBuffer(MAX_PATH * 2));

    str.ReleaseBuffer();

    if(str != "" && str.GetAt(str.GetLength() - 1) != '\\')

    str += "\\";

    strDir = str;

    posted on 2006-12-06 16:17 永遇乐 阅读(12537) 评论(0)  编辑 收藏 引用 所属分类: Windows MFC

    更多相关内容
  • C# //打开对话框读取文件 //打开对话框保存文件
  • 调用浏览对话框SHBrowseForFolder不一样的打开对话框
  • 西门子WinCC 如何使用 VBS 调用文件打开对话框pdf,本文介绍了在WinCC 中如何使用 VBS 调用文件打开对话框,系统环境 XP SP3, IE 6.0 SP3。
  • vc定制打开文件对话框,实现文本预览.zip
  • 8.如何在程序启动时弹出文件打开对话框?(Visual C++编程 源代码)8.如何在程序启动时弹出文件打开对话框?(Visual C++编程 源代码)8.如何在程序启动时弹出文件打开对话框?(Visual C++编程 源代码)8.如何在...
  • 主要介绍了PyQt5打开文件对话框QFileDialog实例代码,分享了相关代码示例,小编觉得还是挺不错的,具有一定借鉴价值,需要的朋友可以参考下
  • VC_CFileOpen打开文件对话框中实现多选文件.visual c++
  • 弹出子对话框,在子对话框特定位置,显示非模态对话框对话框之间的数据传递
  • 易语言API打开对话框源码
  • 在文件打开对话框上加控件
  • c#自定义打开对话框

    2013-05-15 15:03:13
    用c#写的自定义打开对话框。写的时候刚学C#,代码都比较简单,功能也不复杂。
  • 打开windows运行对话框的js
  • vc调用文件浏览对话框(有树型控件的文件打开对话框).visual c++
  • API打开对话框.rar

    2020-04-04 08:47:41
    API打开对话框.rar
  • python打开文件对话框

    千次阅读 2021-01-11 20:03:07
    实现Python打开对话框的问题CSS布局HTML小编今天和大家分享用Python代码实现弹出打开对话框,并获取选择文件的路径。可以使用tkinter.filedialog模块中的askopenfilename函数来实现,tkinter是python自带的GUI,通过...

    实现Python打开对话框的问题

    CSS布局HTML小编今天和大家分享用Python代码实现弹出打开对话框,并获取选择文件的路径。

    可以使用tkinter.filedialog模块中的askopenfilename函数来实现,tkinter是python自带的GUI,通过askopenfilename函数打开选择文件对话框,代码如下: import tkinter.filedialogfn=tkinter.filedialog.askopenfilename(title='选择一个文件', f

    “python”如何用“tkinter”模块打开文件?

    大概如下:在界面上点击一个按纽,弹出一个选择文件的对话框,找到目标你说的是“打开文件对话框”,需要用到FileDialog模块,代码非常简单: from Tkinter import * from FileDialog import * root = Tk() fd = LoadFileDialog(root) # 创建打开文件对话框 filename = fd.go() # 显示打开文件对话框。

    怎么用python获取一个文件夹的路径,要对话框模式

    点一个按钮,然后弹出一个对话框,可以选择要的文件夹,返回的是一个文哦。这是个问题哟。好象是我也遇到过。似乎是一个开关。要允许打开空文件?还是什么的。或者是你回到上一级目录,点击目录,然后点打开。 打开lib-tk目录下的FileDialog.py,我给你找一找。 代码显示,这个对话框是可以同时支持dir和file的。

    为什么我安装python后桌面没有快捷图标,双击安装为什么我安装python后桌面没有生成快捷图标,双击安装文件夹下的图标,安装成功了。你写的.py文件双击就能运行了,想要好看的界面在开始菜单里有个IDLE。

    python 用tkinter模块怎么打开文件

    Python3.6 tkinter 复数个文件对话框选择文件不能from tkinter import *from tkinter.filedialog import askopenfilenamedef selectPath_hex1(): path_tmp= askopenfilename(filetypes=[("hex格式","Hex")]) path_hex1.set(path_tmp)

    新手CSS布局HTML小编今天和大家分享教,pyqt4,输入对话框奔溃 python贴代码,另外是崩溃还是闪退? 这个有区别的。

    展开全文
  • VB打开对话框ShowOpen

    2021-01-07 20:40:29
    “ 本节课程一起学习CommonDialog控件中的ShowOpen方法——打开对话框” 一、添加CommonDialog控件 首先我们需要添加CommonDialog对话框控件。 在工具箱空白处右键,选择“部件“,进入控件选择界面。 找到...

    “ 本节课程一起学习CommonDialog控件中的ShowOpen方法——打开对话框”

    图片

    一、添加CommonDialog控件

    首先我们需要添加CommonDialog对话框控件。

    在工具箱空白处右键,选择“部件“,进入控件选择界面。

    找到Microsoft Common Dialog Control 6.0(SP6),在其复选框打勾,然后单击确定按钮。即可将此控件添加到工具箱。

    图片

    少部分电脑如果不能成功添加,那么是因为该文件没有被正确注册,可以进入安全模式,然后尝试重新注册该控件。

    二、添加到窗体

    将CommonDialog控件拖拽到窗体上,完成引用。

    展开全文
  • 自定义文件打开对话框 带预览文件功能的打开对话框.zip
  • 内容索引:VB源码,系统相关,对话框,API,浏览文件 打开系统的“浏览文件”对话框,很多人都用控件,这固然很好,但如果用VB自身编程去实现岂不是更好,这个源码就是用VB中的API函数打开“浏览文件”对话框,这使得你...
  • 主要介绍了JavaScript实现控制打开文件另存为对话框的方法,实例分析了javascript实现文件另存为的技巧,非常具有实用价值,需要的朋友可以参考下
  • OpenFileDialog类提供了用户打开文件的功能,它有如下属性: 属性 InitialDirectory:设置对话框的初始目录。 Filter:要在对话框中显示的文件筛选器,例如...Multiselect:设置打开对话框可以多选。 1、新建一个Winfor
  • 自定义的带预览功能的文件打开对话框 自定义的带预览功能的打开文件对话框 本例以预览AutoCAD的DWG文件为例
  • 易语言API打开对话框源码。@资源源码站。
  • 主要为大家详细介绍了PyQt打开保存对话框的方法和使用,具有一定的参考价值,感兴趣的小伙伴们可以参考一下
  • vba打开文件对话框(1.对话框路径为指定路径;2.对话框路径为上次操作使用路径;)

    系列文章目录

    前言

    学会长大,学会承受!!

    一、vba打开文件对话框

    只需要修改初始路径即可!!

    .InitialFileName = ThisWorkbook.Path & "\"
    

    1.对话框路径为指定路径

    代码如下(路径为当前文件所在路径):

    Sub 汇总()
    
        Dim fd As FileDialog
        Set fd = Application.FileDialog(msoFileDialogFilePicker)
        Dim vrtSelectedItem As Variant
        With fd
            .Filters.Clear        
            .Filters.Add "CSV", "*.CSV", 1
            .InitialFileName = ThisWorkbook.Path & "\"
            If .Show = -1 Then
                For Each vrtSelectedItem In .SelectedItems
                    If vrtSelectedItem <> "" Then
                        InputData (vrtSelectedItem)
                    End If
                    Exit For
                Next vrtSelectedItem
            Else
            End If
        End With
        Set fd = Nothing
    End Sub
    

    代码如下(路径为自定义路径):

    Sub 汇总()
    
        Dim fd As FileDialog
        Set fd = Application.FileDialog(msoFileDialogFilePicker)
        Dim vrtSelectedItem As Variant
        With fd
            .Filters.Clear        
            .Filters.Add "CSV", "*.CSV", 1
            .InitialFileName = "\\192.168.177.27\研发" & "\"
            If .Show = -1 Then
                For Each vrtSelectedItem In .SelectedItems
                    If vrtSelectedItem <> "" Then
                        InputData (vrtSelectedItem)
                    End If
                    Exit For
                Next vrtSelectedItem
            Else
            End If
        End With
        Set fd = Nothing
    End Sub
    

    2.对话框路径为上次操作使用路径

    代码如下(最简略):

    Sub OpenFile()
        fileToOpen = Application _
            .GetOpenFilename("Dat Files (*.DAT), *.dat, Text Files (*.txt), *.txt")
            
    End Sub
    

    代码如下(实例应用,删除路径也可以):

    Sub 汇总()
    
        Dim fd As FileDialog
        Set fd = Application.FileDialog(msoFileDialogFilePicker)
        Dim vrtSelectedItem As Variant
        With fd
            .Filters.Clear        
            .InitialFileName = "Dat Files (*.CSV), *.csv, Text Files (*.txt), *.txt"
            If .Show = -1 Then
                For Each vrtSelectedItem In .SelectedItems
                    If vrtSelectedItem <> "" Then
                        InputData (vrtSelectedItem)
                    End If
                    Exit For
                Next vrtSelectedItem
            Else
            End If
        End With
        Set fd = Nothing
    End Sub
    

    二、参考源码

    1.单个文件

    代码如下(示例):

    
    Sub SelectFile()
        '选择单一文件
        With Application.FileDialog(msoFileDialogFilePicker)
            .AllowMultiSelect = False   '单选择
            .Filters.Clear   '清除文件过滤器
            .Filters.Add "Excel Files", "*.xls;*.xlw"
            .Filters.Add "All Files", "*.*"          '设置两个文件过滤器
            If .Show = -1 Then    'FileDialog 对象的 Show 方法显示对话框,并且返回 -1(如果您按 OK)和 0(如果您按 Cancel)。
                MsgBox "您选择的文件是:" & .SelectedItems(1), vbOKOnly + vbInformation, "智能Excel"
            End If
        End With
    End Sub
    
    
    
    

    2.多个文件

    代码如下(示例):

    Sub SelectFile()
        '选择多个文件
        Dim l As Long
        With Application.FileDialog(msoFileDialogFilePicker)
            .AllowMultiSelect = True   '单选择
            .Filters.Clear     '清除文件过滤器
            .Filters.Add "Excel Files", "*.xls;*.xlw"
            .Filters.Add "All Files", "*.*"    '设置两个文件过滤器
            .Show
            'FileDialog 对象的 Show 方法显示对话框,并且返回 -1(如果您按 OK)和 0(如果您按 Cancel)。
            For l = 1 To .SelectedItems.Count
                MsgBox "您选择的文件是:" & .SelectedItems(l), vbOKOnly + vbInformation, "智能Excel"
            Next
        End With
    End Sub
    
    

    3.其它

    代码如下(示例):

    Sub SelectFolder()
        '选择单一文件
        With Application.FileDialog(msoFileDialogFolderPicker)
            If .Show = -1 Then
            'FileDialog 对象的 Show 方法显示对话框,并且返回 -1(如果您按 OK)和 0(如果您按 Cancel)。
                MsgBox "您选择的文件夹是:" & .SelectedItems(1), vbOKOnly + vbInformation, "智能Excel"
            End If
        End With
    End Sub
    
    

    代码如下(示例):

    
    Sub SelectFile()
        '选择单一文件
        With Application.FileDialog(msoFileDialogFilePicker)
            .AllowMultiSelect = False   '单选择
            .Filters.Clear   '清除文件过滤器
            .Filters.Add "Excel Files", "*.xls;*.xlw"
            .Filters.Add "All Files", "*.*"          '设置两个文件过滤器
           .Execute
        End With
    End Sub
    

    总结

    分享:
    乐曲本身单纯如镜,你之所以能够从白雪中听出那么深沉的悲伤,只有一个原因,那个一直没有从噩梦中醒来的人,恰恰就是你自己。

    展开全文
  • 该库提供了一种用于打开对话框的功能,一种用于保存对话框的功能:sfd_Options opt = {.title =“打开图像文件”,.filter_name =“图像文件”,.filter =“ * .png | * .jpg”,}; const char *文件名= sfd_open_...
  • 免控件利用API获取选择的文件夹路径 以方便获取该文件夹下的文件处理
  • vc实现在文件打开对话框右边增加打印预览功能添加打印按钮previewdemo.rar
  • 本文实例讲述了C++采用openfilename打开文件对话框用法,分享给大家供大家参考。具体方法如下: 这里需要注意,有的时候会因为没设置nMaxFile,而一直不出现对话框。 具体功能代码如下: 代码如下:char szFileName...

空空如也

空空如也

1 2 3 4 5 ... 20
收藏数 454,970
精华内容 181,988
关键字:

怎样打开对话框