第一种方法,使用SelectDirectory 函数 ,在ShellApi中 procedure TForm2.BtSelectPathClickSender: TObject); var   … Continue reading Delphi 打开文件夹方法
第一种方法,使用SelectDirectory 函数 ,在ShellApi中 procedure TForm2.BtSelectPathClickSender: TObject); var   … Continue reading Delphi 打开文件夹方法