首页 > Windows开发 > 详细

选择一个文件夹 - Delphi

时间:2016-10-31 20:49:41      阅读:286      评论:0      收藏:0      [点我收藏+]

    在Delphi中,选择一个文件夹的操作主要有两种方法。一种是通过“打开”对话框(OpenDialog)控件,通过定位一个文件来间接实现。另一种是利用Delphi提供的SelectDirectory函数。这个函数是在FileCtrl单元中定义的。 

    第二种方法还有一个附加的好处,它可以使用Root参数限定根目录的位置,并且不能再向上返回。

    示例代码如下:

uses
FileCtrl;
procedure TForm1.Button3Click(Sender: TObject);
var
    strCaption,strDirectory:String;
    wstrRoot:WideString;
begin
    strCaption:=这是浏览文件夹的说明文字,可以根据需要进行书写。
    +#13#10+一般二行文字就满了。;
    //该参数是浏览文件夹窗口的显示说明部分
    wstrRoot:=D:\GreenSoft;
    //这个参数表示所显示的浏览文件夹窗口中的根目录,默认或空表示“我的电脑”。
    SelectDirectory(strCaption,wstrRoot,strDirectory);
    Label1.Caption:=strDirectory;
    //传递结果,其中参数strDirectory表示函数的返回值
    Label1.Refresh;
end;

 

选择一个文件夹 - Delphi

原文:http://www.cnblogs.com/sures/p/6016875.html

(0)
(0)
   
举报
评论 一句话评论(0
关于我们 - 联系我们 - 留言反馈 - 联系我们:wmxa8@hotmail.com
© 2014 bubuko.com 版权所有
打开技术之扣,分享程序人生!