use FileCtrl;
Dir := 'c:\Mydir';
if SelectDirectory(Dir, [sdAllowCreate, sdPerformCreate, sdPrompt],1000) then
begin
label1.caption := Dir;
end;
弹出对话框选择文件目录 
扫一扫
评论
条评论被折叠 查看
被折叠的 条评论
为什么被折叠?
到【灌水乐园】发言
查看更多评论
添加红包
