正文

delphi 弹出选择目录窗口

IP云
IP云V管理员/1 阅读
08/02
小程序：扫一扫查出行
【扫一扫了解最新限行尾号】
复制小程序

if not SelectDirectory( '请选择输出文件路径','/',directory) then
begin
Exit;
end;

使用SelectDirectory函数注意要在use下引入FileCtrl。

第一个参数是提示信息，第二个参数是默认路径，第三个参数是你自己选择的路径。