OpenDialog1控件使用说明
上次修改时间: 2023-07-20 18:04:52      来源:网络总结      作者:钢铁长陈
上一页      路径:DSD\Learn\Delphi语言\常用控件使用说明\      下一页
选择文件:
if OpenDialog1.Execute then
begin
Edit3.Text:= OpenDialog1.FileName;
end;
选择目录 //注:需要uses fileCtrl
procedure TForm1.Button1Click(Sender: TObject);
var
FPath : string;
begin
if SelectDirectory('选择路径11','o:\',FPath) then //这里的o:\表初始路径为全电脑,改成D:\就是初始打开D盘选择
// if SelectDirectory('选择路径11','D:\',FPath) then
begin
ShowMessage(FPath);
end;
end;