delphi 调用浏览文件夹 SelectDirectory

本文整理自网络，侵删。

 
单元：Vcl.FileCtrl

var
  StoreDir: String;
begin
  if (SelectDirectory('Select output directory', '', StoreDir)) then begin
    EditDestDir.Text := StoreDir+'\';
  end;
 

相关阅读 >>

Delphi idhttp的用法

Delphi xe将图标和图像添加为资源

Delphi的组件选项卡（component palette）

Delphi 存储过程与函数的区别

Delphi 禁止alt+f4关闭

Delphi中调用必应搜索(bing)的api函数

Delphi 支持通配符删除文件

Delphi 10.3.3 启动cnpack ide 专家 cnwizards coreide260.bpl错误解决办法

Delphi idftp 详解

如何使用Delphi 10 seattle的android应用做intent的发送和接收

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » delphi 调用浏览文件夹 SelectDirectory