假如我有一個ini file，內容如下 [data1] n1=1 n2=3 n3=9 n4=1 n5=2 如何取得data1有5筆資料 謝謝 發表人 - Flame 於 2004/04/13 02:44:29

------
~人世變成了一場夢，夢境成為真實~

Flame您好： 請參以下的程式碼，視需求修改之 #include //===================================== TIniFile* IniFile = new TIniFile("d:\\MyFile.ini"); IniFile->ReadSections(ListBox1->Items); IniFile->ReadSection("data1",ListBox2->Items); IniFile->ReadSectionValues("data1",ListBox3->Items); delete IniFile; //ListBox2->Count; 而這個(Count = 5)值是你要的 希望對你有幫助. 發表人 -

補充g6101的說明:    假設您的ini路徑檔名為d:\\MyFile.ini, 內容為: [data1] n1=1 n2=3 n3=9 n4=1 n5=2    那麼您可以用g6101所提供的3種方法將資料讀入ListBox中:

#include 
TIniFile* IniFile = new TIniFile("d:\\MyFile.ini");
IniFile->ReadSections(ListBox1->Items);
IniFile->ReadSection("data1",ListBox2->Items);
IniFile->ReadSectionValues("data1",ListBox3->Items);
delete IniFile;    如果您只是要取得個數,那麼只需要:
IniFile->ReadSection("data1",ListBox2->Items);
ListBox2->Count;// 這個是您要的值。(ListBox2->Count 會等於 5)

------------------------------- 數學系是內功很強(邏輯/分析) 資工系是招式很多(程式技巧) 就像令狐沖VS東方不敗:D Programmers Guide http://anpino.begin.8d8d.com

非常感謝anpino版主說明補充，下回我會把回答的內容解說更詳實一點 ( class="code"> #include //===================================== TStrings *ls = new TStringList(); TIniFile *IniFile = new TIniFile(ChangeFileExt(Application->ExeName,".INI")); IniFile->ReadSection("data1",ls); ls->Count; //按主題需求這個就是你想要得到的值 delete IniFile; delete ls;

非常感謝你們的詳細解說 本來要問不使用TListBox的用法，沒想到您已經先回答了    感謝 順便請教一下，使用>>

------
~人世變成了一場夢，夢境成為真實~

引言: 非常感謝你們的詳細解說 本來要問不使用TListBox的用法，沒想到您已經先回答了 感謝 順便請教一下，使用>>>< face="Verdana, Arial, Helvetica"> 再看下面的範例：

   #include 
   //=======================================
   TStrings *ls = new TStringList();
   TIniFile *IniFile = new TIniFile(ChangeFileExt(Application->ExeName,".INI"));
   IniFile->ReadSectionValues("data1",ls);
   ls->Count; //按主題需求這個就是你想要得到的值       for(int i=0,n;i < ls->Count ; i  )
   { //此時"="成為掃描關鍵字串
     n = StrToInt(ls->Strings[i].Delete(1,ls->Strings[i].Pos("=")));
   }       delete IniFile;
   delete ls;

非常感謝你們的幫忙 問題解決了

------
~人世變成了一場夢，夢境成為真實~

引言:

引言: 順便請教一下，使用IniFile->ReadSectionValues("data1",ListBox3->Items); 會同時得到keyname跟value 如果我只要value值呢，有什麼方法?謝謝 發表人 - Flame 於 2004/04/13 20:56:40

再看下面的範例：

   #include 
   //=======================================
   TStrings *ls = new TStringList();
   TIniFile *IniFile = new TIniFile(ChangeFileExt(Application->ExeName,".INI"));
   IniFile->ReadSectionValues("data1",ls);
   ls->Count; //按主題需求這個就是你想要得到的值       for(int i=0,n;i < ls->Count ; i  )
   { //此時"="成為掃描關鍵字串
     n = StrToInt(ls->Strings[i].Delete(1,ls->Strings[i].Pos("=")));
   }       delete IniFile;
   delete ls;

補個 link http://delphi.ktop.com.tw/topic.php?topic_id=51763 anpino 大姐寫的那篇就是解答