请问用什么控件可以点击一下就显示目录对话框

Question

我以前看过的，但现在想不起来了。
具体的样子是这样的，前面一个文本框，后面有一个按钮的那种。
或者其他的也行，只要能用一个控件实现就行

Answer 1

你说的是一个文本框右边有3个点的。点了那3个点弹出一个窗口对吧。
如果是这样的话，有很多的。比如Raise控件，Dev Express的dx、cx系列都有的。

Answer 2

uses FileCtrl;procedure TForm1.Button1Click(Sender: TObject);
var
  vDirectory: string;
begin
  if SelectDirectory('选择目录', '', vDirectory) then ShowMessage(vDirectory);
end;