Работа с ini.Как в секции узнать количество ключей?

TIniFile *iniFile = TIniFile(iniFileName);
TStringList *iniKeys = new TStringList;
TStringList *iniSections = new TStringList;
iniFile->ReadSections(iniSections);
ShowMessage(IntToStr(iniSections->Count)); // Количество секций
iniFile->ReadSection(SectionName, iniKeys);
ShowMessage(IntToStr(iniKeys->Count)); // Количество ключей

unsigned long int CIni::ulSectionSize(const char *pszSection) {
  unsigned long int ulRes = 0;
  const unsigned int uiBuffLen = LINES_PER_SECTION * LINE_LEN;
  char szBuff[uiBuffLen];
  memset(szBuff, 0, uiBuffLen);
 
  GetPrivateProfileSection(pszSection, szBuff, uiBuffLen, m_sFilePath.c_str());
  //"Key1=xxx1"0"Key2=xxx2"0"Key2=xxx2"
  //если секция пустая
  if (szBuff[0] == '\0') {
    return 0;
  } 
  //секция не пустая
  for (int i = 0; i < uiBuffLen; i ++) {
    if (szBuff[i] == '\0') {
      ulRes ++;
       //конец данных '\0\0'
       if (szBuff[i + 1] == '\0') {
         break;
      }                
    }
  }    
  return ulRes;
}