void __fastcall TFormSet::ReadIni()
{
??? listViewShow->Clear();
??? String id,names,notusechar,breakchar,example;
??? //----獲取運(yùn)行程序的目錄開始
??? char dir[MAX_PATH];
??? char *tfile = "/Config.ini";
??? //將程序現(xiàn)在目錄所在輸入此字符數(shù)組
??? ::GetCurrentDirectory(MAX_PATH,dir);
??? //將現(xiàn)在目錄加上指定文件名
??? strcat(dir,tfile);
??? //----獲取運(yùn)行程序的目錄結(jié)束
??? //TIniFile *ini = new TIniFile(ChangeFileExt( Application->ExeName, "Config.INI" ));
??? TIniFile *ini = new TIniFile(ChangeFileExt(ExtractFilePath(Application->ExeName),"Config.ini"));
??? try
??? {
??????? //listViewShow->Items->BeginUpdate();
??????? for(int i=1;i<=11;i++)
??????? {
??????????? String strId=IntToStr(i);
??????????? id=ini->ReadString("Lotinfo"+strId,"Id",100);
??????????? names = ini->ReadString("Lotinfo"+strId,"Names",100);
??????????? notusechar = ini->ReadString("Lotinfo"+strId,"Notusechar",100);
??????????? breakchar = ini->ReadString("Lotinfo"+strId,"Breakchar",100);
??????????? example = ini->ReadString("Lotinfo"+strId,"Example",100);
??????????? TListItem *item;
??????????? item=listViewShow->Items->Add();
??????????? item->SubItems->Add(id);
??????????? item->SubItems->Add(names);
??????????? item->SubItems->Add(notusechar);
??????????? item->SubItems->Add(breakchar);
??????????? item->SubItems->Add(example);
??????? }
??????? //listViewShow->Items->EndUpdate();
??? }
??? catch(...)
??? {
??????? delete ini;
??????? ShowMessage("xsm");
??? }
??? delete ini;
}

轉(zhuǎn)載于:https://www.cnblogs.com/xsmhero/archive/2009/09/02/1558645.html

總結(jié)

以上是生活随笔為你收集整理的bcb 读取ini的全部內(nèi)容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網(wǎng)站內(nèi)容還不錯(cuò)，歡迎將生活随笔推薦給好友。