选择一个文件夹 - Delphi
Posted 情怀丶感伤
tags:
篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了选择一个文件夹 - Delphi相关的知识,希望对你有一定的参考价值。
在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的主要内容,如果未能解决你的问题,请参考以下文章
终于懂了:Delphi重定义消息结构随心所欲,只需要前4个字节是消息编号就行了,跟Windows消息虽然尽量保持一致,但其实相互没有特别大的关系。有了这个,就有了主动,带不带句柄完全看需要。(代码片段