所需單元
代碼如下:
uses filectrl;
示例代碼
procedure tform1.btn1click(sender: tobject);
var path:string;
begin
if selectdirectory('請選擇文件夾','',path) then
showmessage(path);
end;
更多信息請查看IT技術專欄
版權所有:易賢網(wǎng)
公眾號
事業(yè)單位
當前位置：
公考類
招聘類
各類考試