所需單元
代碼如下:
uses FileCtrl;
示例代碼
代碼如下
procedure TForm1.btn1Click(Sender: TObject);
var path:String;
begin
if SelectDirectory('請選擇文件夾','',path) then
ShowMessage(path);
end;
更多信息請查看IT技術專欄
2026上岸·考公考編培訓報班
公眾號
事業單位
當前位置：
公考類
招聘類
各類考試
