1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27
|
AnisString chemin_fichier = "c:\tmp\monfichier.txt";
AnsiString str_a_chercher = "6468_546468_646_Airex_454_54654";
TStringList * SL = newTStringList();
try{ SL->LoadFromFile(chemin_fichier); } catch(...){}
AnsiString str_ligne = ""
int i = 0, imax = SL->Count();
bool trouve = false;
for(i = 0; (!trouve) && (i < imax); ++)
{
str_ligne = SL->Strings[i];
if(str_ligne.AnsiPos(str_a_chercher) > 0)
{
trouve = true;
// stocker i ?
}
}
delete SL;
if(trouve)
{
ShowMessage("Chaîne trouvée");
}
else
{
ShowMessage("Chaîne non trouvée");
} |