SelectDirectory()函数
#include <FileCtrl.hpp>
void __fastcall TOthersSettingForm::btnSelectNewPathClick(TObject *Sender)
{
String Dir = edt1->Text;
if (SelectDirectory(L"請選擇路徑", WideString(""),Dir))
{
if (Dir.SubString(Dir.Length(),1) != '\\')
Dir = Dir + "\\";
MainForm->FileInfo.asPath = Dir;
}
edt1->Text = Dir ;
}
Best Regards To Reader:
==============================================
Royal Kao(高全宁)
Mob: 13771921045
Mail: gaoquanning@163.com
Blog: http://www.cnblogs.com/gaoquanning/
==============================================