Discussion :

[muquet]

Re bonjour.

j'ai un TStrings et un liste de chaines que j'ai mis dans un type
ex : TType = (toto,titi,tata);

Je voudrai savoir s il existe une ecrite rapide pour parcourir les lignes de mon Tstrings et les effacer (tstrings.delete[i]) s'il y a dans la chaine(tstrings[i]) un correspondance avec l'un des elements de TType

en + claire :
pour comparer mon tstrings avec une chaine j'utilise

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
for ..
AnsiContainsText(tstrings[i],'chaine a trouver');

je voudrai faire la meme chose mais avec non plus une simple chaine : 'chaine a trouver' mais plusieurs 'toto' 'titi' 'tata' ?

comment fait on ?

merci

[Rayek]

1- Evite le TStrings (voir les raisons indiquées dasn plusieurs posts de ce forum)
2- tu as indexOf(un texte) qui te permet de trouver assez facilementla position d'un texte en te retournant le numéro de ligne.

Ex:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
 
var
  lst : TStringList;
begin
  Lst := TStringList.create;
  try
    lst.Add('Toto');
    lst.Add('Titi');
    lst.Add('Tata');
    showmessage(inttostr(lst.Indexof('Titi');
  finally
    lst.free;
  end;
end;
end;

doit t'afficher : 1

[muquet]

merci de ta reponse mais je vois pas bien comment exploiter ca avec mon probleme :

je veux juste faire un comparaison entre un texte par exemple 'salut titi!!!'

et un ensemble de string 'toto' ,'titi', 'tata' ...

pour savoir si dans 'salut titi!!' il y a un des element de 'toto' ,'titi', 'tata' ...

mais en fait ma liste est assez longue et je ne veux pas faire de boucle sur chaque lement, je cherche une commande qui chechera elle meme.

a+

[didier.cabale]

j'ai un TStrings et un liste de chaines que j'ai mis dans un type
ex : TType = (toto,titi,tata);

Ce qu'il faut bien comprendre, c'est que ton TType ne contient pas des chaines, mais des valeurs scalaires. Ceci dit ..

s'il y a dans la chaine(tstrings[i]) un correspondance avec l'un des elements de TType

Ton besoin est connu, et tu pourras arriver à tes fins avec l'unité Typinfo.pas qui implémente les fonctions (entre autres):

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
//pour obtenir le string à partir de la valeur scalaire
function GetEnumName(TypeInfo: PTypeInfo; Value: Integer): string;

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
//pour obtenir la valeur scalaire à partir du string
function GetEnumValue(TypeInfo: PTypeInfo; const Name: string): Integer;