一.選擇文件夾對話框。
#include <shlobj.h>
........
BROWSEINFO bi;
LPITEMIDLIST pDir;
char path[MAX_PATH]={"C:\\"};
bi.hwndOwner =Handle;
bi.lpszTitle ="請選擇一個目錄，該目錄是你要保存數據的目錄.";
bi.pszDisplayName =path;
bi.ulFlags =BIF_RETURNONLYFSDIRS;//BIF_BROWSEFORCOMPUTER ;
bi.pidlRoot =NULL;
bi.lpfn =NULL;
bi.lParam =124;
pDir=SHBrowseForFolder(&bi);
if(pDir!=NULL)
{
SHGetPathFromIDList(pDir,path);
edtFileName->Text=(AnsiString)path;
}
Public Const BIF_BROWSEFORCOMPUTER = &H1000 注釋：允許瀏覽計算機
Public Const BIF_BROWSEFORPRINTER = &H2000 注釋：允許瀏覽打印機文件夾
Public Const BIF_BROWSEINCLUDEFILES = &H4000 注釋：允許同時瀏覽文件（需IE4）
Public Const BIF_DONTGOBELOWDOMAIN = &H2 注釋：強制用戶停留在網上鄰居中
Public Const BIF_EDITBOX = &H10 注釋：可在輸入框中直接輸入文件夾名（需IE4）
Public Const BIF_RETURNFSANCESTORS = &H8 注釋：返回文件系統祖先？
Public Const BIF_RETURNONLYFSDIRS = &H1 注釋：僅允許瀏覽文件系統
Public Const BIF_STATUSTEXT = &H4 注釋：顯示狀態欄
Public Const BIF_USENEWUI = &H40 注釋：使用新界面（僅支持Win2000、WinME）
Public Const BIF_VALIDATE = &H20 注釋：若輸入一個非法文件夾名，就返回
BFFM_VALIDATEFAILED 給回調函數
二.創建多層文件夾
1.可以用API CreateDirectory.
CreateDirectory只能創建單層目錄。
2.使用BCB中自帶的函數ForceDirectories(AnsiString path);
#include <filectrl.hpp>
三.操作ini文件
#incldue <inifiles.hpp>
1.讀操作
AnsiString strPath,strFile;
strPath=ExtractFilePath(Application->ExeName);
strFile=strPath+"reademail.ini";
TIniFile *ini=new TIniFile(strFile);
//ini->
edtFileName->Text=ini->ReadString("Config","FileName","");
edtSheet->Text=ini->ReadString("Config","Sheet","1");
edtColumn->Text=ini->ReadString("Config","Column","1");
edtEmailPath->Text=ini->ReadString("Config","EmailPath",strPath);
delete ini;
2.寫操作
AnsiString strPath,strFile;
strPath=ExtractFilePath(Application->ExeName);
strFile=strPath+"reademail.ini";
TIniFile *ini=new TIniFile(strFile);
//ini->
ini->WriteString("Config","FileName",edtFileName->Text);
ini->WriteString("Config","Sheet",edtSheet->Text);
ini->WriteString("Config","Column",edtColumn->Text);
ini->WriteString("Config","EmailPath",edtEmailPath->Text);
delete ini;